易语言如何选中组合框里的文件夹,然后让文件夹里的文件展示在超级列表框中呢?
发布网友
发布时间:2022-12-25 13:30
我来回答
共2个回答
热心网友
时间:2023-10-12 14:47
.版本 2
.支持库 iext
.子程序 目录找文件
.参数 目录, 文本型
.局部变量 文件名, 文本型
.局部变量 b, 整数型
超级列表框1.全部删除 ()
目录 = 选择 (取文本右边 (目录, 1) = “\”, 目录, 目录 + “\”)
文件名 = 寻找文件 (目录 + “\*.*”, #子目录)
.判断循环首 (文件名 ≠ “”)
.如果真 (文件名 ≠ “.” 且 文件名 ≠ “..”)
.判断开始 (选择框1.选中 = 真)
b = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (b, 0, 文件名)
.默认
.如果真 (位与 (取文件属性 (目录 + 文件名), #隐藏文件) = 0)
b = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (b, 0, 文件名)
.如果真结束
.判断结束
.如果真结束
文件名 = 寻找文件 (, #子目录)
.判断循环尾 ()
===============================
这个子程序给你,你自己看下再修改修改
热心网友
时间:2023-10-12 14:48
用.net平台写同样的代码,工作量应该少很多