如何每隔30分鐘運行一指令,timer可以同嗎?
如何每隔30分鐘運行一指令,timer可以同嗎?
每個timer的限制是65000, 如果可以用,要加30個timer嗎?
有沒有其他代碼可取代?
可不可寫出來看看
[解决办法]
做一个计数器嘛.为什么一定要一口气跑完呢?
你将timer设为60000(一分钟) .再做一个全局变量或者静态变态.
每timer一次,变量+1.当计到30次时,变量清零,并执行你特定代码即可
[解决办法]
汗一个!楼主的思路.....好怪。:-)
设置TIMER的时间间隔为1钟。放一个数值变量,然后在TIMER的TIMER事件中累加这个变量,如果达到30,就执行你的指令。并将此变量重新设置为0!
代码应该类似:
Private t As Integer
Private Sub Timer1_Timer()
If t = 30 Then
t = 0
Call myprog 'myprog 是你要执行的指令或过程
Else
t = t + 1
End If
End Sub
需要注意的是,TIMER的精度不高,可能会有一点点的误差。不过以分钟来计量的时间,几秒钟的误差应该是可以接受的!
还有一种方式是用t 计下开始时的时间,每次TIMER事件中与系统现在的时间相比较,效果一样。