秒数与时分秒格式转换的代码
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
.版本 2
.程序集 窗口程序集1
.子程序 _秒数转换成时间按钮_被单击
.局部变量 总秒数
.局部变量 时
.局部变量 分
.局部变量 秒
总秒数 ＝ 到数值 (输入秒数编辑框.内容)
秒 ＝ 到数值 (输入秒数编辑框.内容)
分 ＝ 取整 (秒 ÷ 60)
秒 ＝ 秒 ％ 60
.如果真 (分 ≥ 60)
时 ＝ 取整 (分 ÷ 60)
分 ＝ 分 ％ 60
.如果真结束
信息框 (到文本 (总秒数) ＋ “秒 = ” ＋ 到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒”, 0, , )
.子程序 _时间转换成秒数按钮_被单击
.局部变量 时
.局部变量 分
.局部变量 秒
时 ＝ 到数值 (小时编辑框.内容)
分 ＝ 到数值 (分钟编辑框.内容)
秒 ＝ 到数值 (秒数编辑框.内容)
信息框 (到文本 (时) ＋ “时” ＋ 到文本 (分) ＋ “分” ＋ 到文本 (秒) ＋ “秒 = ” ＋ 到文本 (时 × 3600 ＋ 分 × 60 ＋ 秒) ＋ “秒”, 0, , )
|
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接