２．テキストボックスに特定の文字列しか入らないようチェックをかける
＜ 説明 ＞
テキストボックスにある特定の文字しか入力出来ないようにしたい。って言う時ありますよね。その場合はこの方法が便利です。
テキストボックスの文字制御にはテキストボックスの Text1_KeyPress(KeyAscii
As Integer)イベント を使います。 → このイベントはテキストボックスに何か文字を入力した時に起きます。
ダウンロード ・・・ 下記のサンプルと同じです
＜ SAMPLE ＞
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >= Asc("A") And KeyAscii <= Asc("Z")
Then
'処理無し
Exit Sub
Else
'文字が A - Z 以外の時の処理
MsgBox "A 〜 Z の半角の大文字しか入力できません！！！"
'KeyAscii = 0 とは入力した文字（キー）情報のクリアです
KeyAscii = 0
Text1.Text = NullSTRING
Beep
End If
End Sub