易语言 中考 倒计时 计时器 精确到 天 时 分 秒 最好是源码 5
.版本 2
.程序集 窗口程序集1
.程序集变量 结束时间, 文本型
.程序集变量 时间, 日期时间型
.程序集变量 日, 文本型
.程序集变量 时, 文本型
.程序集变量 分, 文本型
.程序集变量 秒, 文本型
.程序集变量 终, 整数型
.子程序 __启动窗口_创建完毕
.计次循环首 (60, 终)
.如果真 (终 ≤ 24)
组合框1.加入项目 (到文本 (终 － 1) ＋ “时”, 终 － 1)
.如果真结束
组合框2.加入项目 (到文本 (终 － 1) ＋ “分”, 终 － 1)
组合框3.加入项目 (到文本 (终 － 1) ＋ “秒”, 终 － 1)
.计次循环尾 ()
组合框1.现行选中项 ＝ 0
组合框2.现行选中项 ＝ 0
组合框3.现行选中项 ＝ 0
按钮1.标题 ＝ “开始倒计时”
.子程序 _时钟1_周期事件
时间 ＝ 取现行时间 ()
日 ＝ 到文本 (取整 (取时间间隔 (到时间 (结束时间), 时间, 5)))
时 ＝ 到文本 (取整 (取时间间隔 (到时间 (结束时间), 时间, 6) ％ 24))
分 ＝ 到文本 (取整 (取时间间隔 (到时间 (结束时间), 时间, 7) ％ 60))
秒 ＝ 到文本 (取整 (取时间间隔 (到时间 (结束时间), 时间, 8) ％ 60))
标签2.标题 ＝ “中考还剩下:” ＋ 日 ＋ “天” ＋ 时 ＋ “小时” ＋ 分 ＋ “分钟” ＋ 秒 ＋ “秒”
.如果真 (日 ＝ “0” 且 时 ＝ “0” 且 分 ＝ “0” 且 秒 ＝ “0”)
时钟1.时钟周期 ＝ 0
播放音乐 (#mp3, )
结束 ()
.如果真结束
.子程序 _按钮1_被单击
结束时间 ＝ 到文本 (取日期 (日期框1.今天)) ＋ 组合框1.取项目文本 (组合框1.现行选中项) ＋ 组合框2.取项目文本 (组合框2.现行选中项) ＋ 组合框3.取项目文本 (组合框3.现行选中项)
.如果真 (到时间 (结束时间) ＜ 取现行时间 ())
结束 ()
.如果真结束
时钟1.时钟周期 ＝ 999
_时钟1_周期事件 ()
