易语言秒转月天时分秒
1个回答
展开全部
.版本 2 .子程序 __启动窗口_创建完毕 编辑框1.输入方式 = 8 .子程序 _按钮1_被单击 .局部变量 数值, 长整数型 .局部变量 秒, 整数型 .局部变量 分钟, 整数型 .局部变量 小时, 整数型 .局部变量 天, 整数型 数值 = 到长整数 (编辑框1.内容) 天 = 取整 (数值 ÷ 86400) 数值 = 数值 - 天 × 86400 小时 = 取整 (数值 ÷ 3600) 数值 = 数值 - 小时 × 3600 分钟 = 取整 (数值 ÷ 60) 秒 = 数值 - 分钟 × 60 标签1.标题 = “” .如果真 (天 ≠ 0) 标签1.标题 = 到文本 (天) + “天” .如果真结束 .如果真 (小时 ≠ 0) 标签1.标题 = 标签1.标题 + 到文本 (小时) + “小时” .如果真结束 .如果真 (分钟 ≠ 0) 标签1.标题 = 标签1.标题 + 到文本 (分钟) + “分钟” .如果真结束 .如果真 (秒 ≠ 0) 标签1.标题 = 标签1.标题 + 到文本 (秒) + “秒” .如果真结束
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询