易语言怎么写倒计时( 三 ) _倒计时

倒计时 = 时间_到秒（到数值（编辑框1.内容）， 2)
.判断（选择列表框1.现行选中项 = 1）
标签1.标题 = 时间_格式化（时间_到秒（到数值（编辑框1.内容）， 1))
倒计时 = 时间_到秒（到数值（编辑框1.内容）， 1)
.判断（选择列表框1.现行选中项 = 2）
标签1.标题 = 时间_格式化（到数值（编辑框1.内容））
倒计时 = 到数值（编辑框1.内容）
.默认.判断结束时钟1.时钟周期 = 1000.子程序 _时钟1_周期事件倒计时 = 倒计时 - 1
标签1.标题 = 时间_格式化（倒计时）.子程序时间_格式化，文本型
.参数秒，整数型
.局部变量分，整数型
.局部变量时，整数型
.局部变量天，整数型
.局部变量初始化格式，文本型.判断循环首（秒 >59）
分 = 分 + 1
秒 = 秒 - 60
.判断循环尾（）
.判断循环首（分 >59）
时 = 时 + 1
分 = 分 - 60
.判断循环尾（）
.判断循环首（时 >23）
天 = 天 + 1
时 = 时 - 24
.判断循环尾（）
.如果（天 = 0）
初始化格式 = 时间_格式化2 （时） + “小时” + 时间_格式化2 （分） + “分钟” + 时间_格式化2 （秒） + “秒”
.否则
初始化格式 = 到文本（天） + “天 ” + 时间_格式化2 （时） + “小时” + 时间_格式化2 （分） + “分钟” + 时间_格式化2 （秒） + “秒”
.如果结束返回（初始化格式）.子程序时间_格式化2，文本型
.参数时间，整数型
.局部变量格式化，文本型.判断开始（时间格式化 = “0” + 到文本（时间）
.判断（时间 = 0）
格式化 = “00”
.默认
格式化 = 到文本（时间）
.判断结束
返回（格式化）.子程序时间_到秒，整数型
.参数时间，整数型
.参数时间类型，整数型，， 1：分 2：时 3：天
.局部变量秒，整数型.判断开始（时间类型 = 1）
秒 = 时间 * 60
.判断（时间类型 = 2）
秒 = 时间 * 3600
.判断（时间类型 = 3）
秒 = 时间 * 24 * 3600
.默认.判断结束返回（秒）
7. 如何用易语言写一个10秒倒计时程序汗，你和qianqian_918的问题竟然是一模一样的，是同一个人吗？
我回答也fuz复制下吧
.版本 2
.程序集窗口程序集1
.程序集变量 a，整数型
.子程序 _按钮1_被单击
时钟1.时钟周期 = 1000
a = 10
.子程序 _时钟1_周期事件
.如果（a >0）
a = a - 1
.否则
时钟1.时钟周期 = 0
信息框（“10秒已经到了！”， 0, ）

文章插图