您的位置：程序门 -> vb -> 基础类

定时执行应该怎么办呀

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

定时执行应该怎么办呀

发表于：2007-04-19 11:05:11 楼主

各位前辈，我想每隔一小时整点去定时执行一些功能，该怎么办呢？多谢拉

发表于：2007-04-19 11:15:291楼得分:0

看看什么是timer

发表于：2007-04-19 11:18:162楼得分:0

vb里的功能？
那可以设个timer, 设置interval=1000
option explicit
'

private sub timer1_timer（)
if format（now, "nn:ss ")= "00:00 " then
[你的函数]
endif
end sub

发表于：2007-04-19 11:20:583楼得分:0

timer 控制就可以

发表于：2007-04-19 11:38:294楼得分:0

private sub form_load（)
timer1.interval=3600000 '每过一个小时执行一次

end sub

private sub timer1_timer（)

doevent
end sub

发表于：2007-04-19 14:37:235楼得分:0

to:diclover
timer1.interval=3600000？
呵呵
beal_p的不错

发表于：2007-04-19 15:44:296楼得分:0

可以考虑用windows带的计划任务

发表于：2007-04-19 15:45:507楼得分:0

用timer编程好一点

发表于：2007-04-19 15:58:538楼得分:0

如果timer1.interval==3600000，那除非你是整点启动timer，否则你要执行的东西永远都不会执行。

发表于：2007-04-19 17:08:589楼得分:0

呵呵,我的设想是:timer1.interval代表的是每过1/1000秒执行一次,一个小时执行一次自然是1000*60*60了.后来查了下msdn,interval的取值范围为:0 ～ 65535.
现给出自己的想法:
dim i as integer
private sub form_load（)
timer1.interval=1000 '每过一秒执行一次

end sub

private sub timer1_timer（)
i=i+1
if i> =3600 then
doevent
i=0
end if
end sub

发表于：2007-04-19 17:17:1910楼得分:0

beal_p的恐怕不行吧?
这能实现没过一小时调一次吗?
我怎么看都是在每天的00:00调用（一天调用一次).

发表于：2007-04-19 18:44:1211楼得分:0

不累吗？
你没有用过windows中的 <任务计划> 吗？

发表于：2007-05-09 16:02:4312楼得分:0

to diclover（拥有四片叶子的三叶草)

看清楚了，是 if format（now, "nn:ss ")= "00:00 " then

下一篇：关于聊天程序？
上一篇：mschart 数组曲线（多条曲线）

其他资讯

您的位置：程序门 -> vb -> 基础类

定时执行 应该怎么办呀

定时执行应该怎么办呀