文字列に全角文字が存在するかどうか調のはわかるのですが、半角文字が存在するかどうか調べるにはどうすればよいのでしょうか?

このQ&Aに関連する最新のQ&A

A 回答 (2件)

お疲れ様です。


こんなのはどうでしょうか?

If (Len("文字列") * 2) <> LenB(StrConv("文字列", vbFromUnicode)) Then
  '// 半角文字有り
Else
  '// 全部全角
End If

間違っていたらごめんなさい。
    • good
    • 0
この回答へのお礼

そっかー なるほど・・・ 
ありがとうございました!!

お礼日時:2002/03/06 15:57

 1文字ずつとりだして、MidB 2文字目がゼロかどうか見るのは駄目でしょうか(^_^;

    • good
    • 0
この回答へのお礼

試してみます(^ 。^)
ありがとうございました!!

お礼日時:2002/03/06 15:58

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報

カテゴリ