超高自由度的时间格式化

紫苏7798

最近写日志类,需要时间格式化,现有的都不太满意,于是自己写了一个.
格式文本其他显示内容,只要不是关键词 “y”, “M”, “d”, “h”, “m”, “s”     就不影响使用

  

' 任意 自由的格式化时间文本
格式文本 ＝ “yyyy-MM-dd hh:mm:ss”
调试输出 (格式文本, 时间格式化 (, ))
格式文本 ＝ “yyyy~MM~dd hh:mm:ss”
调试输出 (格式文本, 时间格式化 (格式文本, ))
格式文本 ＝ “yyyyMMdd hhmmss”
调试输出 (格式文本, 时间格式化 (格式文本, ))
格式文本 ＝ “yyyyyy MMMM dddd hhhh:mmmm:ssss”
调试输出 (格式文本, 时间格式化 (格式文本, ))
格式文本 ＝ “yyyy年 hh:mm:ss”
调试输出 (格式文本, 时间格式化 (格式文本, ))
' [14:18:11] * “yyyy-MM-dd hh:mm:ss” | “2024-09-09 14:18:11”
' [14:18:11] * “yyyy~MM~dd hh:mm:ss” | “2024~09~09 14:18:11”
' [14:18:11] * “yyyyMMdd hhmmss” | “20240909 141811”
' [14:18:11] * “yyyyyy MMMM dddd hhhh:mmmm:ssss” | “002024 0009 0009 0014:0018:0011”
' [14:18:11] * “yyyy年 hh:mm:ss” | “2024年 14:18:11”

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> ' 任意 自由的格式化时间文本<br /> 格式文本 ＝ “yyyy-MM-dd hh:mm:ss”<br /> 调试输出 (格式文本, 时间格式化 (, ))<br /> 格式文本 ＝ “yyyy~MM~dd hh:mm:ss”<br /> 调试输出 (格式文本, 时间格式化 (格式文本, ))<br /> 格式文本 ＝ “yyyyMMdd hhmmss”<br /> 调试输出 (格式文本, 时间格式化 (格式文本, ))<br /> 格式文本 ＝ “yyyyyy MMMM dddd hhhh:mmmm:ssss”<br /> 调试输出 (格式文本, 时间格式化 (格式文本, ))<br /> 格式文本 ＝ “yyyy年 hh:mm:ss”<br /> 调试输出 (格式文本, 时间格式化 (格式文本, ))<br /> ' [14:18:11] * “yyyy-MM-dd hh:mm:ss” | “2024-09-09 14:18:11”<br /> ' [14:18:11] * “yyyy~MM~dd hh:mm:ss” | “2024~09~09 14:18:11”<br /> ' [14:18:11] * “yyyyMMdd hhmmss” | “20240909 141811”<br /> ' [14:18:11] * “yyyyyy MMMM dddd hhhh:mmmm:ssss” | “002024 0009 0009 0014:0018:0011”<br /> ' [14:18:11] * “yyyy年 hh:mm:ss” | “2024年 14:18:11”

  

子程序名	返回值类型	公开	备 注
时间格式化	文本型		紫苏时间格式化
参数名	类 型	参考	可空	数组	备 注
参_时间格式	文本型				默认"yyyy-MM-dd hh:mm:ss"
参_日期时间	日期时间型				默认取现行时间()

变量名	类 型	静态	数组	备 注
局时间	文本型		0
局文本	文本型		0
i	整数型
局替换	文本型
局返回	文本型
len	整数型
a	整数型

如果真 (是否为空 (参_时间格式))
参_时间格式 ＝ “yyyy-MM-dd hh:mm:ss”
如果真 (是否为空 (参_日期时间))
参_日期时间 ＝ 取现行时间 ()
局返回 ＝ 参_时间格式
局文本 ＝ { “y”, “M”, “d”, “h”, “m”, “s” }
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #年份 )))
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #月份 )))
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #日 )))
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #小时 )))
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #分钟 )))
加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #秒 )))
计次循环首 (6, i)
len ＝ 取文本长度 (局时间 [i])
计次循环首 (len, a)
如果真 (寻找文本 (局返回, 局文本 [i], , 假) ≠ -1)
局返回 ＝ 文本替换 (局返回, 倒找文本 (局返回, 局文本 [i], , 假), 1, 取文本中间 (局时间 [i], len － a ＋ 1, 1))

计次循环尾 ()
局返回 ＝ 子文本替换 (局返回, 局文本 [i], “0”, , , 真)
计次循环尾 ()
返回 (局返回)

.版本 2<br /> <br /> .子程序 时间格式化, 文本型, 公开, 紫苏时间格式化<br /> .参数 参_时间格式, 文本型, 可空, 默认"yyyy-MM-dd hh:mm:ss"<br /> .参数 参_日期时间, 日期时间型, 可空, 默认取现行时间()<br /> .局部变量 局时间, 文本型, , "0"<br /> .局部变量 局文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 局替换, 文本型<br /> .局部变量 局返回, 文本型<br /> .局部变量 len, 整数型<br /> .局部变量 a, 整数型<br /> <br /> .如果真 (是否为空 (参_时间格式))<br /> 参_时间格式 ＝ “yyyy-MM-dd hh:mm:ss”<br /> .如果真结束<br /> .如果真 (是否为空 (参_日期时间))<br /> 参_日期时间 ＝ 取现行时间 ()<br /> .如果真结束<br /> 局返回 ＝ 参_时间格式<br /> <br /> 局文本 ＝ { “y”, “M”, “d”, “h”, “m”, “s” }<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #年份)))<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #月份)))<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #日)))<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #小时)))<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #分钟)))<br /> 加入成员 (局时间, 到文本 (取时间部分 (参_日期时间, #秒)))<br /> <br /> .计次循环首 (6, i)<br /> len ＝ 取文本长度 (局时间 <i>)<br /> .计次循环首 (len, a)<br /> .如果真 (寻找文本 (局返回, 局文本 <i>, , 假) ≠ -1)<br /> 局返回 ＝ 文本替换 (局返回, 倒找文本 (局返回, 局文本 <i>, , 假), 1, 取文本中间 (局时间 <i>, len － a ＋ 1, 1))<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> 局返回 ＝ 子文本替换 (局返回, 局文本 <i>, “0”, , , 真)<br /> <br /> .计次循环尾 ()<br /> <br /> 返回 (局返回)

lm88818

支持开源~！感谢分享

熊不熊

感谢分享，很给力！~

虎子666

学习一下

dazhurou

66666666666666

a1221331441

看看~~~~~！@

qingwanfuzhu

超高自由度的时间格式化

鸿运当头旺呀

支持开源~！感谢分享

abcd168

超高自由度的时间格式化

pzypdl

好像很不错的样子