如何实现每隔5分钟运行一次程序？ - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 如何实现每隔5分钟运行一次程序？

标题：如何实现每隔5分钟运行一次程序？

只看楼主

yuk_yu

等　级：论坛游侠
帖　子：334
专家分：134
注　册：2009-3-16
结帖率：85.71%

楼主

已结贴√ 问题点数：20 回复次数：3

如何实现每隔5分钟运行一次程序？

如何实现每隔5分钟运行一次程序？

每隔5分钟运行一次
sub yy()
msgbox "OK"

end sub

搜索更多相关主题的帖子: 如何　

2012-06-07 11:13

yuk_yu

等　级：论坛游侠
帖　子：334
专家分：134
注　册：2009-3-16

第 2 楼

得分:0

回复楼主 yuk_yu

Dim i As Integer
Private Sub Form_Load()
i = 0
Timer1.Interval = 1000
Timer1.Enabled = True
Form1.WindowState = 1
End Sub
Private Sub Timer1_Timer()
i = i + 1
If i = 5 Then
i = 0
MsgBox "测试成功!"
End If
End Sub

收到的鲜花

Artless 于 2012-06-07 19:40 送鲜花 5朵附言：原创内容

2012-06-07 11:35

风吹过b

等　级：贵宾
威　望：364
帖　子：4912
专家分：29900
注　册：2008-10-15

第 3 楼

得分:10

测试成功，每 5秒弹出一个提示框，不错不错。

授人于鱼，不如授人于渔
早已停用QQ了

2012-06-07 15:44

Artless

等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8

第 4 楼

得分:10

https://bbs.bccn.net/thread-332567-1-1.html

无知

2012-06-07 19:46

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-370996-1-1.html