分割文本,带字母数字过滤分割

夜华

源码产自CTRL+C CTRL+V 来源:@寒潮  他所在的问答区回答内容 搬用和 修改

没事多搜搜 关键词分开搜 就行了.多动脑子各位. @高发发 拿走吧


单独分割排除.rar (1.62 KB, 下载次数: 41)

2020-5-15 05:50 上传

点击文件名下载附件
下载积分: 精币 -2 枚

网络注册会员

支持楼主

552233

感谢分享 学习一下

1425113841

  

子程序名	返回值类型	公开	备 注
test

变量名	类 型	静态	数组	备 注
str	文本型
strArray	文本型		0
x	整数型
tempInt	整数型

str ＝ #常量1
str ＝ 子文本替换 (str, #换行符, “|”, , , 真)
strArray ＝ 分割文本 (str, “|”, )
变量循环首 (取数组成员数 (strArray), 1, -1, x)
tempInt ＝ x － 到整数 ( (x － 1) ÷ 4) × 4
如果真 (tempInt ＝ 1)
删除成员 (strArray, x, )

变量循环尾 ()
计次循环首 (取数组成员数 (strArray), x)
调试输出 (strArray [x])
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 test<br /> .局部变量 str, 文本型<br /> .局部变量 strArray, 文本型, , "0"<br /> .局部变量 x, 整数型<br /> .局部变量 tempInt, 整数型<br /> <br /> str ＝ #常量1<br /> str ＝ 子文本替换 (str, #换行符, “|”, , , 真)<br /> strArray ＝ 分割文本 (str, “|”, )<br /> .变量循环首 (取数组成员数 (strArray), 1, -1, x)<br />     tempInt ＝ x － 到整数 ((x － 1) ÷ 4) × 4<br />     .如果真 (tempInt ＝ 1)<br />         删除成员 (strArray, x, )<br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (strArray), x)<br />     调试输出 (strArray [x])<br /> .计次循环尾 ()

1425113841

额。。。用不着模

  

变量名	类 型	静态	数组	备 注
str	文本型
strArray	文本型		0
x	整数型
tempInt	整数型

str ＝ #常量1
str ＝ 子文本替换 (str, #换行符, “|”, , , 真)
strArray ＝ 分割文本 (str, “|”, )
计次循环首 (取数组成员数 (strArray), x)
tempInt ＝ x － 到整数 ( (x － 1) ÷ 4) × 4
如果真 (tempInt ＝ 2)
调试输出 (strArray [x])
如果真 (tempInt ＝ 3)
调试输出 (strArray [x])
如果真 (tempInt ＝ 4)
调试输出 (strArray [x])

计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 str, 文本型<br /> .局部变量 strArray, 文本型, , "0"<br /> .局部变量 x, 整数型<br /> .局部变量 tempInt, 整数型<br /> <br /> str ＝ #常量1<br /> str ＝ 子文本替换 (str, #换行符, “|”, , , 真)<br /> strArray ＝ 分割文本 (str, “|”, )<br /> .计次循环首 (取数组成员数 (strArray), x)<br />     tempInt ＝ x － 到整数 ((x － 1) ÷ 4) × 4<br />     .如果真 (tempInt ＝ 2)<br />         调试输出 (strArray [x])<br />     .如果真结束<br />     .如果真 (tempInt ＝ 3)<br />         调试输出 (strArray [x])<br />     .如果真结束<br />     .如果真 (tempInt ＝ 4)<br />         调试输出 (strArray [x])<br />     .如果真结束<br /> <br /> .计次循环尾 ()

阿迷

感谢分享 学习一下

xiaoniu1230

感谢分享，支持开源

15887059803

谢谢分享，正要使用，学习一下

选择性失忆

谢谢分享正好需要谢谢