文本文档的问题，求帮忙

xiaoshumiao1136 · 发表于 2022-5-28 21:09:14

比如一个文件夹里面，有4个txt文档，或者有5个，数量不固定，
请问，怎么分别向每一个txt文档里面写一行文字？
求大佬写个源码谢谢

Ruang · 发表于 2022-5-28 21:09:15

子程序名	返回值类型	公开	备注
文件操作	整数型		返回操作的文本数量
参数名	类型	参考	可空	数组	备注
目录	文本型

变量名	类型	静态	数组	备注
文件	文本型		0
计次	整数型
文件号	整数型

如果真 (取文本右边 (目录, 1) ≠ “\”)

目录＝目录＋ “\”
文件_枚举 (目录, “*.txt”, 文件, 真, , )

计次循环首 (取数组成员数 (文件), 计次)

文件号＝打开文件 (文件 [计次], 3, 4)

移到文件尾 (文件号)

写出文本 (文件号, “添加内容”)

关闭文件 (文件号)

计次循环尾 ()
返回 (取数组成员数 (文件))

Ruang · 发表于 2022-5-28 21:10:32

打开文件（）
关闭文件（）

补充内容 (2022-5-28 21:11):
文件_枚举（）
-精易模块

企鹅号525150138 · 发表于 2022-5-28 21:11:25

.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 a, 文本型, , "0"
.局部变量 i, 整数型

文件_枚举 (取运行目录 (), “*.txt”, a, 真)
.计次循环首 (取数组成员数 (a), i)
写到文件 (a [i], 到字节集 (“写入的内容”))
.计次循环尾 ()

xiaoshumiao1136 · 发表于 2022-5-28 21:27:26

企鹅号525150138 发表于 2022-5-28 21:11
.版本 2

.子程序 __启动窗口_创建完毕

C:\Users\Administrator\Desktop\12.png
大佬没效果啊

xiaoshumiao1136 · 发表于 2022-5-28 21:28:32

企鹅号525150138 发表于 2022-5-28 21:11
.版本 2

.子程序 __启动窗口_创建完毕

是这样写嘛? 没效果啊

影知 · 发表于 2022-5-28 21:32:37

xiaoshumiao1136 发表于 2022-5-28 21:28
是这样写嘛? 没效果啊

调试输出(a) '看看路径格式是否完全正确

Suky · 发表于 2022-5-28 21:37:53

.版本 2

文件_枚举 () ' 精易模块
打开文件 (, , )
移到文件尾 ()
写出文本 (, )
关闭文件 ()

企鹅号525150138 · 发表于 2022-5-28 21:39:53

xiaoshumiao1136 发表于 2022-5-28 21:28
是这样写嘛? 没效果啊

xiaoshumiao1136 · 发表于 2022-5-28 22:15:51

企鹅号525150138 发表于 2022-5-28 21:39
取运行目录换成你放txt文件的目录

大佬，每一个文档里面原来有内容的，我需要加在最下面加入一些文字，怎么写啊？
我打赏您了，请帮帮忙谢谢

		自动登录	找回密码
密码			注册

[已解决] 文本文档的问题，求帮忙

最佳答案

点评

评分

点评

[已解决] 文本文档的问题， 求帮忙

最佳答案

点评

评分

点评

[已解决] 文本文档的问题，求帮忙