我记得有个处理文本的网站

Mc萌主

比如

1111----2222----5555----66666
1111----2222----5555----66666
1111----2222----5555----66666
1111----2222----5555----66666





这种我可以批量指定删除第几列----后面的内容

LEOONL

1.e (3.74 KB, 下载次数: 4)

2024-11-13 09:47 上传

点击文件名下载附件

cobi

  

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

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

变量名	类 型	静态	数组	备 注
源文本	文本型
删除行	整数型		0
文本内容	文本型		0
取出内容	文本型		0
新内容	文本型
s
i
z

源文本 ＝ “1111----2222----5555----666661” ＋ #换行符 ＋ “1111----2222----5555----666662” ＋ #换行符 ＋ “1111----2222----5555----666663” ＋ #换行符 ＋ “1111----2222----5555----666664”
' 可改为取多行的编辑框内容
文本内容 ＝ 分割文本 (源文本, #换行符, )
s ＝ 取数组成员数 (文本内容)
如果真 (s ＞ 0)
删除行 ＝ { 1, 4 }  ' 将多行存入数组
计次循环首 (取数组成员数 (文本内容), i)
如果真 (取数组成员数 (删除行) ≥ i)
z ＝ z ＋ 1
如果真 (删除行 [z] ＞ s)
到循环尾 ()
取出内容 ＝ 分割文本 (文本内容 [删除行 [z]], “----”, )
如果真 (取数组成员数 (取出内容) ＞ 0)
文本内容 [删除行 [z]] ＝ 取出内容 [1]


计次循环尾 ()
计次循环首 (s, i)
如果真 (s ＝ i)
新内容 ＝ 新内容 ＋ 文本内容 [i]
跳出循环 ()
新内容 ＝ 新内容 ＋ 文本内容 [i] ＋ #换行符
计次循环尾 ()
调试输出 (新内容)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 源文本, 文本型<br /> .局部变量 删除行, 整数型, , "0"<br /> .局部变量 文本内容, 文本型, , "0"<br /> .局部变量 取出内容, 文本型, , "0"<br /> .局部变量 新内容, 文本型<br /> .局部变量 s<br /> .局部变量 i<br /> .局部变量 z<br /> <br /> 源文本 ＝ “1111----2222----5555----666661” ＋ #换行符 ＋ “1111----2222----5555----666662” ＋ #换行符 ＋ “1111----2222----5555----666663” ＋ #换行符 ＋ “1111----2222----5555----666664”<br /> ' 可改为取多行的编辑框内容<br /> <br /> 文本内容 ＝ 分割文本 (源文本, #换行符, )<br /> s ＝ 取数组成员数 (文本内容)<br /> .如果真 (s ＞ 0)<br />     删除行 ＝ { 1, 4 }  ' 将多行存入数组<br />     .计次循环首 (取数组成员数 (文本内容), i)<br />         .如果真 (取数组成员数 (删除行) ≥ i)<br />             z ＝ z ＋ 1<br />             .如果真 (删除行 [z] ＞ s)<br />                 到循环尾 ()<br />             .如果真结束<br />             取出内容 ＝ 分割文本 (文本内容 [删除行 [z]], “----”, )<br />             .如果真 (取数组成员数 (取出内容) ＞ 0)<br />                 文本内容 [删除行 [z]] ＝ 取出内容 [1]<br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .计次循环首 (s, i)<br />         .如果真 (s ＝ i)<br />             新内容 ＝ 新内容 ＋ 文本内容 <i><br />             跳出循环 ()<br />         .如果真结束<br />         新内容 ＝ 新内容 ＋ 文本内容 <i> ＋ #换行符<br />     .计次循环尾 ()<br />     调试输出 (新内容)

补充内容 (2024-11-13 10:34):
哈哈，忘了将第二次循环 新内容部分 放置第一次循环的后面

补充内容 (2024-11-13 10:41):
我其实还想弄成可以批量修改某行某列内容

dc244399752

这样就可以了