文字列の中の全角チェック

たぶち  2004-02-13 09:57:43  No: 82013  IP: [192.*.*.*]

はじめまして、たぶちといいます。
文字列の中に全角が混ざっているかどうかを
判別するにはどうしたらよいでしょう？
知っている方がいらっしゃいましたら
ご教示ください。よろしくおねがいします。

編集 削除
マフユ  2004-02-13 11:10:42  No: 82014  IP: [192.*.*.*]

ここの掲示板の「掲示板の全トピックから単語」にて検索
[全角と半角の判断について]


VB6
http://anetm.com/dev/tools/vb60/116255.htm

VB.NET
http://anetm.com/dev/tools/vbdotnet/112230.htm


http://www.yahoo.co.jp/ にて下記のキーワードなどで
検索もして見て下さい。

全角と半角 vb6

編集 削除
nanashi  2004-02-13 18:00:37  No: 82015  IP: [192.*.*.*]

lLen = Len(sText)
lLenB = LenB(StrConv(sText, vbFromUnicode))

If lLenB = lLen Then
    Debug.Print "半角のみ"
ElseIf lLenB = (lLen * 2) Then
    Debug.Print "全角のみ"
Else
    Debug.Print "混在"
End If


こんな感じ？

編集 削除