Question

vb循环和 timer函数问题

http://tieba.baidu.com/p/3209513198 这是贴吧地址 一开始在贴吧上问的 麻烦好心人解答下

Answer 1

sub Timer1_Timer()
Select Case xt
Case 1
Text1.Text = a
Case 2
Text1.Text = b
Case 3
Text1.Text = c
End Select
xt = xt + 1
End Sub
设置Timer1.Interval = 1000
设置a,b,c,xt为公用变量