TextBoxでCtrl+Aで全選択するとビープ音がなってしまう

かえる 2008-10-03 10:33:06 No: 145267

どなたか知っていましたら、教えてください。

VB2005にて、TextBoxでCtrl+Aを入力した場合に、
テキストを全選択したいと思っています。

そこで、以下のようなコードを記述したのですが、
全選択した後に、ビープ音がなってしまいます。

これをどうにかしたいのですが、どなたか解決策をご教授ください。

Private Sub txtFileList1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtFileList1.KeyDown

Dim objTxtBox As TextBox = DirectCast(sender, TextBox)

        If e.Control = True And e.KeyCode = Keys.A Then
            ' 全選択
            objTxtBox.SelectAll()
            e.Handled = True
        End If

End Sub

shazbot 2008-11-04 20:55:15 No: 145268

ContextMenuStripをつけて、Shortcut Keysを設定すればうまくいきますよ。