Question

vb程序，如何提取一个文本框内的多个数据

vb程序，如何提取一个文本框内的多个数据？数据之间用空格或者逗号分开。我需要的是具体的公式并解释该公式各个参数的功能

Answer 1

用Split分割就行了，Split(a,b，c，d) a为要分解的字符串，b为以什么作为分组，c为分成多少段，d表示判别子字符串时使用的比较方式

追问

可以举个实例么？例如
文本框内输入1 2 3三个数，如何分别赋值给数组a（）？
文本框内的元素个数是不固定的

追答

vb中，1,字符串得到:astr = textbox.text
2,strsp = split(astr,"一个空格或者逗号“)
3 其结果自然就是a（0）= 1，a（1） =2 ，a（3） = 3
不需要再赋值返回值就是数组

Answer 2

a=split(text1,vbcrlf)然后数组a中, a(0)是第1行, a(1)是第2行, 以下类推..如果你想要第5行到第17行, 可以使用:a=split(text1,vbcrlf)redim preserve a(4 to 16)b=join(a,vbcrlf)

追问

这个答案我一个看过了，可能我没描述清楚，提取的数据是要赋值给一个数组的，并且数据之间用空格或者逗号分开，而不是第几行

Answer 3

先定义数组a
dim a()
下面是用空格做为分割符的情况下把数据存到数组a中：
a()=split(text1.text," ")
下面是用逗号做为分割符的情况下把数据存到数组a中：
a()=split(text1.text,",")

追问

谢谢，不过晚了，我已经把评价给出去了，实在抱歉

追答

呵呵 没有关系 只要您的问题解决了 就好了