求助定时修改

1182410163

定时求助 1.e (3.43 KB, 下载次数: 4)

2025-6-19 13:44 上传

点击文件名下载附件   要求每天24小时 循环间隔10小时 18分 闹铃响一次

laihobglei

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_首次启动	逻辑型
集_下次响铃时间	日期时间型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

集_首次启动 ＝ 真
时钟1.时钟周期 ＝ 1000

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
当前时间	日期时间型

当前时间 ＝ 取现行时间 ()
如果真 (集_首次启动)
集_下次响铃时间 ＝ 增减时间 (当前时间, #小时, 10)
集_下次响铃时间 ＝ 增减时间 (集_下次响铃时间, #分钟, 18)
集_首次启动 ＝ 假
如果真 (当前时间 ≥ 集_下次响铃时间)
闹钟子程序 ()
' 设置下一次响铃时间（10小时18分钟后）
集_下次响铃时间 ＝ 增减时间 (当前时间, #小时, 10)
集_下次响铃时间 ＝ 增减时间 (集_下次响铃时间, #分钟, 18)

子程序名	返回值类型	公开	备 注
闹钟子程序

输出调试文本 (“闹钟触发于：” ＋ 到文本 (取现行时间 ()))

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_首次启动, 逻辑型<br /> .程序集变量 集_下次响铃时间, 日期时间型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 集_首次启动 ＝ 真<br /> 时钟1.时钟周期 ＝ 1000<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 当前时间, 日期时间型<br /> <br /> 当前时间 ＝ 取现行时间 ()<br /> .如果真 (集_首次启动)<br />     集_下次响铃时间 ＝ 增减时间 (当前时间, #小时, 10)<br />     集_下次响铃时间 ＝ 增减时间 (集_下次响铃时间, #分钟, 18)<br />     集_首次启动 ＝ 假<br /> .如果真结束<br /> .如果真 (当前时间 ≥ 集_下次响铃时间)<br />     闹钟子程序 ()<br />     ' 设置下一次响铃时间（10小时18分钟后）<br />     集_下次响铃时间 ＝ 增减时间 (当前时间, #小时, 10)<br />     集_下次响铃时间 ＝ 增减时间 (集_下次响铃时间, #分钟, 18)<br /> .如果真结束<br /> <br /> <br /> .子程序 闹钟子程序<br /> <br /> 输出调试文本 (“闹钟触发于：” ＋ 到文本 (取现行时间 ()))

影纸

定时求助.e (5.95 KB, 下载次数: 1)

2025-6-19 14:16 上传

点击文件名下载附件

1182410163

影纸 发表于 2025-6-19 14:16

不对 不能分开  是设置10小时 15分 间隔 10小时执行闹钟

1173847128

https://bbs.125.la/forum.php?mod ... =%E9%97%B9%E9%92%9F

1173847128

看看别人写好的功能好用多了

chenzao1

这很难吗？