vb timer控件小问题,请告诉帮忙解答下
有两个timer控件,timer1、timer2,在timer1控件执行事件1秒后,timer2控件执行
补充:或者用一个timer控制两个事件发生差一秒也行,谁能给编个代码
追问:如果要有三个事件呢?
每个事件间隔2秒呢?
答案:添加一timer控件,Interval设为1000
Private Sub Timer1_Timer()
Static i As Integer
i = i + 1
If i = 1 Then
Print "1" ‘事件1
End If
If i = 2 Then
Print "2" '事件2
i = 0
End If
End Sub
其他:timer2的Interval属性设置为1000
timer2的Enabled属性设置为False
timer1事件代码里面最后的地方来一句:
timer2.Enabled=True
timer2事件代码里面最后的地方来一句:
timer2.Enabled=False timer 控件有bug,就是执行代码时不计时,建议用timer高频读取系统时间(interval在10左右为妙),每过一秒就激发一个事件
上一个:Vb与Access连接后,可以添加和查询了,但是想能够实现数据库中数据的计算
下一个:vb小白询问一个问题