读取TXT文本并分割导入编辑框

xingge52a

分割文本并导入.e (3.54 KB, 下载次数: 11)

2021-11-1 23:08 上传

点击文件名下载附件

完成.txt (876 Bytes, 下载次数: 9)

2021-11-1 23:08 上传

点击文件名下载附件
同一个txt文件内分割出[登录成功][登录失败][无效账号]下的所有文本并导入编辑框，
需要单独分割出[登录成功][登录失败][无效账号]下面所有的内容并在按钮上改个标题导入多少个

APPLEUFO

我也来一个

fff1122

这个方法不适用于大量数据！

han15070727425

记得采纳，别忘记了啊

gzylove

.版本 2

编辑框1.内容 ＝ “”
文件_取配置项名数组 (取运行目录 () ＋ “\完成.txt”, “登录成功”, SZ)
.计次循环首 (取数组成员数 (SZ), i)
    编辑框1.加入文本 (SZ [i] ＋ #换行符)
.计次循环尾 ()

E语言|菜鸟

分割文本并导入.e (895.09 KB, 下载次数: 8)

2021-11-1 23:57 上传

点击文件名下载附件

APPLEUFO

  

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

变量名	类 型	静态	数组	备 注
局变_行	文本型		0
n1	整数型
ls	整数型
局变_段	文本型		0
局变_次数	整数型

局变_行 ＝ 分割文本 (程变_文本, #换行符, )
数组模块_删除空数组_文本 (局变_行)
计次循环首 (取数组成员数 (局变_行), n1)
ls ＝ 寻找文本 (局变_行 [n1], “=登录成功”, , 假)
如果真 (ls ≠ -1)
局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )
编辑框1.加入文本 (局变_段 [1] ＋ #换行符 )
局变_次数 ＝ 局变_次数 ＋ 1

计次循环尾 ()
按钮1.标题 ＝ “导入登录成功账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”

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

变量名	类 型	静态	数组	备 注
局变_行	文本型		0
n1	整数型
ls	整数型
局变_段	文本型		0
局变_次数	整数型

局变_行 ＝ 分割文本 (程变_文本, #换行符, )
数组模块_删除空数组_文本 (局变_行)
计次循环首 (取数组成员数 (局变_行), n1)
ls ＝ 寻找文本 (局变_行 [n1], “=登录失败”, , 假)
如果真 (ls ≠ -1)
局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )
编辑框2.加入文本 (局变_段 [1] ＋ #换行符 )
局变_次数 ＝ 局变_次数 ＋ 1

计次循环尾 ()
按钮2.标题 ＝ “导入登录失败账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”

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

变量名	类 型	静态	数组	备 注
局变_行	文本型		0
n1	整数型
ls	整数型
局变_段	文本型		0
局变_次数	整数型

局变_行 ＝ 分割文本 (程变_文本, #换行符, )
数组模块_删除空数组_文本 (局变_行)
计次循环首 (取数组成员数 (局变_行), n1)
ls ＝ 寻找文本 (局变_行 [n1], “=无效账号”, , 假)
如果真 (ls ≠ -1)
局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )
编辑框3.加入文本 (局变_段 [1] ＋ #换行符 )
局变_次数 ＝ 局变_次数 ＋ 1

计次循环尾 ()
按钮3.标题 ＝ “导入无效账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局变_行, 文本型, , "0"<br /> .局部变量 n1, 整数型<br /> .局部变量 ls, 整数型<br /> .局部变量 局变_段, 文本型, , "0"<br /> .局部变量 局变_次数, 整数型<br /> <br /> 局变_行 ＝ 分割文本 (程变_文本, #换行符, )<br /> 数组模块_删除空数组_文本 (局变_行)<br /> <br /> .计次循环首 (取数组成员数 (局变_行), n1)<br /> <br />     ls ＝ 寻找文本 (局变_行 [n1], “=登录成功”, , 假)<br />     .如果真 (ls ≠ -1)<br />         局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )<br /> <br />         编辑框1.加入文本 (局变_段 [1] ＋ #换行符)<br />         局变_次数 ＝ 局变_次数 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 按钮1.标题 ＝ “导入登录成功账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 局变_行, 文本型, , "0"<br /> .局部变量 n1, 整数型<br /> .局部变量 ls, 整数型<br /> .局部变量 局变_段, 文本型, , "0"<br /> .局部变量 局变_次数, 整数型<br /> <br /> 局变_行 ＝ 分割文本 (程变_文本, #换行符, )<br /> 数组模块_删除空数组_文本 (局变_行)<br /> <br /> .计次循环首 (取数组成员数 (局变_行), n1)<br /> <br />     ls ＝ 寻找文本 (局变_行 [n1], “=登录失败”, , 假)<br />     .如果真 (ls ≠ -1)<br />         局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )<br /> <br />         编辑框2.加入文本 (局变_段 [1] ＋ #换行符)<br />         局变_次数 ＝ 局变_次数 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 按钮2.标题 ＝ “导入登录失败账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”<br /> <br /> <br /> .子程序 _按钮3_被单击<br /> .局部变量 局变_行, 文本型, , "0"<br /> .局部变量 n1, 整数型<br /> .局部变量 ls, 整数型<br /> .局部变量 局变_段, 文本型, , "0"<br /> .局部变量 局变_次数, 整数型<br /> <br /> 局变_行 ＝ 分割文本 (程变_文本, #换行符, )<br /> 数组模块_删除空数组_文本 (局变_行)<br /> <br /> .计次循环首 (取数组成员数 (局变_行), n1)<br /> <br />     ls ＝ 寻找文本 (局变_行 [n1], “=无效账号”, , 假)<br />     .如果真 (ls ≠ -1)<br />         局变_段 ＝ 分割文本 (局变_行 [n1], “=”, )<br /> <br />         编辑框3.加入文本 (局变_段 [1] ＋ #换行符)<br />         局变_次数 ＝ 局变_次数 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 按钮3.标题 ＝ “导入无效账号” ＋ “(” ＋ 到文本 (局变_次数) ＋ “)”

我想到个更简单的

静静聆听音乐吧

  

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

变量名	类 型	静态	数组	备 注
cfg	类_配置项
Int	整数型
Name	文本型		0
value	文本型		0

Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “登录成功”, Name, value)
计次循环首 (取数组成员数 (Name), Int)
编辑框1.加入文本 (Name [Int] ＋ #换行符 )
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
cfg	类_配置项
Int	整数型
Name	文本型		0
value	文本型		0

Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “登录失败”, Name, value)
计次循环首 (取数组成员数 (Name), Int)
编辑框2.加入文本 (Name [Int] ＋ #换行符 )
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
cfg	类_配置项
Int	整数型
Name	文本型		0
value	文本型		0

Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “无效账号”, Name, value)
计次循环首 (取数组成员数 (Name), Int)
编辑框3.加入文本 (Name [Int] ＋ #换行符 )
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 cfg, 类_配置项<br /> .局部变量 Int, 整数型<br /> .局部变量 Name, 文本型, , "0"<br /> .局部变量 value, 文本型, , "0"<br /> <br /> Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “登录成功”, Name, value)<br /> .计次循环首 (取数组成员数 (Name), Int)<br />     编辑框1.加入文本 (Name [Int] ＋ #换行符)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 cfg, 类_配置项<br /> .局部变量 Int, 整数型<br /> .局部变量 Name, 文本型, , "0"<br /> .局部变量 value, 文本型, , "0"<br /> <br /> Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “登录失败”, Name, value)<br /> .计次循环首 (取数组成员数 (Name), Int)<br />     编辑框2.加入文本 (Name [Int] ＋ #换行符)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮3_被单击<br /> .局部变量 cfg, 类_配置项<br /> .局部变量 Int, 整数型<br /> .局部变量 Name, 文本型, , "0"<br /> .局部变量 value, 文本型, , "0"<br /> <br /> Int ＝ cfg.枚举项 (取运行目录 () ＋ “\完成.txt”, “无效账号”, Name, value)<br /> .计次循环首 (取数组成员数 (Name), Int)<br />     编辑框3.加入文本 (Name [Int] ＋ #换行符)<br /> .计次循环尾 ()

分割文本并导入.e (904.62 KB, 下载次数: 4)

2021-11-2 04:01 上传

点击文件名下载附件
使用精易模块