时间:2023-02-12 10:52:48 | 栏目: | 点击:次
将时间转换到纯数字格式的代码
.版本 2 .程序集 窗口程序集1 .程序集变量 年, 文本型 .程序集变量 月, 文本型 .程序集变量 日, 文本型 .程序集变量 时, 文本型 .程序集变量 分, 文本型 .程序集变量 秒, 文本型 .子程序 获取时间 年 = 到文本 (取年份 (取现行时间 ())) .判断开始 (取月份 (取现行时间 ()) < 10) 月 = 到文本 (“0”) + 到文本 (取月份 (取现行时间 ())) .默认 月 = 到文本 (取月份 (取现行时间 ())) .判断结束 .判断开始 (取日 (取现行时间 ()) < 10) 日 = 到文本 (“0”) + 到文本 (取日 (取现行时间 ())) .默认 日 = 到文本 (取日 (取现行时间 ())) .判断结束 .判断开始 (取小时 (取现行时间 ()) < 10) 时 = 到文本 (“0”) + 到文本 (取小时 (取现行时间 ())) .默认 时 = 到文本 (取小时 (取现行时间 ())) .判断结束 .判断开始 (取分钟 (取现行时间 ()) < 10) 分 = 到文本 (“0”) + 到文本 (取分钟 (取现行时间 ())) .默认 分 = 到文本 (取分钟 (取现行时间 ())) .判断结束 .判断开始 (取秒 (取现行时间 ()) < 10) 秒 = 到文本 (“0”) + 到文本 (取秒 (取现行时间 ())) .默认 秒 = 到文本 (取秒 (取现行时间 ())) .判断结束 .子程序 _时钟1_周期事件 获取时间 () 显示编辑框.内容 = 年 + 月 + 日 + 时 + 分 + 秒
运行结果:
总结