
运行(“C:\123.exe”,假,)
延迟(60000)‘单位是毫秒
这里指1分
终止进程
(“123.exe”)
或者
.子程序_按钮1_被单击
标签1.标题=“0”
运行(“C:\123.exe”,假,)
时钟1.时钟周期=1000‘单位是毫秒
这里指1秒
.子程序
_时钟1_周期事件
标签1.标题=到文本(到数值(标签1.标题)+1)
.如果真(标签1.标题=60)’这里指1分
终止进程(“1.exe”)
利用取启动时间
()
.版本
2
.程序集
窗口程序集1
.程序集变量
启动时时间,
整数型
.程序集变量
运行总时间,
整数型
.子程序
_时钟1_周期事件
.局部变量
时,
文本型
.局部变量
分,
文本型
.局部变量
秒,
文本型
运行总时间
=
取启动时间
()
-
启动时时间
'
求从程序启动到现在的毫秒数
秒
=
到文本
(取整
(运行总时间
÷
1000)
%
60)
'
求秒数
分
=
到文本
(取整
(运行总时间
÷
60000)
%
60)
'
求分数
时
=
到文本
(取整
(运行总时间
÷
3600000))
'
求时数
.如果真
(取文本长度
(秒)
=
1)
'
将秒的为什固定到2位
秒
=
“0”
+
秒
.如果真结束
.如果真
(取文本长度
(分)
=
1)
'
将分的为什固定到2位
分
=
“0”
+
分
.如果真结束
.如果真
(取文本长度
(时)
=
1)
'
将时的为什固定到2位
时
=
“0”
+
时
.如果真结束
.如果真
(标签1.标题
≠
时
+
“:”
+
分
+
“:”
+
秒)
'
减低标签1刷新频率,防止出现闪动现象
标签1.标题
=
时
+
“:”
+
分
+
“:”
+
秒
.如果真结束
.子程序
__启动窗口_创建完毕
启动时时间
=
取启动时间
()
'
置启动时时间的初始值
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)