VBS教程:函數(shù)-Split 函數(shù)
Split 函數(shù)
返回基于 0 的一維數(shù)組,其中包含指定數(shù)目的子字符串。
Split(expression[, delimiter[, count[, start]]])
參數(shù)
expression
必選項(xiàng)。字符串表達(dá)式,包含子字符串和分隔符。如果 expression 為零長度字符串,Split 返回空數(shù)組,即不包含元素和數(shù)據(jù)的數(shù)組。
delimiter
可選項(xiàng)。用于標(biāo)識(shí)子字符串界限的字符。如果省略,使用空格 ("") 作為分隔符。如果 delimiter 為零長度字符串,則返回包含整個(gè) expression 字符串的單元素?cái)?shù)組。
count
可選項(xiàng)。被返回的子字符串?dāng)?shù)目,-1 指示返回所有子字符串。
Compare
可選項(xiàng)。指示在計(jì)算子字符串時(shí)使用的比較類型的數(shù)值。有關(guān)數(shù)值,請參閱“設(shè)置”部分。
設(shè)置
compare 參數(shù)可以有以下值:
常數(shù) | 值 | 描述 |
---|---|---|
vbBinaryCompare | 0 | 執(zhí)行二進(jìn)制比較。 |
vbTextCompare | 1 | 執(zhí)行文本比較。 |
說明
下面的示例利用 Split 函數(shù)從字符串中返回?cái)?shù)組。函數(shù)對分界符進(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
Split(expression[, delimiter[, count[, start]]]):返回基于0的一維數(shù)組,其中包含指定樹木的子字符串.下面的例子,將字符串以“&”為標(biāo)記分割開來.
注意:因?yàn)榉指詈?其實(shí)返回的是一個(gè)數(shù)組,所以要顯示,就必須返回其中一個(gè)字符串,或者寫循環(huán)來分別彈出返回值.
<HTML>
<HEAD><TITLE>一個(gè)簡單首頁</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Function b_onclick
Dim x
x=Split("abcdabcd&abcdabcd", "&", -1)
Msgbox x(0)
End function
-->
</SCRIPT>
</HEAD>
<BODY>
<H3>一個(gè)簡單首頁</H3><HR>
<FORM>
<INPUT id=b TYPE="BUTTON" VALUE="單擊此處">
</FORM>
</BODY>
</HTML>
相關(guān)文章
vbScript on error resume next容錯(cuò)使用心得
在vbscript中,使用on error resume next處理錯(cuò)誤,當(dāng)使用這段代碼時(shí),程序?qū)⒑雎援a(chǎn)生的錯(cuò)誤繼續(xù)運(yùn)行后面的代碼。本文就使用心得作個(gè)小結(jié),供有需要的朋友參考2009-02-02網(wǎng)馬生成器 MS Internet Explorer XML Parsing Buffer Overflow Explo
MS Internet Explorer XML Parsing Buffer Overflow Exploit (vista) 0day利用代碼2009-01-01