|
发表于 2013-7-17 13:42:23
|
显示全部楼层
江西省九江市
[e]
.版本 2
.局部变量 年, 文本型
.局部变量 月, 文本型
.局部变量 日, 文本型
.局部变量 时, 文本型
.局部变量 分, 文本型
.局部变量 秒, 文本型
编辑框1.内容 = 时间_到文本 (取现行时间 ())
年 = 文本_取出中间文本 (编辑框1.内容, “”, “年”)
月 = 文本_取出中间文本 (编辑框1.内容, “年”, “月”)
日 = 文本_取出中间文本 (编辑框1.内容, “月”, “日”)
时 = 文本_取出中间文本 (编辑框1.内容, “日”, “时”)
分 = 文本_取出中间文本 (编辑框1.内容, “时”, “分”)
秒 = 文本_取出中间文本 (编辑框1.内容, “分”, “秒”)
编辑框2.内容 = 年 + “年” + 月 + “月” + 日 + “日” + 时 + “时” + 到文本 (到整数 (分) + 10) + “分” + 秒 + “秒”
.子程序 _时钟1_周期事件
编辑框1.内容 = 时间_到文本 (取现行时间 ())
.如果真 (编辑框1.内容 = 编辑框2.内容)
信息框 (“时间到了”, 0, )
.如果真结束
[/e] |
|