弄了一个闹钟提醒的小程序，但是出现提前提醒了，这是.....

sjround

云少i 发表于 2022-11-23 08:00
把计次循环里面的如果真做成子程序，改为线程启动、

不好意思，我是初学者不太懂你的意思

sjround

云少i 发表于 2022-11-23 08:00
把计次循环里面的如果真做成子程序，改为线程启动、

你好，我改为线程启动了，还是出现一样的问题

  

计次循环首 (超级列表框1.取表项数 (), )
C ＝ 超级列表框1.取标题 (B, )
B ＝ B ＋ 1
启动线程 (&子程序1, , )
计次循环尾 ()
B ＝ 0

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

如果真 (到数值 (集_时间戳) ≤ 到数值 (时间_到时间戳 (取现行时间 (), 真, )))
时钟2.时钟周期 ＝ 0
播放音乐 ( #声音1, )
信息框 (超级列表框1.取标题 (B － 1, ) ＋ “,时间到”, #置顶, “时间到啦~”, )
超级列表框2.插入表项 (, 超级列表框1.取标题 (B － 1, ) ＋ “,时间到”, , , , )
停止播放 ()
超级列表框1.删除表项 (B － 1)
时钟2.时钟周期 ＝ 10

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), )<br /> <br />     C ＝ 超级列表框1.取标题 (B, )<br />     B ＝ B ＋ 1<br />     启动线程 (&子程序1, , )<br /> <br /> .计次循环尾 ()<br /> B ＝ 0<br /> <br /> <br /> .子程序 子程序1<br /> <br /> 如果真 (到数值 (集_时间戳) ≤ 到数值 (时间_到时间戳 (取现行时间 (), 真, )))<br /> 时钟2.时钟周期 ＝ 0<br /> 播放音乐 (#声音1, )<br /> 信息框 (超级列表框1.取标题 (B － 1, ) ＋ “,时间到”, #置顶, “时间到啦~”, )<br /> 超级列表框2.插入表项 (, 超级列表框1.取标题 (B － 1, ) ＋ “,时间到”, , , , )<br /> 停止播放 ()<br /> 超级列表框1.删除表项 (B － 1)<br /> 时钟2.时钟周期 ＝ 10

幻想大人

易语言闹钟源码，最简洁的
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14827683
(出处: 精易论坛)


这个我写的，你参考一下

bingqer

都是我要膜拜的前辈