VB中的timer控件的interval属性怎么设置是一个小时

Question

VB中的timer控件的interval属性怎么设置是每天运行一次

Answer 1

这个设置不了，最大的秒数也不够的，但可以这样：
设置全局变量：
dim js as inter

load时：
js =24*60*10 '得到24小时的分钟的10倍
timer1.interval = 6000 '6秒计数一次

在timer1事件中：
js = js -1 '每6秒减一，如果为0，就一天了
if js = 0 then
'执行一天一次的命令
js =24*60*10
end if