易语言怎么搜索指定文件夹
答案:1 悬赏:20 手机版
解决时间 2021-03-15 01:32
- 提问者网友:嘚啵嘚啵
- 2021-03-14 20:48
易语言怎么搜索指定文件夹
最佳答案
- 五星知识达人网友:由着我着迷
- 2021-03-14 21:53
搜索全名的 会不? 然后把所有文件的名字都逐步搜索出来 然后一一比对 含有启动的 就是你要的了参考:================================================================
.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 目录, 文本型
目录= 浏览文件夹 (“请选择目录:”, )
.如果 (取文本右边 (目录, 1) ≠“\”)
目录= 目录 +“\”
.否则
.如果结束编辑框1.内容 = 目录寻找(目录)
.子程序 寻找
.参数 文件夹, 文本型
.局部变量 文件, 文本型
处理事件 ()
.如果 (取文本右边 (文件夹, 1) ≠“\”)
文件夹 = 文件夹 +“\”
.否则
.如果结束文件= 寻找文件 (文件夹 +“*.mp3”, )
.判断循环首 (文件 ≠“”)
列表框1.加入项目 (文件夹 + 文件, )
文件= 寻找文件 (, )
.判断循环尾 ()
文件= 寻找文件 (文件夹 +“*.*”, #子目录) ' 此时 文件就变成了新的文件夹
.判断循环首 (文件 ≠“”)
.如果真 (文件 ≠“.”且 文件 ≠“..”)
寻找(文件夹 + 文件) ' 寻找新的文件夹
.如果真结束
文件= 寻找文件 (, #子目录)
.判断循环尾 ()
.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 目录, 文本型
目录= 浏览文件夹 (“请选择目录:”, )
.如果 (取文本右边 (目录, 1) ≠“\”)
目录= 目录 +“\”
.否则
.如果结束编辑框1.内容 = 目录寻找(目录)
.子程序 寻找
.参数 文件夹, 文本型
.局部变量 文件, 文本型
处理事件 ()
.如果 (取文本右边 (文件夹, 1) ≠“\”)
文件夹 = 文件夹 +“\”
.否则
.如果结束文件= 寻找文件 (文件夹 +“*.mp3”, )
.判断循环首 (文件 ≠“”)
列表框1.加入项目 (文件夹 + 文件, )
文件= 寻找文件 (, )
.判断循环尾 ()
文件= 寻找文件 (文件夹 +“*.*”, #子目录) ' 此时 文件就变成了新的文件夹
.判断循环首 (文件 ≠“”)
.如果真 (文件 ≠“.”且 文件 ≠“..”)
寻找(文件夹 + 文件) ' 寻找新的文件夹
.如果真结束
文件= 寻找文件 (, #子目录)
.判断循环尾 ()
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