|
分享源码
界面截图: |
- |
是否带模块: |
- |
备注说明: |
- |
.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 秒数, 整数型
.程序集变量 分数, 整数型
.程序集变量 时数, 整数型
.程序集变量 次数, 整数型
.子程序 _时钟1_周期事件
编辑框3.内容 = “0”
秒数 = 秒数 + 1
编辑框2.内容 = 到文本 (秒数)
.如果真 (秒数 = 60)
编辑框2.内容 = “0”
分数 = 分数 + 1
编辑框1.内容 = 到文本 (分数)
秒数 = 0
.如果真结束
编辑框1.内容 = 到文本 (分数)
.如果真 (分数 = 60)
编辑框1.内容 = “0”
时数 = 时数 + 1
编辑框3.内容 = 到文本 (时数)
分数 = 0
.如果真结束
.子程序 _按钮2_被单击
.判断开始 (时钟1.时钟周期 = 1000)
按钮2.标题 = “继续”
时钟1.时钟周期 = 0
.默认
按钮2.标题 = “暂停”
时钟1.时钟周期 = 1000
.判断结束
.子程序 _按钮3_单击
时钟1.时钟周期 = 0
编辑框1.内容 = “0”
编辑框2.内容 = “0”
分数 = 0
秒数 = 0
.子程序 _按钮1_被单击
时钟1.时钟周期 = 1000
.子程序 _按钮4_被单击
次数 = 次数 + 1
列表框1.加入项目 (“第” + 到文本 (次数) + “次” + “计次” + 到文本 (编辑框3.内容) + “时” + 到文本 (编辑框1.内容) + “分” + 到文本 (编辑框2.内容) + “秒”, )
|
-
-
时钟.e
6.7 KB, 下载次数: 253, 下载积分: 精币 -2 枚
wu
|