我有个程序（通过api获取库存），我想让它每隔3个小时执行一遍，求各位高手指点思路（代码也行）！

发布网友发布时间：2022-06-04 04:37

共2个回答

热心网友时间：2023-10-26 17:17

加个定时器(timer1)，设计 .Interval 值为 60000(一分钟) 因为定时器最高赋值为 65535 毫秒，等于 1 分钟多一些。
思路是用每一分触发一次的定时器去判断是否一共触发了180分钟，然后执行你要执行的程序
代码如下:
首先声明: dim i AS byte

Private Sub Timer1_Timer()
If i = 180 Then '到三个小时 180分钟
'你要执行的语句
Else
i = i + 1 '加一分钟直至到3个小时
End If
End Sub

热心网友时间：2023-10-26 17:17

这个用时间控件就可以解决了，
将timer1.interval的值设定为10800000
望采纳！

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com