求一个简单的易语言源码,取系统运行时间的
如题、求一个取系统运行时间的源码、要有毫秒、分、时、天、月。如:您的系统已连续运行2个月2天2小时2分2秒2毫秒要易语言的啊、各位...
如题、求一个取系统运行时间的源码、要有毫秒、分、时、天、月。如:您的系统已连续运行2个月2天2小时2分2秒2毫秒
要易语言的啊、各位 展开
要易语言的啊、各位 展开
展开全部
月数不好定,因为每个月天数不一样。算到天就行了。
代码如下:
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 运行时间, 整数型, , , 毫秒
运行时间 = 取启动时间 ()
调试输出 (取毫秒到天 (运行时间))
.子程序 取毫秒到天, 文本型
.参数 参_秒, 整数型
.局部变量 参_秒, 整数型
.局部变量 天, 整数型
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
.局部变量 秒, 整数型
参_秒 = 取启动时间 () ÷ 1000
天 = 参_秒 ÷ 60 ÷ 60 ÷ 24
小时 = (参_秒 - 天 × 24 × 3600) ÷ 3600
分钟 = (参_秒 - 天 × 24 × 3600 - 小时 × 3600) ÷ 60
秒 = 参_秒 % 60
返回 (到文本 (天) + “天” + 到文本 (小时) + “小时” + 到文本 (分钟) + “分钟” + 到文本 (秒) + “秒”)
代码如下:
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 运行时间, 整数型, , , 毫秒
运行时间 = 取启动时间 ()
调试输出 (取毫秒到天 (运行时间))
.子程序 取毫秒到天, 文本型
.参数 参_秒, 整数型
.局部变量 参_秒, 整数型
.局部变量 天, 整数型
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
.局部变量 秒, 整数型
参_秒 = 取启动时间 () ÷ 1000
天 = 参_秒 ÷ 60 ÷ 60 ÷ 24
小时 = (参_秒 - 天 × 24 × 3600) ÷ 3600
分钟 = (参_秒 - 天 × 24 × 3600 - 小时 × 3600) ÷ 60
秒 = 参_秒 % 60
返回 (到文本 (天) + “天” + 到文本 (小时) + “小时” + 到文本 (分钟) + “分钟” + 到文本 (秒) + “秒”)
追问
大神大哥、我是超级新新手、我整了半天还是没办法弄出来、可否.e源码打包发我邮箱、万分感激不尽、dodo5000@qq.com 主要.支持库spec不会弄。再给加分哦、我所有分都倾尽全部给大哥、
追答
代码上次了
展开全部
需要组件:一个时钟、一个标签.版本 2.程序集 窗口程序集1
.程序集变量 现在时, 文本型
.程序集变量 现在时位数, 文本型
.程序集变量 现在分, 文本型
.程序集变量 现在分位数, 文本型
.程序集变量 现在秒, 文本型
.程序集变量 现在秒位数, 文本型.子程序 __启动窗口_创建完毕时钟1.时钟周期 = 1000.子程序 _时钟1_周期事件现在时 = 到文本 (取整 (取启动时间 () ÷ 1000 ÷ 60 ÷ 60))
现在分 = 到文本 (取整 (取启动时间 () ÷ 1000 ÷ 60 % 60))
现在秒 = 到文本 (取整 (取启动时间 () ÷ 1000 % 60))
现在时位数 = 到文本 (取文本长度 (现在时))
现在分位数 = 到文本 (取文本长度 (现在分))
现在秒位数 = 到文本 (取文本长度 (现在秒))
.如果真 (现在时位数 = “1”)
现在时 = “0” + 现在时
.如果真结束.如果真 (现在分位数 = “1”)
现在分 = “0” + 现在分
.如果真结束.如果真 (现在秒位数 = “1”)
现在秒 = “0” + 现在秒
.如果真结束
标签1.标题 = 现在时 + “:” + 现在分 + “:” + 现在秒
.程序集变量 现在时, 文本型
.程序集变量 现在时位数, 文本型
.程序集变量 现在分, 文本型
.程序集变量 现在分位数, 文本型
.程序集变量 现在秒, 文本型
.程序集变量 现在秒位数, 文本型.子程序 __启动窗口_创建完毕时钟1.时钟周期 = 1000.子程序 _时钟1_周期事件现在时 = 到文本 (取整 (取启动时间 () ÷ 1000 ÷ 60 ÷ 60))
现在分 = 到文本 (取整 (取启动时间 () ÷ 1000 ÷ 60 % 60))
现在秒 = 到文本 (取整 (取启动时间 () ÷ 1000 % 60))
现在时位数 = 到文本 (取文本长度 (现在时))
现在分位数 = 到文本 (取文本长度 (现在分))
现在秒位数 = 到文本 (取文本长度 (现在秒))
.如果真 (现在时位数 = “1”)
现在时 = “0” + 现在时
.如果真结束.如果真 (现在分位数 = “1”)
现在分 = “0” + 现在分
.如果真结束.如果真 (现在秒位数 = “1”)
现在秒 = “0” + 现在秒
.如果真结束
标签1.标题 = 现在时 + “:” + 现在分 + “:” + 现在秒
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
给你一个思路 用取启动时间 () 把支持库全部选上 获取电脑的启动时间是毫秒 1秒= 1000毫秒
放在时钟里计算把。。
放在时钟里计算把。。
追问
求写好的源码。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用 取启动时间()命令,返回的是系统启动后到现在为止所经历过的毫秒数。
具体代码自己去换算就可以了
具体代码自己去换算就可以了
追问
求写好的源码。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询