文本_插入文本到关键字所在行后 自己写的望加入

Harry·

  

子程序名	返回值类型	公开	备 注
文本_插入文本到关键字所在行后	文本型		插入文本到关键字所在行后，返回处理后的文本
参数名	类 型	参考	可空	数组	备 注
原文本	文本型
关键字	文本型
插入内容	文本型
是否换行	逻辑型				是否换行插入文本，默认为真

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

临时数组 ＝ 分割文本 (原文本, #换行符, )
如果真 (是否为空 (是否换行) ＝ 真)
是否换行 ＝ 真

计次循环首 (取数组成员数 (临时数组), i)
如果 (寻找文本 (临时数组 [i], 关键字, , 假) ≠ -1)
如果 (是否换行 ＝ 真)
临时数组 [i] ＝ 临时数组 [i] ＋ #换行符 ＋ 插入内容 ＋ #换行符
临时数组 [i] ＝ 临时数组 [i] ＋ 插入内容 ＋ #换行符




临时文本 ＝ 临时文本 ＋ 临时数组 [i]
计次循环尾 ()
返回 (临时文本)

.版本 2<br /> <br /> .子程序 文本_插入文本到关键字所在行后, 文本型, , 插入文本到关键字所在行后，返回处理后的文本<br /> .参数 原文本, 文本型<br /> .参数 关键字, 文本型<br /> .参数 插入内容, 文本型<br /> .参数 是否换行, 逻辑型, 可空, 是否换行插入文本，默认为真<br /> .局部变量 i, 整数型<br /> .局部变量 临时数组, 文本型, , "0"<br /> .局部变量 临时文本, 文本型<br /> <br /> 临时数组 ＝ 分割文本 (原文本, #换行符, )<br /> .如果真 (是否为空 (是否换行) ＝ 真)<br />     是否换行 ＝ 真<br /> .如果真结束<br /> <br /> .计次循环首 (取数组成员数 (临时数组), i)<br />     .如果 (寻找文本 (临时数组 <i>, 关键字, , 假) ≠ -1)<br />         .如果 (是否换行 ＝ 真)<br />             临时数组 <i> ＝ 临时数组 <i> ＋ #换行符 ＋ 插入内容 ＋ #换行符<br />         .否则<br />             临时数组 <i> ＝ 临时数组 <i> ＋ 插入内容 ＋ #换行符<br />         .如果结束<br /> <br /> <br />     .否则<br /> <br />     .如果结束<br />     临时文本 ＝ 临时文本 ＋ 临时数组 <i><br /> .计次循环尾 ()<br /> 返回 (临时文本)

肥肉里的肌肉

还是说只是在程序上返回，不会自己插入到TXT文本里，要我们自己再把返回的数据写入到文本里？

肥肉里的肌肉

这个返回的文本直接会插入到原来的那个文本上吗

yejianfeng

反正我也先复制一下

renxinmi

反正我先复制一下