通过text文本框输入的字符串转化为数值数组

来人帮忙看下吧，谢谢了

您要干嘛？

Dim B() As StringDim A(), I As Integer, J As Integer
Private Sub Cmd_Click()
   Cls
   B = Split(Txt, ",") '文本框的名称为Txt，通过它输入10个数，用逗号隔开
   ReDim A(UBound(B)) '这里需要重定义A的元素
   For I = 0 To UBound(B)
   A(I) = Val(B(I))
   Next I
   For I = 0 To UBound(B)
   PicShow.Print A(I); '想在一个picturebox里显示出来
   Next I
   End Sub


成了，是不是由于数组元素在定义时必须要定义其元素个数么？

是的，数组分为3种定义，定义、重定义、保留内存定义，后两种属于重定义里面的

明白了，谢谢了呢~~~