VB编程之Timer倒计时控件怎么用
主讲老师：郭盛华
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
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
报名学习加微信/QQ 1602007，关注《东方联盟网》微信公众号
>更多相关文章
- 11-15VB编程之是否显示图片应用程序
- 11-15VB编程之编写我的第一个浏览器
- 11-15VB编程之单击一个按钮就可以打开网页
- 11-15VB编程之读取TXT文件
- 11-15VB编程之多个程序文档的关联
- 11-15VB编程之菜单界面的设计
- 11-15VB编程之直线与形状控件
- 11-15VB编程之图形与图像控件的使用方法
首页推荐
佛山市东联科技有限公司一直秉承“一切以用户价值为依归
- 01-11全球最受赞誉公司揭晓：苹果连续九年第一
- 12-09罗伯特·莫里斯：让黑客真正变黑
- 12-09谁闯入了中国网络？揭秘美国绝密黑客小组TA
- 12-09警示：iOS6 惊现“闪退”BUG
- 04-19深度布局商业航天与低空经济，中科星图赋能
- 04-19短篇创作成风口 专家：短篇创作正改变网络文
- 04-19知乎周源：专家网络会成为更强的“人和AI的
- 04-19手机端微信支持个人公众号一键注册和发布内
- 04-08岚图汽车：一季度海外订单同比增长205%
相关文章
24小时热门资讯
热门推荐
最新资讯
操作系统
黑客防御
粤公网安备 44060402001498号