返回基于 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