UC知道把Text中的数据放入数组中草药 VB
来源：百度知道 编辑：UC知道 时间：2024/05/31 06:12:13
怎么把文本框中的数据放入一个数组里？而且是一个一个的输入！
如：有一个文本框text1,数组a(100),
For i = 0 To Len(Text1.Text)
a(i) = Mid(Text1.Text, i, 1)
Next i
为什么这样写码是错的？
各位高手帮忙看看，指导一下！
Dim a(100) As String
Dim i As Integer
For i = 0 To Len(text1.Text)
a(i) = Mid(text1.Text, i, 1)
Next i
如：有一个文本框text1,数组a(100),
For i = 0 To Len(Text1.Text)
a(i) = Mid(Text1.Text, i, 1)
Next i
为什么这样写码是错的？
各位高手帮忙看看，指导一下！
Dim a(100) As String
Dim i As Integer
For i = 0 To Len(text1.Text)
a(i) = Mid(text1.Text, i, 1)
Next i
dim a(100) as string
For i = 1 To Len(Text1.Text)
a(i) = Mid(Text1.Text, i, 1)
Next i
在Mid函数的第二个起始位参数的值不能为0或者是负，必须是1到任何正数。要不然是错的。