易语言多线程导入超级列表框,F盘下*.txt文件名
发布网友
发布时间：2022-04-30 19:01
共1个回答
热心网友
时间：2022-06-30 02:54
.支持库 shell
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 文件夹路径, 文本型
.局部变量 文件名称, 文本型
.局部变量 文件成员, 文本型, , "0"
.局部变量 n, 整数型
文件夹路径 ＝ 浏览文件夹 (“选择文件夹”, )
文件名称 ＝ 寻找文件 (文件夹路径 ＋ “\*.mp3”, )
.判断循环首 (文件名称 ≠ “”)
加入成员 (文件成员, 文件名称)
文件名称 ＝ 寻找文件 (, )
.判断循环尾 ()
.计次循环首 (取数组成员数 (文件成员), n)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (n － 1, 0, 文件成员 [n])
超级列表框1.置标题 (n － 1, 1, 文件夹路径 ＋ “\” ＋ 文件成员 [n])
.计次循环尾 ()
