| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 每隔半小时的代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23217) |
| -- 作者：blackzhu -- 发布时间：2012/9/6 7:52:00 -- 每隔半小时的代码 老大 ,我想在计划管理里面下一个代码, 类似于 if Date.Now.Hour = 15 then \'每天下午3:00中执行 这个代码改成每半小时执行一次.
|
| -- 作者：程兴刚 -- 发布时间：2012/9/6 8:09:00 -- 计划间隔设置为：1800000 |
| -- 作者：blackzhu -- 发布时间：2012/9/6 8:13:00 -- 啊 直接呀! |
| -- 作者：小猪鑫鑫 -- 发布时间：2012/9/6 20:07:00 -- 直接间隔1800000毫秒我知道怎么设，但BLACKZHU版主所说的 if Date.Now.Hour = 15 then \'每天下午3:00中执行 这个却是我希望的东西，但这个代码写在什么地方呢？请赐教！ |
| -- 作者：狐狸爸爸 -- 发布时间：2012/9/6 20:22:00 -- 计划间隔每分钟一次，代码： if Date.Now.Hour = 15 then 执行代码 MyTimers("计划名称").Enabled = False \'暂停计划 End if |
| -- 作者：blackzhu -- 发布时间：2012/9/7 7:34:00 -- 老大,我希望这句代码 if Date.Now.Hour = 15 then 改成是每半小时.
能改吗? |
| -- 作者：程兴刚 -- 发布时间：2012/9/7 9:15:00 -- 时间间隔：60000 if Date.Now.Hour mod 0.5 = 0 hen |
| -- 作者：RandyBoy -- 发布时间：2012/9/7 9:15:00 -- 定义一个全局变量，保存定时器执行时的时间，用当前时间减去上次执行的时间之差等于间隔的时间即可
|
| -- 作者：狐狸爸爸 -- 发布时间：2012/9/7 9:25:00 -- 以下是引用blackzhu在2012-9-7 7:34:00的发言：
老大,我希望这句代码 if Date.Now.Hour = 15 then 改成是每半小时. 能改吗?
前面老程不是说了吗? 将执行间隔设置为：
180000 |
| -- 作者：blackzhu -- 发布时间：2012/9/7 11:19:00 -- 明白了. |