VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 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


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -