8个回答
展开全部
将Timer的Enabled属性设置为False可以暂停Timer;将Timer的Enabled属性设置为Ture可启动Timer。见以下代码
Option Explicit
Private Sub Command1_Click()
With Timer1
.Interval = 1000
'!!启动定时器
.Enabled = True
End With
End Sub
Private Sub Command2_Click()
'!!暂停定时器
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
Debug.Print "ABC"
End Sub
展开全部
Timer1.Enabled = False,可以停止Timer事件。如果有一个变量随之变化,就把它声明为公用的,停止Timer即相当于暂停,因为那个值没变。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Command1_Click()
Timer1.Enabled = Not Timer1.Enabled
'点击一次是暂停,再点击是启动
End Sub
Private Sub Timer1_Timer()
Static Count As Integer '可以用static保存值
Count = Count + 1
Me.Cls: Me.Print Count
End Sub
Timer1.Enabled = Not Timer1.Enabled
'点击一次是暂停,再点击是启动
End Sub
Private Sub Timer1_Timer()
Static Count As Integer '可以用static保存值
Count = Count + 1
Me.Cls: Me.Print Count
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
好似不可以的吧。
不过可以通过再加一个timer用来存储已用时间来解决这个问题
不过可以通过再加一个timer用来存储已用时间来解决这个问题
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
说不清楚,什么叫中断?
timer控件会中断吗?就是禁止了Timer1.Enabled = False
也会执行完本次的事件.你是要保存变量的值吧
timer控件会中断吗?就是禁止了Timer1.Enabled = False
也会执行完本次的事件.你是要保存变量的值吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询