大佬们 怎么删除文本指定行呢？

Javatym

前面是扣扣 后面是英文名 取到这个数字的值然后把整行删除掉呢

如果删除的 有空行要怎么解决呢？

LEOONL

  

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

变量名	类 型	静态	数组	备 注
文本	文本型		0
n	整数型
新文本	文本型

文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (文本), n)
如果真 (寻找文本 (文本 [n], “123456789”, , 假) ＝ -1)
新文本 ＝ 新文本 ＋ 文本 [n] ＋ #换行符

计次循环尾 ()
编辑框1.内容 ＝ 新文本

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 新文本, 文本型<br /> <br /> 文本 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (文本), n)<br />     .如果真 (寻找文本 (文本 [n], “123456789”, , 假) ＝ -1)<br />         新文本 ＝ 新文本 ＋ 文本 [n] ＋ #换行符<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框1.内容 ＝ 新文本

浅黑

  

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

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

strs ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (strs), i)
如果真 (寻找文本 (strs [i], “123456789”, , 假) ≠ -1)
编辑框1.内容 ＝ 文本_删除指定文本行 (编辑框1.内容, i)
跳出循环 ()

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 strs, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 新文本, 文本型<br /> <br /> strs ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (strs), i)<br />     .如果真 (寻找文本 (strs <i>, “123456789”, , 假) ≠ -1)<br />         编辑框1.内容 ＝ 文本_删除指定文本行 (编辑框1.内容, i)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

Javatym

浅黑 发表于 2024-8-4 17:36
[e=0].版本 2

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

用编辑框知道咋写 不知道文本咋写

Javatym

LEOONL 发表于 2024-8-4 17:22
[e=0].版本 2

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

用编辑框知道咋写 不知道文本咋写

LEOONL

Javatym 发表于 2024-8-4 18:11
用编辑框知道咋写 不知道文本咋写

文本咋写是啥意思

Javatym

LEOONL 发表于 2024-8-4 18:14
文本咋写是啥意思

txt文本文件  删除行

LEOONL

Javatym 发表于 2024-8-4 18:17
txt文本文件  删除行

  

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

变量名	类 型	静态	数组	备 注
文本	文本型		0
n	整数型
新文本	文本型

文本 ＝ 分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), #换行符, )
计次循环首 (取数组成员数 (文本), n)
如果真 (寻找文本 (文本 [n], “123456789”, , 假) ＝ -1)
新文本 ＝ 新文本 ＋ 文本 [n] ＋ #换行符

计次循环尾 ()
写到文件 (取运行目录 () ＋ “\1.txt”, 到字节集 (新文本))

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 新文本, 文本型<br /> <br /> 文本 ＝ 分割文本 (到文本 (读入文件 (取运行目录 () ＋ “\1.txt”)), #换行符, )<br /> .计次循环首 (取数组成员数 (文本), n)<br />     .如果真 (寻找文本 (文本 [n], “123456789”, , 假) ＝ -1)<br />         新文本 ＝ 新文本 ＋ 文本 [n] ＋ #换行符<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 写到文件 (取运行目录 () ＋ “\1.txt”, 到字节集 (新文本))

一线之隔

  

文本_删除指定文本行 ()
文本_删除指定变量文本行1 ()

.版本 2<br /> <br /> 文本_删除指定文本行 ()<br /> 文本_删除指定变量文本行1 ()

一线之隔

  

文本_删除指定文件行 ()
文本_删除指定文件文本行1 ()

.版本 2<br /> <br /> 文本_删除指定文件行 ()<br /> 文本_删除指定文件文本行1 ()