易语言寻找文件

也就是 寻找 某一个文件夹 里面有 哪些文件保存 找到的文件夹的名字就行

第1个回答  推荐于2016-04-03
一个按钮一个编辑框
.版本 2
.子程序 _按钮1_被单击
搜寻 (“F:\drivers”)' 这个就是位置,自己修改,或者修改成通用对话框
.子程序 搜寻
.参数 目录, 文本型
.局部变量 文件名, 文本型
处理事件 ()
.如果真 (取文本右边 (目录, 1) ≠ “\”)
目录 = 目录 + “\”
.如果真结束
文件名 = 寻找文件 (目录 + “*.*”, ) ' “*.*”搜索所有文件。
.判断循环首 (文件名 ≠ “”) ' 判断文件名是否有效,有效向下执行搜索。
编辑框1.加入文本 (目录 + 文件名 + #换行符) ' 当前搜索到的文件路径放到编辑框1中
文件名 = 寻找文件 (, ) ' 继续搜寻文件
.判断循环尾 ()本回答被提问者采纳
相似回答