返回基于 0 的一维数组,其中包含指定数目的子字符串。
Split(expression[, delimiter[, count[, start]]])
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