请问在VB中，如何将文本框中的数字读取到数组中啊？
展开全部
Private Sub Command1_Click()
Text1.Text = "123,456,789"
Dim a
a = Split(Text1.Text, ",")
Dim b
ReDim b(0 To UBound(a)) As Integer
Dim i As Integer
For i = 0 To UBound(b)
b(i) = Val(a(i))
Print b(i)
Next i
End Sub
Text1.Text = "123,456,789"
Dim a
a = Split(Text1.Text, ",")
Dim b
ReDim b(0 To UBound(a)) As Integer
Dim i As Integer
For i = 0 To UBound(b)
b(i) = Val(a(i))
Print b(i)
Next i
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
