split函数在vb中的用法

Split函数是一个用于分割字符串的函数，它能以一个字符串内容中的一个(或几个连续的)特定的字符为切割位点的标志，将这个字符串分割成若干个小字符串。它的用法是
变量 = Split(原字符串变量, 切割标志)
下面用例子具体说明：
这里有一个字符串变量a，它的值是"你、我、他"，则
b = Split(a, "、")
此后b就变成了一个变量组，b(0)的值是"你"，b(1)的值是"我"，b(2)的值是"他"。
下面举一个应用的例子：Text1中是用文字表示的数据，格式为"数据1;数据2;数据3;……，要求点击Command1后将这些数据列在List1中。
Private Sub Command1_Click()
a = Split(Text1.Text, ";")
For i = 0 To UBound(a)
List1.AddItem a(i)
Next
End Sub

Private Sub Form_Load()
Dim a
x = "22.214 214.121 1546"
a = Split(x)
For i = 0 To UBound(a)
MsgBox "第" & i + 1 & "段是" & a(i)
Next i
End Sub