数字入力とBSしかできないようにしたく、vb2005で以下のように作成しました。これにexcel等から数字を貼り付けることができるように機能を増やしたいのですが、Ctrl+CやCtrl+V等が有効になるようなやり方がわからず困っています。どのようにすればよろしいでしょうか?
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
Select Case e.KeyChar
Case "0"c To "9"c
Case vbBack
Case Else
e.Handled = True
End Select
End Sub
[KeyEventArgs メンバ]
http://msdn2.microsoft.com/ja-jp/library/system.windows.forms.keyeventargs_members(VS.80).aspx
Ctrl キーの状態は、Control プロパティから分かります。使い方はそれぞれのヘルプの
使用例を参照してください。
ツイート | ![]() |