vb中用timer控件控制for循环,让其一秒执行一次,求大神指教!!!

如题所述

可以使用change,不需要使用for(其实是我不会用for哈哈)
例如:在vb窗体加入1个timer ,2个label,然后代码如下:
Private Sub Form_Load()
Timer1.Interval = 1000
Label2.Caption = 1
End Sub
Private Sub Label1_Change()
Label2.Caption = Label2.Caption + 1
End Sub
Private Sub Timer1_Timer()
If Label1.Caption <> Str(Timer) Then
Label1.Caption = Time
End If
End Sub

当label1.caption发生变化时,label2.caption+1,
温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2017-07-31
你要的是不是一秒钟for循环执行一次,还是一遍呢!
你把timer的interval改为1000!
就可以了!追问

一秒就执行一个循环
for x=100 to 0 step -1
y=x-1
s=x*x-y*y
text1.text=s
next x
我想让它一秒执行一次,返回一个s值,用timer控制

本回答被网友采纳
第2个回答  2017-07-30
把要循环的内容写到timer1_tick()事件里,把timer的Interval设置为1000就行
第3个回答  2013-05-08
请说清楚点。追问

一秒执行一个循环
for x=100 to 0 step -1
y=x-1
s=x*x-y*y
text1.text=s
next x
我想让它一秒执行一次,返回一个s值,用timer控制

相似回答