正则问题

LEOONL

国宝学习易语言 发表于 2024-10-16 00:20
或者有什么好的思路提供一下吗

  

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

变量名	类 型	静态	数组	备 注
正则	正则表达式类
n	整数型

正则.创建 (“(\d+)[\.干沙通](\d+)”, “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21 55-20 1-1 2沙2”)
计次循环首 (正则.取匹配数量 (), n)
如果真 (到数值 (正则.取子匹配文本 (n, 2)) ≥ 30 或 到数值 (正则.取子匹配文本 (n, 1)) ≥ 30)
如果 (到数值 (正则.取子匹配文本 (n, 2)) ＞ 到数值 (正则.取子匹配文本 (n, 1)))
调试输出 (正则.取子匹配文本 (n, 1), 正则.取子匹配文本 (n, 2))
调试输出 (正则.取子匹配文本 (n, 2), 正则.取子匹配文本 (n, 1))


计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 n, 整数型<br /> <br /> 正则.创建 (“(\d+)[\.干沙通](\d+)”, “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21 55-20 1-1 2沙2”)<br /> .计次循环首 (正则.取匹配数量 (), n)<br />     .如果真 (到数值 (正则.取子匹配文本 (n, 2)) ≥ 30 或 到数值 (正则.取子匹配文本 (n, 1)) ≥ 30)<br />         .如果 (到数值 (正则.取子匹配文本 (n, 2)) ＞ 到数值 (正则.取子匹配文本 (n, 1)))<br />             调试输出 (正则.取子匹配文本 (n, 1), 正则.取子匹配文本 (n, 2))<br />         .否则<br />             调试输出 (正则.取子匹配文本 (n, 2), 正则.取子匹配文本 (n, 1))<br />         .如果结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

浅黑

如此这般

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
str	文本型
arr	文本型		0
i	整数型
re	正则表达式类
源文本	文本型

str ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”
arr ＝ 分割文本 (str, 字符 ( #空格键 ), )
计次循环首 (取数组成员数 (arr), i)
re.创建 (“[^0-9]”, arr [i], 假, 假, 真, 真)
调试输出 (“[” ＋ 文本_替换 (arr [i], , , , re.取匹配文本 (1), “,”) ＋ “]”)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 str, 文本型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 re, 正则表达式类<br /> .局部变量 源文本, 文本型<br /> <br /> str ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”<br /> arr ＝ 分割文本 (str, 字符 (#空格键), )<br /> <br /> .计次循环首 (取数组成员数 (arr), i)<br />     re.创建 (“[^0-9]”, arr <i>, 假, 假, 真, 真)<br />     调试输出 (“[” ＋ 文本_替换 (arr <i>, , , , re.取匹配文本 (1), “,”) ＋ “]”)<br /> .计次循环尾 ()

haoren1212

  

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

变量名	类 型	静态	数组	备 注
文本分割	文本型		0
正则	正则表达式类
i	整数型

文本_分割文本 (编辑框1.内容, “ ”, , 文本分割)
计次循环首 (取数组成员数 (文本分割), i)
调试输出 (文本分割 [i])
正则.创建 (“[0-9]{1,}”, 文本分割 [i], , , , )
调试输出 (“[” ＋ 正则.取匹配文本 (1, 0) ＋ “,” ＋ 正则.取匹配文本 (2, 0) ＋ “]”)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本分割, 文本型, , "0"<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 i, 整数型<br /> <br /> 文本_分割文本 (编辑框1.内容, “ ”, , 文本分割)<br /> .计次循环首 (取数组成员数 (文本分割), i)<br />     调试输出 (文本分割 <i>)<br />     正则.创建 (“[0-9]{1,}”, 文本分割 <i>, , , , )<br />     调试输出 (“[” ＋ 正则.取匹配文本 (1, 0) ＋ “,” ＋ 正则.取匹配文本 (2, 0) ＋ “]”)<br /> .计次循环尾 ()

haoren1212

haoren1212 发表于 2024-10-16 03:34
[e=1].版本 2
.支持库 spec

.判断开始 (到整数 (正则.取匹配文本 (1, 0)) ＞ 到整数 (正则.取匹配文本 (2, 0)))
        调试输出 (“[” ＋ 正则.取匹配文本 (2, 0) ＋ “,” ＋ 正则.取匹配文本 (1, 0) ＋ “]”)
    .默认
        调试输出 (“[” ＋ 正则.取匹配文本 (1, 0) ＋ “,” ＋ 正则.取匹配文本 (2, 0) ＋ “]”)
    .判断结束

jy243486841

  

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

变量名	类 型	静态	数组	备 注
局_匹配文本	文本型
局_匹配文本分割	文本型		0
局_计次	整数型
局_文本信息	文本型
局_左边文本	文本型
局_右边文本	文本型

局_匹配文本 ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”
局_匹配文本 ＝ 文本_替换 (局_匹配文本, , , , “干”, “.”, “沙”, “.”, “通”, “.”, , , , )  ' 将所有已知分割符替换成.
文本_分割文本 (局_匹配文本, “ ”, , 局_匹配文本分割)  ' 确定好每组使用 空格分割
' 调试输出 (局_匹配文本分割)
计次循环首 (取数组成员数 (局_匹配文本分割), 局_计次)
局_文本信息 ＝ 局_匹配文本分割 [局_计次]
局_左边文本 ＝ 取文本左边 (局_文本信息, 文本_寻找文本 (局_文本信息, “.”, , ) － 1)
局_右边文本 ＝ 取文本右边 (局_文本信息, 取文本长度 (局_文本信息) － 文本_寻找文本 (局_文本信息, “.”, , ))
如果真 (到数值 (局_右边文本) ＜ 30)
信息框 (“局_右边文本=” ＋ 局_右边文本 ＋ “ 小于30”, 0, “提示”, )
调试输出 (局_左边文本 ＋ “.” ＋ 局_右边文本)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局_匹配文本, 文本型<br /> .局部变量 局_匹配文本分割, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_文本信息, 文本型<br /> .局部变量 局_左边文本, 文本型<br /> .局部变量 局_右边文本, 文本型<br /> <br /> 局_匹配文本 ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”<br /> 局_匹配文本 ＝ 文本_替换 (局_匹配文本, , , , “干”, “.”, “沙”, “.”, “通”, “.”, , , , )  ' 将所有已知分割符替换成.<br /> 文本_分割文本 (局_匹配文本, “ ”, , 局_匹配文本分割)  ' 确定好每组使用 空格分割<br /> ' 调试输出 (局_匹配文本分割)<br /> .计次循环首 (取数组成员数 (局_匹配文本分割), 局_计次)<br />     局_文本信息 ＝ 局_匹配文本分割 [局_计次]<br />     局_左边文本 ＝ 取文本左边 (局_文本信息, 文本_寻找文本 (局_文本信息, “.”, , ) － 1)<br />     局_右边文本 ＝ 取文本右边 (局_文本信息, 取文本长度 (局_文本信息) － 文本_寻找文本 (局_文本信息, “.”, , ))<br />     .如果真 (到数值 (局_右边文本) ＜ 30)<br />         信息框 (“局_右边文本=” ＋ 局_右边文本 ＋ “ 小于30”, 0, “提示”, )<br />     .如果真结束<br />     调试输出 (局_左边文本 ＋ “.” ＋ 局_右边文本)<br /> .计次循环尾 ()

补充内容 (2024-10-16 10:03):
按照你原来的代码 是验证了左右两边都要大于等于30 并且 右侧不大于30 需要左右兑换位置 这个你后续修改下就行了

补充内容 (2024-10-16 10:03):
其实 要是确定了分割符种类的话 可以先替换成统一的分隔符 然后用正则取筛 或者分割筛也行

jy243486841

  

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

变量名	类 型	静态	数组	备 注
局_匹配文本	文本型
局_匹配文本分割	文本型		0
局_计次	整数型
局_文本信息	文本型
局_左边文本	文本型
局_右边文本	文本型

局_匹配文本 ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”
局_匹配文本 ＝ 文本_替换 (局_匹配文本, , , , “干”, “.”, “沙”, “.”, “通”, “.”, , , , )  ' 将所有已知分割符替换成.
文本_分割文本 (局_匹配文本, “ ”, , 局_匹配文本分割)  ' 确定好每组使用 空格分割
' 调试输出 (局_匹配文本分割)
计次循环首 (取数组成员数 (局_匹配文本分割), 局_计次)
局_文本信息 ＝ 局_匹配文本分割 [局_计次]
局_左边文本 ＝ 取文本左边 (局_文本信息, 文本_寻找文本 (局_文本信息, “.”, , ) － 1)
局_右边文本 ＝ 取文本右边 (局_文本信息, 取文本长度 (局_文本信息) － 文本_寻找文本 (局_文本信息, “.”, , ))
如果真 (到数值 (局_右边文本) ＜ 30)
信息框 (“局_右边文本=” ＋ 局_右边文本 ＋ “ 小于30”, 0, “提示”, )

如果真 (局_左边文本 ＝ “” 或 局_右边文本 ＝ “”)
信息框 (“数据有问题=” ＋ 局_文本信息, 0, “提示”, )

调试输出 (局_左边文本 ＋ “.” ＋ 局_右边文本)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局_匹配文本, 文本型<br /> .局部变量 局_匹配文本分割, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_文本信息, 文本型<br /> .局部变量 局_左边文本, 文本型<br /> .局部变量 局_右边文本, 文本型<br /> <br /> 局_匹配文本 ＝ “10.888 20.889 21干556 27沙446 80通1 888.11 889.20 556干21”<br /> 局_匹配文本 ＝ 文本_替换 (局_匹配文本, , , , “干”, “.”, “沙”, “.”, “通”, “.”, , , , )  ' 将所有已知分割符替换成.<br /> 文本_分割文本 (局_匹配文本, “ ”, , 局_匹配文本分割)  ' 确定好每组使用 空格分割<br /> ' 调试输出 (局_匹配文本分割)<br /> .计次循环首 (取数组成员数 (局_匹配文本分割), 局_计次)<br />     局_文本信息 ＝ 局_匹配文本分割 [局_计次]<br />     局_左边文本 ＝ 取文本左边 (局_文本信息, 文本_寻找文本 (局_文本信息, “.”, , ) － 1)<br />     局_右边文本 ＝ 取文本右边 (局_文本信息, 取文本长度 (局_文本信息) － 文本_寻找文本 (局_文本信息, “.”, , ))<br />     .如果真 (到数值 (局_右边文本) ＜ 30)<br />         信息框 (“局_右边文本=” ＋ 局_右边文本 ＋ “ 小于30”, 0, “提示”, )<br />     .如果真结束<br /> <br />     .如果真 (局_左边文本 ＝ “” 或 局_右边文本 ＝ “”)<br />         信息框 (“数据有问题=” ＋ 局_文本信息, 0, “提示”, )<br />     .如果真结束<br /> <br />     调试输出 (局_左边文本 ＋ “.” ＋ 局_右边文本)<br /> .计次循环尾 ()

补充内容 (2024-10-16 10:11):
使用了 精易模块 按照你的问题描述改了下之前代码 只不过使用的是 文本分割 +文本查找 没用到正则