如何让程序定时间运行和暂停运行？

misca

如何让程序在每天某一段时间内停止运行，过了这段时间就继续运行？
我举个例子：
比如我想做个挂机软件，每天从00:00:00开始运行到夜里22:59：00，然后暂停一个小时，到了00:00:00就自动继续运行，该怎么写？

Wm邪少

  

子程序名	返回值类型	公开	备 注
判断	逻辑型

变量名	类 型	静态	数组	备 注
日期	文本型
开始时间	日期时间型
停止时间	日期时间型
现在时间	日期时间型
i	整数型

如果真 (取数组成员数 (全局_开始时间) ＝ 0)
返回 (真)
如果真 (取数组成员数 (全局_停止时间) ＝ 0)
返回 (真)
日期 ＝ 时间到文本 (取现行时间 (), 2)
现在时间 ＝ 取现行时间 ()
计次循环首 (取数组成员数 (全局_开始时间), i)
开始时间 ＝ 到时间 (日期 ＋ 全局_开始时间 [i])
停止时间 ＝ 到时间 (日期 ＋ 全局_停止时间 [i])
如果真 (开始时间 ＞ 停止时间)
停止时间 ＝ 增减时间 (停止时间, 5, 1)
如果真 (开始时间 ＜ 现在时间 且 现在时间 ＜ 停止时间)
返回 (假)

计次循环尾 ()
返回 (真)

.版本 2<br /> <br /> .子程序 判断, 逻辑型<br /> .局部变量 日期, 文本型<br /> .局部变量 开始时间, 日期时间型<br /> .局部变量 停止时间, 日期时间型<br /> .局部变量 现在时间, 日期时间型<br /> .局部变量 i, 整数型<br /> <br /> .如果真 (取数组成员数 (全局_开始时间) ＝ 0)<br /> 返回 (真)<br /> .如果真结束<br /> .如果真 (取数组成员数 (全局_停止时间) ＝ 0)<br /> 返回 (真)<br /> .如果真结束<br /> 日期 ＝ 时间到文本 (取现行时间 (), 2)<br /> 现在时间 ＝ 取现行时间 ()<br /> <br /> <br /> .计次循环首 (取数组成员数 (全局_开始时间), i)<br /> 开始时间 ＝ 到时间 (日期 ＋ 全局_开始时间 <i>)<br /> 停止时间 ＝ 到时间 (日期 ＋ 全局_停止时间 <i>)<br /> .如果真 (开始时间 ＞ 停止时间)<br /> 停止时间 ＝ 增减时间 (停止时间, 5, 1)<br /> .如果真结束<br /> .如果真 (开始时间 ＜ 现在时间 且 现在时间 ＜ 停止时间)<br /> 返回 (假)<br /> .如果真结束<br /> <br /> <br /> .计次循环尾 ()<br /> 返回 (真)

就给5分。。。我还给你写了源码，一定要采纳！


补充内容 (2015-8-1 23:37):
不对，复制错子程序了，稍等

galbendanmy

把你要执行的那个子程序最前面加个判断，如果不在这个时间范围内就不执行。时间就取系统的。编辑框1.内容 ＝ 到文本 (取小时 (取现行时间 ())) ＋ “:” ＋ 到文本 (取分钟 (取现行时间 ())) ＋ “:” ＋ 到文本 (取秒 (取现行时间 ()))

Wm邪少

  

子程序名	返回值类型	公开	备 注
判断啊	逻辑型
参数名	类 型	参考	可空	数组	备 注
开始时间	日期时间型
停止时间	日期时间型

变量名	类 型	静态	数组	备 注
现在时间	日期时间型

现在时间 ＝ 取现行时间 ()
如果真 (开始时间 ＞ 停止时间)
停止时间 ＝ 增减时间 (停止时间, 5, 1)
如果真 (开始时间 ＜ 现在时间 且 现在时间 ＜ 停止时间)
返回 (真)
返回 (假)

.版本 2<br /> <br /> .子程序 判断啊, 逻辑型<br /> .参数 开始时间, 日期时间型<br /> .参数 停止时间, 日期时间型<br /> .局部变量 现在时间, 日期时间型<br /> <br /> 现在时间 ＝ 取现行时间 ()<br /> .如果真 (开始时间 ＞ 停止时间)<br /> 停止时间 ＝ 增减时间 (停止时间, 5, 1)<br /> .如果真结束<br /> .如果真 (开始时间 ＜ 现在时间 且 现在时间 ＜ 停止时间)<br /> 返回 (真)<br /> .如果真结束<br /> 返回 (假)

这此对了

4444nn

q453618847 发表于 2015-8-1 23:40
[e=1].版本 2

.子程序 判断啊, 逻辑型

我不得不给你点个赞！