请教高手 用timer依次读出数组中的元素
请问如何用timer依次读出数组中的元素，最好能给出小程序示例，多谢多谢
回复 2楼 Artless
比如这个样子吧Option Base 1
Dim a(6) As Integer
Private Sub Form_load()
For i = 1 To 6
a(i) = i
Timer1.Enabled = True
Next i
End Sub
Private Sub Timer1_Timer()
For i = 1 To 6
Text1.Text = Str$(a(i))
Next i
End Sub
只能读出最后一个数