TXT文件操作

15910791922

1.txt文件保存了很多行数据，我想每次从中读取3行，读完就删掉这3行，接着循环，如何搞啊，有没有简便的方法

寒潮

  

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

变量名	类 型	静态	数组	备 注
局_文件号	整数型
局_当前位置	整数型
局_文本长度	整数型
局_计次	整数型

局_文件号 ＝ 打开文件 (取运行目录 () ＋ “\abc.txt”, , )
如果真 (局_文件号 ＝ 0)
返回 ()
计次循环首 (3, 局_计次)
移到文件首 (局_文件号)
读入一行 (局_文件号)
局_当前位置 ＝ 取读写位置 (局_文件号)
移到文件首 (局_文件号)
删除数据 (局_文件号, 局_当前位置)
计次循环尾 ()
关闭文件 (局_文件号)

.版本 2<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 局_文件号, 整数型<br /> .局部变量 局_当前位置, 整数型<br /> .局部变量 局_文本长度, 整数型<br /> .局部变量 局_计次, 整数型<br /> <br /> 局_文件号 ＝ 打开文件 (取运行目录 () ＋ “\abc.txt”, , )<br /> .如果真 (局_文件号 ＝ 0)<br />     返回 ()<br /> .如果真结束<br /> .计次循环首 (3, 局_计次)<br />     移到文件首 (局_文件号)<br />     读入一行 (局_文件号)<br />     局_当前位置 ＝ 取读写位置 (局_文件号)<br />     移到文件首 (局_文件号)<br />     删除数据 (局_文件号, 局_当前位置)<br /> .计次循环尾 ()<br /> 关闭文件 (局_文件号)

每次读取头部的3行，并删除。

快乐魔芋

系统核心支持库->文件读写

小情缘

子文本替换

pengtusheng

文本_取某位置文本       文本_删除指定文本行     文本_取行数

神一样的程序猿

打开文件  读数据

音速

打开文件，读入文本，  
文本_文本_取指定变量文本行()
子文本替换，  

gyqoop

用核心支持库文本命令就能实现

寒潮

Demo.e (3.2 KB, 下载次数: 2)

2019-12-3 18:59 上传

点击文件名下载附件
没上传吗？怎么没看见帖子出现？

wyyidfuck

打开文件，读入文本，  
文本_文本_取指定变量文本行()
子文本替换，