「テキストボックスの入力制限(数字とBSPとDELE以外無効)」の編集履歴(バックアップ)一覧はこちら
「テキストボックスの入力制限(数字とBSPとDELE以外無効)」(2008/06/17 (火) 16:57:00) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
#highlight(vb.net){{
Private Function NumLimit(ByRef e)
If _
e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D0) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D1) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D2) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D3) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D4) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D5) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D6) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D7) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D8) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D9) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Back) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Delete) _
Then
Else
e.Handled = True
End If
End Function
}}
引数にテキストボックスの引数eを渡すと。数値とバックスペースとデル以外揉み消してくれます。
#highlight(vb.net){{
Private Function NumLimit(ByRef e)
If _
e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D0) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D1) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D2) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D3) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D4) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D5) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D6) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D7) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D8) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.D9) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Back) _
Or e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Delete) _
Then
Else
e.Handled = True
End If
End Function
}}
表示オプション
横に並べて表示:
変化行の前後のみ表示: