Split 関数
各要素ごとに区切られた文字列からゼロ ベースの 1 次元配列を作成し、返します。
Split(expression[, delimiter[, count[, compare]]])
引数
- expression
必ず指定します。文字列と区切り文字を含んだ文字列式を指定します。引数 expression が長さ 0 の文字列 ("") である場合、Split 関数は、要素もデータもない空の配列を返します。 - delimiter
省略可能です。文字列の区切りを識別する文字を指定します。引数 delimiter を省略すると、区切り文字にスペース (" ") が使用されます。引数 delimiter が長さ 0 の文字列 ("") である場合は、引数 expression 全体の文字列を含む単一の要素の配列を返します。 - count
省略可能です。返す配列の要素数を指定します。-1 を指定すると、すべての文字列を含んだ配列を返します。 - compare
省略可能です。文字列式を評価するときに使用する文字列比較のモードを表す数値を指定します。設定する値については、次の「設定値」を参照してください。
設定値
引数 compare の設定値は次のとおりです。
| 定数 | 値 | 内容 |
|---|---|---|
| vbBinaryCompare | 0 | バイナリ モードで比較を行います。 |
| vbTextCompare | 1 | テキスト モードで比較を行います。 |
解説
次のコードは、Split 関数を使って文字列から配列を返す例です。関数は区切り文字の比較をテキスト モードで行い、各要素の文字列全体を返します。
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x", -1, 1)
' MyArray(0) は、"VBScript" です。
' MyArray(1) は、"is" です。
' MyArray(2) は、"fun!" です。
Msg = MyArray(0) & " " & MyArray(1)
Msg = Msg & " " & MyArray(2)
MsgBox Msg