如何快速获取每行最老日期

dirdir110

2027-08-25,2027-08-31,2027-08-31,2027-09-23
2028-09-05,2028-10-07,2028-09-11
2027-09-30,2027-06-30
2027-11-18,2027-11-19
2027-10-31,2028-10-31
2028-10-31,2028-10-31,2028-10-31,2028-10-31,2028-10-31
2028-08-31,2028-08-31,2028-08-31,2028-08-31,2026-10-31,2026-10-31
2028-09-17,2028-09-17,2028-09-19
2028-09-12,2028-09-12
2027-11-30,2028-07-31
································
大量一行时间  如何快速最旧日期，比如2027-11-30,2028-07-31  这一行最老日期是2027-11-30
2028-08-31,2028-08-31,2028-08-31,2028-08-31,2026-10-31,2026-10-31这一行最老日期是2026-10-31

如何快速获取每行最老日期？代码怎么写

ye0918

.版本 2 .支持库 spec  .子程序 _按钮1_被单击   调试输出 (取一行最老日期 (“2028-09-05,2028-10-07,2028-09-11”))  .子程序 取一行最老日期, 文本型 .参数 日期文本行, 文本型 .局部变量 日期数组, 文本型, , "0" .局部变量 i, 整数型 .局部变量 当前日期, 日期时间型 .局部变量 最老日期, 日期时间型 .局部变量 找到有效日期, 逻辑型  找到有效日期 ＝ 假 最老日期 ＝ 到时间 (“2099-12-31”)  日期数组 ＝ 分割文本 (日期文本行, “,”, )  .计次循环首 (取数组成员数 (日期数组), i)      日期数组 [i] ＝ 删首尾空 (日期数组 [i])      .如果真 (日期数组 [i] ≠ “”)         当前日期 ＝ 到时间 (日期数组 [i])         找到有效日期 ＝ 真          .如果 (当前日期 ＜ 最老日期)             最老日期 ＝ 当前日期         .否则          .如果结束      .如果真结束  .计次循环尾 ()  .如果 (找到有效日期)     返回 (到文本 (最老日期)) .否则     返回 (“”) .如果结束

ye0918

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕



.子程序 _按钮1_被单击


调试输出 (取一行最老日期 (“2028-09-05,2028-10-07,2028-09-11”))

.子程序 取一行最老日期, 文本型
.参数 日期文本行, 文本型
.局部变量 日期数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 当前日期, 日期时间型
.局部变量 最老日期, 日期时间型
.局部变量 找到有效日期, 逻辑型

找到有效日期 ＝ 假
最老日期 ＝ 到时间 (“2099-12-31”)

日期数组 ＝ 分割文本 (日期文本行, “,”, )

.计次循环首 (取数组成员数 (日期数组), i)

    日期数组 [i] ＝ 删首尾空 (日期数组 [i])

    .如果真 (日期数组 [i] ≠ “”)
        当前日期 ＝ 到时间 (日期数组 [i])
        找到有效日期 ＝ 真

        .如果 (当前日期 ＜ 最老日期)
            最老日期 ＝ 当前日期
        .否则

        .如果结束

    .如果真结束

.计次循环尾 ()

.如果 (找到有效日期)
    返回 (到文本 (最老日期))
.否则
    返回 (“”)
.如果结束

ASSHOLE

  

子程序名	返回值类型	公开	备 注
取每行最旧日期			返回每行最旧日期，用换行符分隔
参数名	类 型	参考	可空	数组	备 注
全部文本	文本型

变量名	类 型	静态	数组	备 注
正则	正则表达式类
行数组	文本型		0
i	整数型
j	整数型
最旧	文本型
当前	文本型

