分隔符问题求助

dj1314138

工工----18985656
在在---686556
以以--a98665
有有-8f9e56g
民民-----6985568
同同--------68931
上上 d89w865f
了了568966
人人，65898956
有有\6665236
编辑框1的内容如上
中间的分隔符有各式各样的，要找出分隔符是4条----的，加入编辑框2，别的不是分隔符4条----的全部加入编辑框3，这个咋判断呢，

无痕雨

  

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

变量名	类 型	静态	数组	备 注
arr	文本型		0
i	整数型

arr ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (arr), i)
判断 (文本_取分隔符 (arr [i]) ＝ “----”)
编辑框2.加入文本 (arr [i] ＋ #换行符 )
编辑框3.加入文本 (arr [i] ＋ #换行符 )

计次循环尾 ()

子程序名	返回值类型	公开	备 注
文本_取分隔符	文本型
参数名	类 型	参考	可空	数组	备 注
原文本	文本型

变量名	类 型	静态	数组	备 注
单字分割	文本型		0
i	整数型
分隔符	文本型

文本_逐字分割 (原文本, 单字分割)
计次循环首 (取数组成员数 (单字分割), i)
如果真 (文本_是否为字母 (单字分割 [i]) ＝ 假 且 文本_是否为汉字 (单字分割 [i]) ＝ 假 且 文本_是否为数字 (单字分割 [i]) ＝ 假)
如果真 (寻找文本 (分隔符, 单字分割 [i], , 假) ＝ -1 且 取文本长度 (分隔符) ＞ 0)
跳出循环 ()
分隔符 ＝ 分隔符 ＋ 单字分割 [i]

计次循环尾 ()
返回 (分隔符)

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> arr ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (arr), i)<br />     .判断开始 (文本_取分隔符 (arr <i>) ＝ “----”)<br />         编辑框2.加入文本 (arr <i> ＋ #换行符)<br />     .默认<br />         编辑框3.加入文本 (arr <i> ＋ #换行符)<br />     .判断结束<br /> <br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 文本_取分隔符, 文本型<br /> .参数 原文本, 文本型<br /> .局部变量 单字分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 分隔符, 文本型<br /> <br /> 文本_逐字分割 (原文本, 单字分割)<br /> .计次循环首 (取数组成员数 (单字分割), i)<br />     .如果真 (文本_是否为字母 (单字分割 <i>) ＝ 假 且 文本_是否为汉字 (单字分割 <i>) ＝ 假 且 文本_是否为数字 (单字分割 <i>) ＝ 假)<br />         .如果真 (寻找文本 (分隔符, 单字分割 <i>, , 假) ＝ -1 且 取文本长度 (分隔符) ＞ 0)<br />             跳出循环 ()<br />         .如果真结束<br />         分隔符 ＝ 分隔符 ＋ 单字分割 <i><br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (分隔符)

补充内容 (2024-5-3 12:26):
判断改成这个 上面那个加入的又问题

afu45

  

子程序名	返回值类型	公开	备 注
正则匹配

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

表达式.创建 (" ([\u4e00-\u9fa5]+).*? (\w+)", #常量1, 假, 假, 真, 真)
计次循环首 (表达式.取匹配数量 (), i)
调试输出 (表达式.取子匹配文本 (i, 1, ))
调试输出 (表达式.取子匹配文本 (i, 2, ))
计次循环尾 ()

.版本 2<br /> <br /> .子程序 正则匹配<br /> .局部变量 表达式, 正则表达式类<br /> .局部变量 i, 整数型<br /> <br /> 表达式.创建 ("([\u4e00-\u9fa5]+).*?(\w+)", #常量1, 假, 假, 真, 真)<br /> .计次循环首 (表达式.取匹配数量 (), i)<br />     调试输出 (表达式.取子匹配文本 (i, 1, ))<br />     调试输出 (表达式.取子匹配文本 (i, 2, ))<br /> .计次循环尾 ()

afu45

  

子程序名	返回值类型	公开	备 注
正则匹配

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

表达式.创建 (“([\u4e00-\u9fa5]+)(.*?)(\w+)”, #常量1, 假, 假, 真, 真)
计次循环首 (表达式.取匹配数量 (), i)
如果 (表达式.取子匹配文本 (i, 2, ) ＝ “----”)
编辑框2.加入文本 (表达式.取匹配文本 (i, ) ＋ #换行符 )
编辑框3.加入文本 (表达式.取匹配文本 (i, ) ＋ #换行符 )

计次循环尾 ()

.版本 2<br /> <br /> .子程序 正则匹配<br /> .局部变量 表达式, 正则表达式类<br /> .局部变量 i, 整数型<br /> <br /> 表达式.创建 (“([\u4e00-\u9fa5]+)(.*?)(\w+)”, #常量1, 假, 假, 真, 真)<br /> .计次循环首 (表达式.取匹配数量 (), i)<br />     .如果 (表达式.取子匹配文本 (i, 2, ) ＝ “----”)<br />         编辑框2.加入文本 (表达式.取匹配文本 (i, ) ＋ #换行符)<br />     .否则<br />         编辑框3.加入文本 (表达式.取匹配文本 (i, ) ＋ #换行符)<br />     .如果结束<br /> <br /> .计次循环尾 ()

xihui1534

例子如下：
demo.e (3.5 KB, 下载次数: 5)

2024-5-3 12:10 上传

点击文件名下载附件

无痕雨

xihui1534 发表于 2024-5-3 12:10
例子如下：

他这个好像是只要分隔符为4条的 其他条件的都不要

无痕雨

是这个效果吗

dj1314138

afu45 发表于 2024-5-3 12:08
[e=0].版本 2

.子程序 正则匹配

aaaaa\6665236
cccccc----9999
1111-----22356
989工人----6559
工66aaa-----5896
前面是字母或者数字或者数字字母混一起或者数字字母中文混一起的呢

东山小道童

真羡慕你们会正则的

caohu1987

围观学习