请教在桌面文本每隔5行插入相同内容

603022353

插入前
插入后



学长们举个例

wtflxk

  

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

变量名	类 型	静态	数组	备 注
目录	文本型
a	文本型			文件名
b	字节集		0
c	字节集
i	整数型

目录 ＝ 取特定目录 ( #系统桌面 )
a ＝ 寻找文件 (目录 ＋ “*.txt”, 1 ＋ 32)
判断循环首 (a ≠ “”)
b ＝ 分割字节集 (读入文件 (目录 ＋ a), 到字节集 ( #换行符 ), )
计次循环首 (取数组成员数 (b), i)
如果 (i ％ 5 ＝ 0)
c ＝ c ＋ b [i] ＋ 到字节集 ( #换行符 ) ＋ 到字节集 (“----------------------------”) ＋ 到字节集 ( #换行符 )
c ＝ c ＋ b [i] ＋ 到字节集 ( #换行符 )

计次循环尾 ()
写到文件 (目录 ＋ a, c)
a ＝ 寻找文件 (, )
判断循环尾 ()
信息框 (“完成要求”, 0, , )

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .子程序 子程序1<br /> .局部变量 目录, 文本型<br /> .局部变量 a, 文本型, , , 文件名<br /> .局部变量 b, 字节集, , "0"<br /> .局部变量 c, 字节集<br /> .局部变量 i, 整数型<br /> <br /> 目录 ＝ 取特定目录 (#系统桌面)<br /> a ＝ 寻找文件 (目录 ＋ “*.txt”, 1 ＋ 32)<br /> .判断循环首 (a ≠ “”)<br />     b ＝ 分割字节集 (读入文件 (目录 ＋ a), 到字节集 (#换行符), )<br />     .计次循环首 (取数组成员数 (b), i)<br />         .如果 (i ％ 5 ＝ 0)<br />             c ＝ c ＋ b <i> ＋ 到字节集 (#换行符) ＋ 到字节集 (“----------------------------”) ＋ 到字节集 (#换行符)<br />         .否则<br />             c ＝ c ＋ b <i> ＋ 到字节集 (#换行符)<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     写到文件 (目录 ＋ a, c)<br />     a ＝ 寻找文件 (, )<br /> .判断循环尾 ()<br /> 信息框 (“完成要求”, 0, , )

直接调用这个就可以了




补充内容 (2022-4-15 10:31):
该子程序执行后 会在你的桌面所有的TXT文件中都执行相同的操作

603022353

文本处理.e (96.64 KB, 下载次数: 4)

2022-4-15 10:25 上传

点击文件名下载附件

初夏喔

不需要循环 测试30.e (905.77 KB, 下载次数: 10)

2022-4-15 10:37 上传

点击文件名下载附件