易语言请教写统计程序

如图，这个统计怎样写。统计时间为小时.分钟。秒，最好那位兄弟有时间帮我写个，在此先谢过。油箱[email protected]

统计什么的统计时间 ，能说清楚吗？

.版本 2

.程序集 窗口程序集1 .程序集变量 开始时间, 日期时间型

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

.子程序 把秒转换为时间文本, 文本型 .参数 被处理时间, 长整数型 .局部变量 年, 整数型 .局部变量 月, 整数型 .局部变量 日, 整数型 .局部变量 时, 整数型 .局部变量 分, 整数型 .局部变量 秒, 整数型

.如果真 (被处理时间 ≥ 31536000)     年 ＝ 取整 (四舍五入 (被处理时间 ÷ 31536000, 2))     被处理时间 ＝ 被处理时间 ％ 31536000 .如果真结束 .如果真 (被处理时间 ≥ 2592000)     月 ＝ 取整 (四舍五入 (被处理时间 ÷ 2592000, 2))     被处理时间 ＝ 被处理时间 ％ 2592000 .如果真结束 .如果真 (被处理时间 ≥ 86400)     日 ＝ 取整 (四舍五入 (被处理时间 ÷ 86400, 2))     被处理时间 ＝ 被处理时间 ％ 86400 .如果真结束 .如果真 (被处理时间 ≥ 3600)     时 ＝ 取整 (四舍五入 (被处理时间 ÷ 3600, 2))     被处理时间 ＝ 被处理时间 ％ 3600 .如果真结束 .如果真 (被处理时间 ≥ 60)     分 ＝ 取整 (四舍五入 (被处理时间 ÷ 60, 2))     被处理时间 ＝ 被处理时间 ％ 60 .如果真结束 秒 ＝ 被处理时间 .如果真 (年 ＞ 0)     返回 (到文本 (年) ＋ “年” ＋ 到文本 (月) ＋ “月” ＋ 到文本 (日) ＋ “日” ＋ 到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”) .如果真结束 .如果真 (月 ＞ 0)     返回 (到文本 (月) ＋ “月” ＋ 到文本 (日) ＋ “日” ＋ 到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”) .如果真结束 .如果真 (日 ＞ 0)     返回 (到文本 (日) ＋ “日” ＋ 到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”) .如果真结束 .如果真 (时 ＞ 0)     返回 (到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”) .如果真结束 .如果真 (分 ＞ 0)     返回 (到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”) .如果真结束 .如果真 (秒 ＞ 0)     返回 (到文本 (秒) ＋ “秒”) .如果真结束 返回 (“”)

.子程序 _按钮1_被单击

' 开始时间 ＝ 取现行时间 () 开始时间 ＝ 到时间 (“2010/5/7/20/15/0”) 时钟1.时钟周期 ＝ 1000

.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 0

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

秒 ＝ 取时间间隔 (取现行时间 (), 开始时间, #秒) 标签1.标题 ＝ 把秒转换为时间文本 (秒)

邮箱不就是[email protected]么

好的，给你发

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！