批量分割文本

Peerless

帮忙写个批量分割文本
把中间的 11111 批量分割到另一个文本里面，用换行符区分
1.txt (100 Bytes, 下载次数: 4)

2020-3-31 01:32 上传

点击文件名下载附件

sunsir

Like this~

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

变量名	类 型	静态	数组	备 注
json	类_json
i	整数型
文件号	整数型

json.解析 (编辑框1.内容)
文件号 ＝ 打开文件 (取运行目录 () ＋ “/保存.txt”, #重写, )
计次循环首 (json.成员数 (“data”), i)
写文本行 (文件号, json.取通用属性 (“data[” ＋ 到文本 (i － 1) ＋ “]”, ))
计次循环尾 ()
关闭文件 (文件号)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 json, 类_json<br /> .局部变量 i, 整数型<br /> .局部变量 文件号, 整数型<br /> <br /> json.解析 (编辑框1.内容)<br /> 文件号 ＝ 打开文件 (取运行目录 () ＋ “/保存.txt”, #重写, )<br /> .计次循环首 (json.成员数 (“data”), i)<br />     写文本行 (文件号, json.取通用属性 (“data[” ＋ 到文本 (i － 1) ＋ “]”, ))<br /> .计次循环尾 ()<br /> 关闭文件 (文件号)

test.e (842.97 KB, 下载次数: 2)

2020-3-31 17:03 上传

点击文件名下载附件

A十二

  

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

变量名	类 型	静态	数组	备 注
待处理数组	文本型		0
i	文本型

计次循环首 (取数组成员数 (待处理数组), i)
编辑框1.加入文本 (待处理数组 [i])
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 待处理数组, 文本型, , "0"<br /> .局部变量 i, 文本型<br /> <br /> .计次循环首 (取数组成员数 (待处理数组), i)<br />     编辑框1.加入文本 (待处理数组 <i>)<br /> .计次循环尾 ()