テキストファイルの全角文字のチェック

半角でテキストデータで作成していたところ、一部誤って、全角で作成してしまいました。ファイル数が多いために１つ１つチェックは難しいので、VBでファイル毎に全角文字が含まれていないか、チェックしたいのですが、可能でしょうか？よろしくお願いします。

No.2 ベストアンサー 回答者： PU2 回答日時： 2008/01/31 20:08

完全なフリーではないけど

これできそうです。(全角は試してませんが)

参考URL：http://www.vector.co.jp/soft/winnt/util/se432915 …

この回答へのお礼

PU２さん、再三の回答ありがとうございました。
全角文字の判断は難しそうですが、特定文字を
指定すれば、チェックできそうなので、ご教授頂いた
ソフトで対応してみます。
ありがとうございました。

お礼日時：2008/02/01 11:39

No.3 回答者： oya-neko 回答日時： 2008/02/04 23:24

VB6しかわからないので、VB6での方法を書きます。

テキストデータを読み込み、読み込んでデータの長さ（Len関数）と
StrConv(テキストデータ, vbFromUnicode)で変換したデータの長さと
を比較して、同じであれば半角のみ、異なっていれば全角が含まれて
います。

Dim strData1 As String
strData1 = （ファイルからデータを読み込む）
If Len(strData1) = Len(StrConv(strData1, vbFromUnicode) Then
半角のみ
Else
全角含む
End If

No.1 回答者： PU2 回答日時： 2008/01/31 19:09

ツール使って一気に全角文字を半角に変換すればいかがでしょうか？

フリーでもあると思います。

この回答へのお礼

回答ありがとうございます。
ただ、内容を確認し、手動での修正を考えており、
全角文字のを含んだファイルだけを抜き出したいのです。
そのようなフリーのソフトはありますか？

お礼日時：2008/01/31 19:52