定时执行 应该怎么办呀

Question

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

Answer 1

vb里的功能？
那可以设个timer, 设置interval=1000
Option Explicit
'Private Sub Timer1_Timer()
  if format(now,"NN:SS")="00:00" then
     [你的函数]
  endif
End Sub

Answer 2

timer   控制就可以

Answer 3

Private Sub form_load()
    timer1.interval=3600000'每过一个小时执行一次
    
End SubPrivate Sub Timer1_Timer()    DoEvent
End Sub

Answer 4

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

Answer 5

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

Answer 6

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

Answer 7

呵呵,我的设想是:timer1.interval代表的是每过1/1000秒执行一次,一个小时执行一次自然是1000*60*60了.后来查了下MSDN,interval的取值范围为:0 ～ 65535.
现给出自己的想法:
Dim i as integer
Private Sub form_load()
    timer1.interval=1000'每过一秒执行一次
    
End SubPrivate Sub Timer1_Timer()
    i=i+1
    if i>=3600 then
        DoEvent
        i=0
     end if
End Sub

Answer 8

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

Answer 9

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

Answer 10

to diclover(拥有四片叶子的三叶草)看清楚了， 是 if format(now,"NN:SS")="00:00" then