大家好,易语言,如何向已经有数据的文本文件中追加文本,要求不能用先读出来,再写回去的方法,而是直接
2个回答
展开全部
这个工具太简单了。代码如下:
.版本 2
.子程序 _按钮1_被单击
.局部变量 文件, 文本型
文件 = 寻找文件 (“d:\*.txt”, )
.判断循环首 (文件 ≠ “”)
.如果真 (文件 ≠ “”)
编辑框1.加入文本 (到文本 (读入文件 (“d:\” + 文件)))
.如果真结束
文件 = 寻找文件 (, )
.判断循环尾 ()
我上面的例程是把所有D盘根目录下的.TXT文本文件里的内容显示在 编辑框1里。如果你要找别的目录下的文件。就把 “d:\*.txt”和“d:\”+文件 ,这两个地方改成你要找的那个目录名就可以了,,。。 记得加分哦!
.版本 2
.子程序 _按钮1_被单击
.局部变量 文件, 文本型
文件 = 寻找文件 (“d:\*.txt”, )
.判断循环首 (文件 ≠ “”)
.如果真 (文件 ≠ “”)
编辑框1.加入文本 (到文本 (读入文件 (“d:\” + 文件)))
.如果真结束
文件 = 寻找文件 (, )
.判断循环尾 ()
我上面的例程是把所有D盘根目录下的.TXT文本文件里的内容显示在 编辑框1里。如果你要找别的目录下的文件。就把 “d:\*.txt”和“d:\”+文件 ,这两个地方改成你要找的那个目录名就可以了,,。。 记得加分哦!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询