如何实现写 年月日时间 减 时间 登录结果

小睿

2013年6月1日23时60分
            6月5日23时60分
如何写 上边 减下边的 时间
手动计算结果应该是 96小时吧{:soso_e113:}应该是这个数吧 不知道对不对 请大家 教下如何写

dnpeter

已经达到您的要求, 请审核. 谢谢

[e]
.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

编辑框1.内容 ＝ 到文本 (取现行时间 ())

.子程序 _时钟1_周期事件
.局部变量 秒, 整数型
.局部变量 分, 整数型
.局部变量 时, 整数型
.局部变量 天, 整数型

编辑框2.内容 ＝ 到文本 (取现行时间 ())
秒 ＝ 取时间间隔 (取现行时间 (), 到时间 (编辑框1.内容), 8)
分 ＝ 绝对取整 (秒 ÷ 60)
时 ＝ 绝对取整 (分 ÷ 60)
天 ＝ 绝对取整 (时 ÷ 24)
编辑框4.内容 ＝ “当前已经运行:” ＋ 到文本 (天) ＋ “天” ＋ 到文本 (选择 (时 ÷ 24 ＝ 到整数 (分 ÷ 24), 0, 时 － 天 × 24)) ＋ “时” ＋ 到文本 (选择 (分 ÷ 60 ＝ 到整数 (分 ÷ 60), 0, 分 － 时 × 60)) ＋ “分” ＋ 到文本 (选择 (秒 ÷ 60 ＝ 到整数 (秒 ÷ 60), 0, 秒 － 分 × 60)) ＋ “秒”

[/e]

dnpeter

dnpeter 发表于 2013-5-26 09:34
已经达到您的要求, 请审核. 谢谢

[e]

增加附件: