金曜日, 10月 12, 2007
[VB2005]数値入力制限
▼質問
テキストボックスで数値だけを入力できるようにしたいんだ。どうすればいい?
▼回答
KeyPressイベントで下記の関数を呼べばできるよ。
Public Sub KeyNumericOnly(ByRef e As System.Windows.Forms.KeyPressEventArgs)
'数値キーをチェックする.
If (Not e.KeyChar Like "[0-9]") Then e.KeyChar = ""
End Sub
これだけでは駄目なのね(?.?)
これだとバックスペースが使えなくなるのね。
だからこの関数を呼ぶ前に次のコードを記述するのね。
If (Asc(e.KeyChar) = System.Windows.Forms.Keys.Back) Then Exit Sub
他にも、プロパティのMaxLengthを指定しないと入力桁数の制限ができないのね。
これで、OKかな!?
テキストボックスで数値だけを入力できるようにしたいんだ。どうすればいい?
▼回答
KeyPressイベントで下記の関数を呼べばできるよ。
Public Sub KeyNumericOnly(ByRef e As System.Windows.Forms.KeyPressEventArgs)
'数値キーをチェックする.
If (Not e.KeyChar Like "[0-9]") Then e.KeyChar = ""
End Sub
これだけでは駄目なのね(?.?)
これだとバックスペースが使えなくなるのね。
だからこの関数を呼ぶ前に次のコードを記述するのね。
If (Asc(e.KeyChar) = System.Windows.Forms.Keys.Back) Then Exit Sub
他にも、プロパティのMaxLengthを指定しないと入力桁数の制限ができないのね。
これで、OKかな!?