第11课:郭盛华课程_VB编程之Timer倒计时控件怎么用

早过忘川 提交于 2020-02-05 08:41:30

主讲老师:郭盛华

 

Timer控件是一种通过引发Timer事件,可以有规律地隔一段时间执行一次代码的控件。
Dim N As Integer ‘定义N变量为数字
Private Sub Form_Load()
N = 10’默认N等于 10
Timer1.Interval = 1000 '设置频率时间1秒
Timer1.Enabled = True '开启
End Sub
Private Sub Timer1_Timer()
N = N - 1
If N > 0 Then
Label1.Caption = "倒计时为:"& N
Else
Label1.Caption = "时间到"
Timer1.Enabled = False
End If
End Sub

 

具体请看视频教程:微博@郭盛华老师

 

标签
易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!