vb取出空格隔开的文本

来源：百度知道编辑：UC知道时间：2024/06/15 02:39:55

一个文本，很长，比如“11 22 33 44 55 66 .......”
每个字串中间用空格隔开。
现在我要用vb把这些字串依次取出并存入a（0），a（1），a（2）......，并算出一共有几个字串
好的追到50分
从网上抄的半分都没

A=split("11 22 33 44 55 66")
for i = 0 to ubound(a）
print a(i)
next i
print "共有" & ubound(a)+1 & "个字符串"

Private Sub Command1_Click()
Dim a
s = "11 22 33 44 55 66"
a = Split(s, " ")
msgbox "共有元素：" & str(ubound(a))
'那么a(0)=11 a(1)=22 .....
End Sub

split函数根据分割符来切割字符串，返回一个一维数组