Split関数について

abebe 2005-09-11 20:19:09 No: 92209

VB6です。

Split関数でスペースを区切り文字とする場合に、
全角のスペースか半角のスペースかを判断する日はどうすればよいでしょうか？

今やっているのは、ファイルを一行づつ読み込んでSplitで配列に入れています。

いな 2005-09-11 21:52:10 No: 92210

判断する日って？

通ってみた 2005-09-11 22:11:32 No: 92211

半角のスペースと全角のスペースってキャラクタコード同じだっけ？

LESIA 2005-09-12 18:14:02 No: 92212

Option Compare Text になってたら
半角と全角のスペースは区別されません。
Option Compare Binary にしてみるとか。

名無しちゃん 2005-09-13 14:42:52 No: 92213

>半角のスペースと全角のスペースってキャラクタコード同じだっけ？

関係ないけどキャラクタコードって読むの？
チャーコードじゃないっけ。

いな 2005-09-13 14:48:18 No: 92214

>関係ないけどキャラクタコードって読むの？
>チャーコードじゃないっけ。

正式には、キャラクタコード
http://e-words.jp/w/E382ADE383A3E383A9E382AFE382BFE382B3E383BCE38389.html

チャーコードは、キャラクタコードのことを言っているんだなぁ〜と
通じるっていうだけで、正式ではないっす。

通ってみた 2005-09-13 18:31:30 No: 92215

>>チャーコードじゃないっけ。

ゴメン、はじめて聞いた

ぶひ 2005-09-13 20:34:20 No: 92216

固定長のユーザ定義でやった方が良いのでは？

ヤマ 2005-11-10 06:34:58 No: 92217

ファイル読み込むときに
Replaceして全て半角にするってのはどうですか？

我龍院忠太 2005-11-11 05:35:10 No: 92218

全角スペースと半角スペースが混在している場合は
どちらがデリミタか判断するのは、理論的に不可能。
もし混在していないなら、
   If InStr(strData, " ") Then
        strD = Split(strData, " ")   '半角
   Else
        strD = Split(strData, "  ")  '全角
   End If
こんなことで良いのでは。

我龍院忠太 2005-11-11 05:40:05 No: 92219

修正 orz
If InStr(strData, " ") Then -> If InStr(strData, " ") <> 0 Then