如何读取目录下的TXT文本到超级列表框

xiassang

定时倒计时.e (956.79 KB, 下载次数: 2)

2023-7-28 00:21 上传

点击文件名下载附件
我想让程序打开后搜索运行目录下的XXX文件夹下的所有TXT文本到超级列表框中

然后勾选超级列表框的指定txt后到点执行替换操作，求大神帮助！

时髦猪

11.rar (233.06 KB, 下载次数: 17)

2023-7-28 13:05 上传

点击文件名下载附件

biostk

还是走定制区吧

时髦猪

  

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

变量名	类 型	静态	数组	备 注
复制目录	文本型		0
i	整数型
表象	整数型

编辑框1.内容 ＝ 浏览文件夹 (“请选择 XXX 的目录”, 假, )
文件_枚举 (编辑框1.内容, “*.txt”, 复制目录, 真, 假, 假)
调试输出 (复制目录)
计次循环首 (取数组成员数 (复制目录), i)
表象 ＝ 超级列表框2.插入表项 (, , , , , )
超级列表框2.置标题 (表象, 1, 复制目录 [i])
计次循环尾 ()

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 复制目录, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 表象, 整数型<br /> <br /> 编辑框1.内容 ＝ 浏览文件夹 (“请选择 XXX 的目录”, 假, )<br /> 文件_枚举 (编辑框1.内容, “*.txt”, 复制目录, 真, 假, 假)<br /> 调试输出 (复制目录)<br /> .计次循环首 (取数组成员数 (复制目录), i)<br />     表象 ＝ 超级列表框2.插入表项 (, , , , , )<br />     超级列表框2.置标题 (表象, 1, 复制目录 <i>)<br /> .计次循环尾 ()

太晚了  先给你写这些 自己研究下把

夜黑如歌

  

变量名	类 型	静态	数组	备 注
e	整数型
局_文件名	整数型
局_返回文件	文本型		0
i	整数型

局_文件名 ＝ 文件_枚举 (“C:\Users\7\OneDrive\小说\”, “*.txt”, 局_返回文件, 真, , )
计次循环首 (取数组成员数 (局_返回文件), i)
e ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (e, 0, 局_返回文件 [i])
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 e, 整数型<br /> .局部变量 局_文件名, 整数型<br /> .局部变量 局_返回文件, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 局_文件名 ＝ 文件_枚举 (“C:\Users\7\OneDrive\小说\”, “*.txt”, 局_返回文件, 真, , )<br /> .计次循环首 (取数组成员数 (局_返回文件), i)<br />     e ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (e, 0, 局_返回文件 <i>)<br /> .计次循环尾 ()

原理是这么个原理
然后定时上传加个时钟对比设定时间和现行时间就行了

承易

只是读取出来，至于修改，不明白你要怎么修改

补充内容 (2023-7-28 01:00):
编程就是 流程化 一个问题 一个问题 一步步 解决 最终达到目的

xiassang

承易 发表于 2023-7-28 00:59
只是读取出来，至于修改，不明白你要怎么修改

补充内容 (2023-7-28 01:00):

非常感谢！

xiassang

时髦猪 发表于 2023-7-28 00:40
[e=4].版本 2
.支持库 shell
.支持库 spec

好的！感谢，辛苦你了！