倒计时参考代码:
版本 2
程序集 窗口程序集1
子程序 _按钮1_被单击
子程序 _时钟1_周期事件
局部变量 数, 整数型
数 = 到数值 (编辑框1内容)
数 = 数 - 1
编辑框1内容 = 到文本 (数)
计时参考代码:
版本 2
程序集 窗口程序集1
程序集变量 计时, 整数型
子程序 _按钮1_被单击
计时 = 到数值 (编辑框1内容)
如果真 (计时 < 1)
信息框 (“错误,”, 0, )
返回 ()
如果真结束
时钟1时钟周期 = 1000
子程序 _时钟1_周期事件
计时 = 计时 - 1
编辑框1内容 = “倒计时还有:” + 到文本 (计时) + “秒”
如果真 (计时 = 15)
播放音乐 (“音乐”, )
如果真结束
如果真 (计时 = 0)
时钟1时钟周期 = 0
信息框 (“到计时已结束”, #确认钮 + #信息图标, “提示”)
如果真结束
窗口就一个时钟。看代码
==========================================================================
版本 2
支持库 eAPI
程序集 窗口程序集1
程序集变量 开启或关闭, 逻辑型
子程序 __启动窗口_按下某键, 逻辑型
参数 键代码, 整数型
参数 功能键状态, 整数型
如果真 (键代码 = #F9键)
如果 (时钟1时钟周期 = 0)
时钟1时钟周期 = 1 ' 这里改成自己想要的时钟周期
否则
时钟1时钟周期 = 0
如果结束
如果真结束
子程序 _时钟1_周期事件
模拟按键 (#F10键, , )
模拟按键 (#F11键, , )
==========================================================================
注意改时钟周期
这个方法有一个很大的弊端,就是必须窗口在焦点内f9才能起作用
如果觉得不行的话,可以使用超级模块
我这里不太会用这个模块
可能不太符合你的要求,你可以试试看
如果给分!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)