'Split(expression[,delimiter[,count[,compare]]])参数 描述
'expression 必需的。包含子字符串和分隔符的字符串表达式。
'delimiter 可选的。用于识别子字符串界限的字符。默认是空格字符。
'count 可选的。需被返回的子字符串的数目。-1 指示返回所有的子字符串。
'compare 可选的。规定要使用的字符串比较类型。
'
'可采用下列的值：
'
'0 = vbBinaryCompare - 执行二进制比较。
'1 = vbTextCompare - 执行文本比较。

Dim MyString, MyArray, Msg
MyString = "2011/3/2"
MyArray = Split(MyString, "/", -1, 1)
' MyArray(0) contains "VBScript".
' MyArray(1) contains "is".
' MyArray(2) contains "fun!".
Msg = MyArray(0) & "/0" & MyArray(1)
Msg = Msg   & "/0" & MyArray(2)
MsgBox Msg

<DIV></DIV><DIV>抱怨是一种毒气！抱怨是一种债务！</DIV> <DIV>爱他就不要他为你操心！</DIV><DIV>并不时常想起，但无处不在！</DIV> <DIV>&nbsp;</DIV>

RunAction “Exit”‘Exit 表示要调用的一个Action

项目已经进入模块测试阶段