求助 VB菜鸟
请问下如何实现让timer控件进行不断重复我输入的号码！能不能把我输入的号码存储给数组 然后让 timer控件运行 请问我如下代码怎么改可以？
关键我不知道如何调用我获取后的数组数据！
Option Base 1
Private Sub form_click()
Dim a() As Integer
m = InputBox("")
ReDim a(m)
For i = 1 To m
a(i) = InputBox("")
Next i
End Sub
Private Sub Command2_Click()
Timer1.Enabled = True
Timer1.Interval = 50
End Sub
Private Sub Command3_Click()
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
i = Int(Rnd * m + 1)
Text1.Text = a(i)
End Sub
求教！ --------------------编程问答-------------------- 1、把“Dim a() As Integer”这行代码移动到 “Option Base 1”之后，
2、在“Dim a() As Integer”后边加一句“Dim m As Integer”
3、在“i = Int(Rnd * m + 1)”之前加一句“Randomize”
4、记得结贴给分 --------------------编程问答-------------------- 太感谢上面了
囧。我都忘记我不够分了 不过我一定赚到然后奖给你 --------------------编程问答-------------------- 把这20分结了，就能返回10分。。。
补充：VB , 基础类
