投稿日 | : 2005/10/01(Sat) 07:44 |
投稿者 | : Starfish |
Eメール | : |
URL | : |
タイトル | : Re: TextBoxのCtrl+Aについて |
そのフォームにメニューがあって、「すべて選択」のメニューを作って
よいのなら、ショートカットにCtrl+Aを割り当てて、以下のコードで
実現できます。
Private Sub mnuEditSelectAll_Click()
If TypeOf Me.ActiveControl Is TextBox Then
Me.ActiveControl.SelStart = 0
Me.ActiveControl.SelLength = Len(Me.ActiveControl.Text)
End If
End Sub