キーボードからの入力制限をかけるには？（VB6.0） (ID:126326)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 あ、逆？ Aを押したら0なのか。 Private Sub Text1_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case vbKeyA KeyAscii = vbKey0 '中略 Case vbKeyJ KeyAscii = vbKey9 Case Else KeyAscii = 0 End Select End Sub