郑德才博客

Split函数的语法是：

Split(expression[, delimiter[, count[, compare]]])
Split函数返回一个下标从零开始的一维字符串数组，它包含字符串(expression)里指定数目(count)的子字符串。

Split函数语法有如下几部分:

expression参数是必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组

delimiter参数是可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。

count参数是可选的。要返回的子字符串数，–1表示返回所有的子字符串。

compare 可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅下面:
---------------------------------------------
vbUseCompareOption常数的值是–1:用Option Compare语句中的设置值执行比较。
vbBinaryCompare常数的值是0:执行二进制比较。
vbTextCompare常数的值是1:执行文字比较。
vbDatabaseCompare常数的值是2:仅用于Microsoft Access。基于您的数据库的信息执行比较 。
如果省略此参数,缺省为二进制比较.
---------------------------------------------

例:
dim a() as string
dim expression as string

expression="abc.abcde.abfdc.12fd"
a=Split(expression,".")

执行后:
a(0)="abc"
a(1)="abcde"
a(2)="abfdc"
a(3)="12fd"

以上程序在VB6+WindowsXP下调试

msgbox ubound(split("a+b+c","+"));