投稿日 | : 2003/12/12(Fri) 16:03 |
投稿者 | : nanashi |
Eメール | : |
URL | : |
タイトル | : Re: テキストボックス中に漢字が入力されないようにしたい |
> テキストボックスに入力したいのは、半角英数、半角カナのみとしたいのですが・・・
2Byte文字が入っているかどうかを調べれば良いと思います。
If Len(Text1.Text) = LenB(StrConv(Text1.Text, vbFromUnicode)) Then
Debug.Print "1Byte文字のみ"
Else
Debug.Print "2Byte文字が含まれてます"
End If
入力時に制限するならChangeイベントで入力された2Byte文字を消していくようにすれば出来ます。