VB.NET質問スレ (Part24)
■ このスレッドは過去ログ倉庫に格納されています
0431デフォルトの名無しさん
2008/01/12(土) 02:08:19Handles Me.KeyDown
Dim ctrl As Control = Me.SplitContainer3.ActiveControl
If Not TypeOf ctrl Is TextBox Then Exit Sub
If e.Control Then
Select Case e.KeyCode
Case Keys.A
DirectCast(ctrl, TextBox).SelectAll()
Case Keys.C
DirectCast(ctrl, TextBox).Copy()
Case Keys.X
DirectCast(ctrl, TextBox).Cut()
Case Keys.V
DirectCast(ctrl, TextBox).Paste()
Case Keys.Z
DirectCast(ctrl, TextBox).Undo()
End Select
End If
End Sub
↑を実行するとCtrl+A以外の条件ではKeyDownイベントが発生しないのですが
どんな原因が考えられるでしょうか?
■ このスレッドは過去ログ倉庫に格納されています