Split 函數(shù)返回基于 0 的一維數(shù)組，其中包含指定數(shù)目的子字符串。 Split(expression[, delimiter[, count[, start]]])
參數(shù)expression 必選項(xiàng)。字符串表達(dá)式，包含子字符串和分隔符。如果 expression 為零長(zhǎng)度字符串，Split 返回空數(shù)組，即不包含元素和數(shù)據(jù)的數(shù)組。 delimiter 可選項(xiàng)。用于標(biāo)識(shí)子字符串界限的字符。如果省略，使用空格 ("") 作為分隔符。如果 delimiter 為零長(zhǎng)度字符串，則返回包含整個(gè) expression 字符串的單元素?cái)?shù)組。 count 可選項(xiàng)。被返回的子字符串?dāng)?shù)目，-1 指示返回所有子字符串。 Compare 可選項(xiàng)。指示在計(jì)算子字符串時(shí)使用的比較類型的數(shù)值。有關(guān)數(shù)值，請(qǐng)參閱“設(shè)置”部分。 設(shè)置compare 參數(shù)可以有以下值： | 常數(shù) | 值 | 描述 |
|---|
| vbBinaryCompare | 0 | 執(zhí)行二進(jìn)制比較。 | | vbTextCompare | 1 | 執(zhí)行文本比較。 |
說明下面的示例利用 Split 函數(shù)從字符串中返回?cái)?shù)組。函數(shù)對(duì)分界符進(jìn)行文本比較，返回所有的子字符串。 Dim MyString, MyArray, Msg
MyString ="VBScriptXisXfun!"
MyArray =Split(MyString, "x", -1, 1)
' MyArray(0) contains "VBScript".
' MyArray(1) contains "is".
' MyArray(2) contains "fun!".
Msg =MyArray(0) & " " & MyArray(1)
Msg =Msg & " " & MyArray(2)
MsgBox Msg
要求版本 2 請(qǐng)參閱Join 函數(shù)
返回首頁(yè) |