易语言倒计时怎么写( 二 )


.局部变量 天, 整数型
.局部变量 初始化格式, 文本型.判断循环首 (秒 >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
.默认.判断结束返回 (秒)
5. 易语言怎么做倒计时
================
.版本 2
.程序集 窗口程序集1
.程序集变量 分, 整数型
.程序集变量 秒, 整数型
.程序集变量 时, 整数型
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 = 1000
分 = 59
秒 = 60
时 = 2
.子程序 _时钟1_周期事件
.如果真 (秒 = 0)
秒 = 60 ' 当倒计时秒从60到0的时候,重新从60开始
分 = 分 - 1
.如果真结束
.如果真 (分 = 0)
分 = 60
时 = 时 - 1
.如果真结束
秒 = 秒 - 1
编辑框1.内容 = “距离关机还有 :” + 到文本 (时) + “:” + 到文本 (分) + “:” + 到文本 (秒)
' 用标签也可以 。
6. 易语言倒计时关机的源码怎么写 开始倒计时是按钮1,重置是按钮2 .版本 2 .支持库 shell .程序集 窗口程序集1 .子程序 _按钮1_被单击 .判断开始 (到数值 (编辑框1.内容) > 24 或 到数值 (编辑框1.内容) 信息框 (“输入正确的时间”, 0, ) 返回 () .判断 (到数值 (编辑框2.内容) > 60 或 到数值 (编辑框2.内容) 信息框 (“输入正确的时间”, 0, ) 返回 () .判断 (编辑框1.内容 = “”) .如果 (编辑框2.内容 = “”) 信息框 (“您还没有输入关闭系统的时间”, 0, ) 返回 () .否则 时钟1.时钟周期 = 到整数 (编辑框1.内容) * 60 * 60 * 1000 + 到整数 (编辑框2.内容) * 60 * 1000 编辑框1.禁止 = 真 编辑框2.禁止 = 真 按钮1.禁止 = 真 信息框 (“系统将在” + 到文本 (时钟1.时钟周期 ÷ 1000) + “分后关机”, 0, ) .如果结束 .判断 (编辑框2.内容 = “”) .如果 (编辑框1.内容 = “”) 信息框 (“您还没有输入关闭系统的时间”, 0, ) .否则 时钟1.时钟周期 = 到整数 (编辑框1.内容) * 60 * 60 * 1000 + 到整数 (编辑框2.内容) * 60 * 1000 编辑框1.禁止 = 真 编辑框2.禁止 = 真 按钮1.禁止 = 真 信息框 (“系统将在” + 到文本 (时钟1.时钟周期 ÷ 1000) + “分后关机”, 0, ) .如果结束 .默认 .如果真 (编辑框1.内容 ≠ “” 且 编辑框2.内容 ≠ “”) 时钟1.时钟周期 = 到整数 (编辑框1.内容) * 60 * 60 * 1000 + 到整数 (编辑框2.内容) * 60 * 1000 编辑框1.禁止 = 真 编辑框2.禁止 = 真 按钮1.禁止 = 真 信息框 (“系统将在” + 到文本 (时钟1.时钟周期 ÷ 1000) + “分后关机”, 0, ) .如果真结束 .判断结束 .子程序 _时钟1_周期事件 关闭系统 (#关机, 真) 结束 () .子程序 __启动窗口_创建完毕 编辑框1.输入方式 = 7 编辑框2.输入方式 = 7 .子程序 _按钮2_被单击 时钟1.时钟周期 = 0 按钮1.禁止 = 假 编辑框1.禁止 = 假 编辑框2.禁止 = 假 编辑框1.内容 = “” 编辑框2.内容 = “” ============================不懂追问=========================== 。