易语言秒数与时分秒格式转换工具的代码

秒数与时分秒格式转换的代码

.版本 2

.程序集 窗口程序集1

.子程序 _秒数转换成时间按钮_被单击

.局部变量 总秒数

.局部变量 时

.局部变量 分

.局部变量 秒

总秒数 = 到数值 (输入秒数编辑框.内容)

秒 = 到数值 (输入秒数编辑框.内容)

分 = 取整 (秒 ÷ 60)

秒 = 秒 % 60

.如果真 (分 ≥ 60)

时 = 取整 (分 ÷ 60)

分 = 分 % 60

.如果真结束

信息框 (到文本 (总秒数) + “秒 = ” + 到文本 (时) + “时” + 到文本 (分) + “分” + 到文本 (秒) + “秒”, 0, , )

.子程序 _时间转换成秒数按钮_被单击

.局部变量 时

.局部变量 分

.局部变量 秒

时 = 到数值 (小时编辑框.内容)

分 = 到数值 (分钟编辑框.内容)

秒 = 到数值 (秒数编辑框.内容)

信息框 (到文本 (时) + “时” + 到文本 (分) + “分” + 到文本 (秒) + “秒 = ” + 到文本 (时 × 3600 + 分 × 60 + 秒) + “秒”, 0, , )

运行结果:

总结

以上是 易语言秒数与时分秒格式转换工具的代码 的全部内容, 来源链接: utcz.com/z/332950.html

回到顶部