Question

vb中，如何提取text中输入的数字，数字是用“-”隔开的。

比如说text1中输入的是12-21-25-32等15个数字
我想把他们分别提取出来放入a1,a2,a3……a15中，应该怎么写？？？谢谢了

Answer 1

楼上运行会出现类型不匹配错误
Split()返回的是String型的数据 不能赋值入Integer型的
Dim a() As String
n() = Split(Text1.Text, "_")

使用时如下使用 Val(n(i))

Answer 2

dim a(15) as integer
dim ss
ss=text1.text
for i=1 to 15 then
a(i)=split(ss,"-")(i-1)
next i
值分别存在数组a()中

Answer 3

dim a="12-21-25-32"
dim b() as integer
b=split(a,"-")
那么b(0)=12
b(1)=21
b(i)= ......
循环自己写吧

Answer 4

dim b
b=split(text1.text,"-")
b(0)=12
b(1)=21
b(i)= ......