倒计时如何设置

冷梦小月

大家好，我是一个易语言初学者，现在我有一个问题：

1：如何用编辑框1内输入的秒数，
2：让标签1，出现编辑框1的倒计时；

最终要达到的目的是，点击某个选项后，输入时间，显示倒计时，倒计时结束，然后自动按下选定的区域；

下面是我的代码，请给位老司机指导一二；

谢谢







.

大司命

  

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

标签1.标题 ＝ 编辑框1.内容
时钟1.时钟周期 ＝ 1000

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

变量名	类 型	静态	数组	备 注
i	整数型

i ＝ 到整数 (标签1.标题) － 1
标签1.标题 ＝ 到文本 (i)
如果真 (i ≤ 0)
时钟1.时钟周期 ＝ 0
' 执行事件~

.子程序 __启动窗口_创建完毕<br /> 标签1.标题 ＝ 编辑框1.内容<br /> 时钟1.时钟周期 ＝ 1000<br /> .子程序 _时钟1_周期事件<br /> .局部变量 i, 整数型<br /> i ＝ 到整数 (标签1.标题) － 1<br /> 标签1.标题 ＝ 到文本 (i)<br /> .如果真 (i ≤ 0)<br />     时钟1.时钟周期 ＝ 0<br />     ' 执行事件~<br /> .如果真结束

路痴╰つ

你的代码呢。。。

冷梦小月

路痴╰つ 发表于 2018-8-24 17:03
你的代码呢。。。

.版本 2
.支持库 eAPI
.支持库 shellEx

.程序集 窗口程序集_1
.程序集变量 F1, 整数型
.程序集变量 F2, 整数型
.程序集变量 计数, 整数型

.子程序 _按钮1_被单击

.如果 (编辑框1.内容 ＝ 到文本 (计数))
    信息框 (“请输入时间”, 0, “提示”, )
.否则
    时钟1.时钟周期 ＝ 到数值 (编辑框1.内容)
.如果结束


.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 0


.子程序 _时钟1_周期事件

' 时钟1.时钟周期 ＝ 1000
.如果 (单选框1.选中 ＝ 真)
    模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 0)
.否则
    .如果 (单选框2.选中 ＝ 真)
        模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 1)
    .否则
        ' 如果 (单选框3.选中 ＝ 真)
        ' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 2)
        ' 如果 (单选框5.选中 ＝ 真)
        ' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 3)

    .如果结束

.如果结束

计数 ＝ 计数 － 1
.如果 (计数 ＞ 0)
    标签4.标题 ＝ 到文本 (计数)
.否则

.如果结束


.子程序 _标签3_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型

.如果真 (参数一 ＝ F1)
    _按钮1_被单击 ()
.如果真结束

.如果真 (参数二 ＝ F2)
    _按钮2_被单击 ()
.如果真结束


.子程序 __启动窗口_创建完毕

F1 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F1键)
F2 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F2键)

计数 ＝ 计数 － 1
标签4.标题 ＝ 到文本 (计数)  ' 在标签上显示倒计时；
时钟1.时钟周期 ＝ 1000  ' 时钟周期为1秒,即一秒钟变动一次倒计时；

冷梦小月

大司命 发表于 2018-8-24 17:05

  

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

标签1.标题 ＝ 编辑框1.内容
[/quote]
[e=1].版本 2

窗口程序集名	保 留	保 留	备 注
窗口程序集_1
变量名	类 型	数组	备 注
F1	整数型
F2	整数型
计数	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (编辑框1.内容 ＝ 到文本 (计数))
信息框 (“请输入时间”, 0, “提示”, )
时钟1.时钟周期 ＝ 到数值 (编辑框1.内容)

子程序名	返回值类型	公开	备 注
_按钮2_被单击

时钟1.时钟周期 ＝ 0

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

' 时钟1.时钟周期 ＝ 1000
如果 (单选框1.选中 ＝ 真)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 0)
如果 (单选框2.选中 ＝ 真)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 1)
' 如果 (单选框3.选中 ＝ 真)
' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 2)
' 如果 (单选框5.选中 ＝ 真)
' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 3)


计数 ＝ 计数 － 1
如果 (计数 ＞ 0)
标签4.标题 ＝ 到文本 (计数)

子程序名	返回值类型	公开	备 注
_标签3_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

如果真 (参数一 ＝ F1)
_按钮1_被单击 ()

如果真 (参数二 ＝ F2)
_按钮2_被单击 ()

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

F1 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F1键 )
F2 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F2键 )
计数 ＝ 计数 － 1
标签4.标题 ＝ 到文本 (计数)  ' 在标签上显示倒计时；
时钟1.时钟周期 ＝ 1000  ' 时钟周期为1秒,即一秒钟变动一次倒计时；

i支持库列表	支持库注释
eAPI	应用接口支持库
shellEx	扩展功能支持库一

.子程序 __启动窗口_创建完毕<br /> 标签1.标题 ＝ 编辑框1.内容</blockquote></div><br /> [e=1].版本 2<br /> .支持库 eAPI<br /> .支持库 shellEx<br /> <br /> .程序集 窗口程序集_1<br /> .程序集变量 F1, 整数型<br /> .程序集变量 F2, 整数型<br /> .程序集变量 计数, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (编辑框1.内容 ＝ 到文本 (计数))<br />     信息框 (“请输入时间”, 0, “提示”, )<br /> .否则<br />     时钟1.时钟周期 ＝ 到数值 (编辑框1.内容)<br /> .如果结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 时钟1.时钟周期 ＝ 0<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> ' 时钟1.时钟周期 ＝ 1000<br /> .如果 (单选框1.选中 ＝ 真)<br />     模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 0)<br /> .否则<br />     .如果 (单选框2.选中 ＝ 真)<br />         模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 1)<br />     .否则<br />         ' 如果 (单选框3.选中 ＝ 真)<br />         ' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 2)<br />         ' 如果 (单选框5.选中 ＝ 真)<br />         ' 模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 3)<br /> <br />     .如果结束<br /> <br /> .如果结束<br /> <br /> 计数 ＝ 计数 － 1<br /> .如果 (计数 ＞ 0)<br />     标签4.标题 ＝ 到文本 (计数)<br /> .否则<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 _标签3_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> <br /> .如果真 (参数一 ＝ F1)<br />     _按钮1_被单击 ()<br /> .如果真结束<br /> <br /> .如果真 (参数二 ＝ F2)<br />     _按钮2_被单击 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> F1 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F1键)<br /> F2 ＝ zc热键 (_启动窗口.取窗口句柄 (), 标签3.取窗口句柄 (), 0, #F2键)<br /> <br /> 计数 ＝ 计数 － 1<br /> 标签4.标题 ＝ 到文本 (计数)  ' 在标签上显示倒计时；<br /> 时钟1.时钟周期 ＝ 1000  ' 时钟周期为1秒,即一秒钟变动一次倒计时；

冷梦小月

大司命 发表于 2018-8-24 17:05
[e=5]
.子程序 __启动窗口_创建完毕
标签1.标题 ＝ 编辑框1.内容

能帮我看看，我的问题在哪里吗？ 帮我理理思路，非常感谢

冷梦小月