テキストボックスの入力を制限するには？ (ID:117770)

名前

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

本文 これだとバックスペースとかも受け付けません。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim Temp As String On Error GoTo Test Temp = Hex("&H" & Chr(KeyAscii)) Exit Sub Test: KeyAscii = 0 End Sub