易语言将日期时间转换成纯数字格式的代码

.版本 2.程序集 窗口程序集1.程序集变量 年, 文本型.程序集变量 月, 文本型.程序集变量 日, 文本型.程序集变量 时, 文本型.程序集变量 分, 文本型.程序集变量 秒, 文本型.子程序 获取时间年 ＝ 到文本 (取年份 (取现行时间 ())).判断开始 (取月份 (取现行时间 ()) ＜ 10)  月 ＝ 到文本 (“0”) ＋ 到文本 (取月份 (取现行时间 ())).默认  月 ＝ 到文本 (取月份 (取现行时间 ())).判断结束.判断开始 (取日 (取现行时间 ()) ＜ 10)  日 ＝ 到文本 (“0”) ＋ 到文本 (取日 (取现行时间 ())).默认  日 ＝ 到文本 (取日 (取现行时间 ())).判断结束.判断开始 (取小时 (取现行时间 ()) ＜ 10)  时 ＝ 到文本 (“0”) ＋ 到文本 (取小时 (取现行时间 ())).默认  时 ＝ 到文本 (取小时 (取现行时间 ())).判断结束.判断开始 (取分钟 (取现行时间 ()) ＜ 10)  分 ＝ 到文本 (“0”) ＋ 到文本 (取分钟 (取现行时间 ())).默认  分 ＝ 到文本 (取分钟 (取现行时间 ())).判断结束.判断开始 (取秒 (取现行时间 ()) ＜ 10)  秒 ＝ 到文本 (“0”) ＋ 到文本 (取秒 (取现行时间 ())).默认  秒 ＝ 到文本 (取秒 (取现行时间 ())).判断结束.子程序 _时钟1_周期事件获取时间 ()显示编辑框.内容 ＝ 年 ＋ 月 ＋ 日 ＋ 时 ＋ 分 ＋ 秒