テキストボックスで数値しか入力できないように制限する (1個) (SNo.045) 1.テキストボックスで数字しか入力できないように制限する その1(簡易型) |
|
使用コントロール | TextBox1 TextBox2 |
その他条件 | WindowsXP(Vista) Visual Basic 2005(VB2008) |
1.テキストボックスで数字しか入力できないように制限する その1(簡易型)
Private Sub TextBox1_KeyPress(ByVal sender As Object, _ ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress '(.-1234567890[Enter][BackSpace])しか入力できないように制限する If e.KeyChar >= Chr(Keys.Space) And e.KeyChar < "-"c Or _ e.KeyChar > "9"c Or e.KeyChar = "/"c Then Microsoft.VisualBasic.Beep() 'エラー音 e.Handled = True '入力キーを無効にする End If End Sub 簡易的ならこれでもいいのですが、IME を使用したり、貼り付けられたら入力できてしまいます。 |