行数组 ＝ 分割文本 (全部文本, #换行符, )
计次循环首 (取数组成员数 (行数组), i)
' 正则匹配当前行所有日期
如果真 (正则.创建 (“\d{4}-\d{2}-\d{2}”, 行数组 [i], , , , ))
最旧 ＝ 正则.取匹配文本 (1, )  ' 取第一个日期作为初始值
计次循环首 (正则.取匹配数量 () － 1, j)  ' 从第二个开始比较
当前 ＝ 正则.取匹配文本 (j ＋ 1, )
如果真 (当前 ＜ 最旧)  ' YYYY-MM-DD格式可直接文本比较
最旧 ＝ 当前

计次循环尾 ()
如果真 (最旧 ≠ “”)  ' 防止无匹配结果
调试输出 (最旧)


计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 取每行最旧日期, , , 返回每行最旧日期，用换行符分隔<br /> .参数 全部文本, 文本型<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 行数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 最旧, 文本型<br /> .局部变量 当前, 文本型<br /> <br /> 行数组 ＝ 分割文本 (全部文本, #换行符, )<br /> .计次循环首 (取数组成员数 (行数组), i)<br />     ' 正则匹配当前行所有日期<br />     .如果真 (正则.创建 (“\d{4}-\d{2}-\d{2}”, 行数组 <i>, , , , ))<br />         最旧 ＝ 正则.取匹配文本 (1, )  ' 取第一个日期作为初始值<br />         .计次循环首 (正则.取匹配数量 () － 1, j)  ' 从第二个开始比较<br />             当前 ＝ 正则.取匹配文本 (j ＋ 1, )<br />             .如果真 (当前 ＜ 最旧)  ' YYYY-MM-DD格式可直接文本比较<br />                 最旧 ＝ 当前<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />         .如果真 (最旧 ≠ “”)  ' 防止无匹配结果<br />             调试输出 (最旧)<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

可乐cl

可以先按换行分成数组，再把每一行按逗号分割，然后逐个比较，保留最小日期。

如果日期格式固定都是 yyyy-mm-dd，其实直接按文本比较大小就行，因为这个格式的文本顺序和日期顺序一致。

思路：
1、分割文本得到每一行
2、每行再按 “,” 分割成日期数组
3、先取第一个当最旧日期
4、循环比较，遇到更小的就替换
5、把每行结果拼接输出

如果你需要，我建议你直接用“分割文本 + 计次循环 + 判断(当前日期 < 最旧日期)”来写，不一定非得上正则。

要是你愿意，我下一条可以直接给你补一份易语言完整例子。

1173847128

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

调试输出 (取最小年份 (7))

子程序名	返回值类型	公开	备 注
取最小年份	文本型
参数名	类 型	参考	可空	数组	备 注
第几行	整数型

变量名	类 型	静态	数组	备 注
分割的文本	文本型		0
行文本	文本型		0
i	整数型
最小日期	日期时间型
结果文本	文本型

分割的文本 ＝ 分割文本 ( #文本, #换行符, )
如果真 (取数组成员数 (分割的文本) ＜ 第几行)
返回 (“”)
行文本 ＝ 分割文本 (分割的文本 [第几行], “,”, )
' 调试输出 (分割的文本 [第几行])
如果真 (取数组成员数 (行文本) ≤ 0)
返回 (“”)
最小日期 ＝ 到时间 (行文本 [1])
结果文本 ＝ 行文本 [1]
如果真 (取数组成员数 (行文本) ＝ 1)
返回 (结果文本)

计次循环首 (取数组成员数 (行文本), i)
如果真 (i ≥ 2)
如果真 (最小日期 ＞ 到时间 (行文本 [i]))
最小日期 ＝ 到时间 (行文本 [i])
结果文本 ＝ 行文本 [i]


计次循环尾 ()
' 调试输出 (结果文本)
返回 (结果文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 调试输出 (取最小年份 (7))<br /> <br /> <br /> .子程序 取最小年份, 文本型<br /> .参数 第几行, 整数型<br /> .局部变量 分割的文本, 文本型, , "0"<br /> .局部变量 行文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 最小日期, 日期时间型<br /> .局部变量 结果文本, 文本型<br /> <br /> 分割的文本 ＝ 分割文本 (#文本, #换行符, )<br /> .如果真 (取数组成员数 (分割的文本) ＜ 第几行)<br />     返回 (“”)<br /> .如果真结束<br /> 行文本 ＝ 分割文本 (分割的文本 [第几行], “,”, )<br /> ' 调试输出 (分割的文本 [第几行])<br /> <br /> .如果真 (取数组成员数 (行文本) ≤ 0)<br />     返回 (“”)<br /> .如果真结束<br /> 最小日期 ＝ 到时间 (行文本 [1])<br /> 结果文本 ＝ 行文本 [1]<br /> <br /> .如果真 (取数组成员数 (行文本) ＝ 1)<br />     返回 (结果文本)<br /> .如果真结束<br /> <br /> .计次循环首 (取数组成员数 (行文本), i)<br />     .如果真 (i ≥ 2)<br />         .如果真 (最小日期 ＞ 到时间 (行文本 <i>))<br />             最小日期 ＝ 到时间 (行文本 <i>)<br />             结果文本 ＝ 行文本 <i><br /> <br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> ' 调试输出 (结果文本)<br /> 返回 (结果文本)

拿去拿去

z573277679

开始运行被调试程序
* “2027-08-25”
* “2028-09-05”
* “2026-10-31”
被调试易程序运行完毕

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
源文本	文本型
局_行数组	文本型		0
局_日期数组	文本型		0
局_最老日期	文本型
i	整数型
j	整数型

源文本 ＝ “2027-08-25,2027-08-31,2027-08-31,2027-09-23” ＋ #换行符 ＋ “2028-09-05,2028-10-07,2028-09-11” ＋ #换行符 ＋ “2028-08-31,2028-08-31,2028-08-31,2028-08-31,2026-10-31,2026-10-31”
局_行数组 ＝ 分割文本 (源文本, #换行符, )
计次循环首 (取数组成员数 (局_行数组), i)
如果真 (删首尾空 (局_行数组 [i]) ＝ “”)
到循环尾 ()

局_日期数组 ＝ 分割文本 (局_行数组 [i], “,”, )
局_最老日期 ＝ 局_日期数组 [1]
变量循环首 (2, 取数组成员数 (局_日期数组), 1, j)
如果真 (局_日期数组 [j] ＜ 局_最老日期)
局_最老日期 ＝ 局_日期数组 [j]

变量循环尾 ()
调试输出 (局_最老日期)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 源文本, 文本型<br /> .局部变量 局_行数组, 文本型, , "0"<br /> .局部变量 局_日期数组, 文本型, , "0"<br /> .局部变量 局_最老日期, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 源文本 ＝ “2027-08-25,2027-08-31,2027-08-31,2027-09-23” ＋ #换行符 ＋ “2028-09-05,2028-10-07,2028-09-11” ＋ #换行符 ＋ “2028-08-31,2028-08-31,2028-08-31,2028-08-31,2026-10-31,2026-10-31”<br /> <br /> 局_行数组 ＝ 分割文本 (源文本, #换行符, )<br /> <br /> .计次循环首 (取数组成员数 (局_行数组), i)<br />     .如果真 (删首尾空 (局_行数组 <i>) ＝ “”)<br />         到循环尾 ()<br />     .如果真结束<br /> <br />     局_日期数组 ＝ 分割文本 (局_行数组 <i>, “,”, )<br />     局_最老日期 ＝ 局_日期数组 [1]<br /> <br />     .变量循环首 (2, 取数组成员数 (局_日期数组), 1, j)<br />         .如果真 (局_日期数组 [j] ＜ 局_最老日期)<br />             局_最老日期 ＝ 局_日期数组 [j]<br />         .如果真结束<br /> <br />     .变量循环尾 ()<br /> <br />     调试输出 (局_最老日期)<br /> .计次循环尾 ()