怎么取一个文件夹下指定的文件类型到列表框

梦境中的西岚╰

而且这个文件夹里的每个子文件夹都要获取到  最好上传个实例源码

福仔

  

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

子程序_寻找文件 (“D:\”)  ' 自己写目录

子程序名	返回值类型	公开	备 注
子程序_寻找文件
参数名	类 型	参考	可空	数组	备 注
文件目录	文本型

变量名	类 型	静态	数组	备 注
找到的文件	文本型

文件目录 ＝ 删首尾空 (文件目录)
如果真 (取文本右边 (文件目录, 1) ≠ “\”)
文件目录 ＝ 文件目录 ＋ “\”
找到的文件 ＝ 寻找文件 (文件目录 ＋ “*.*”, )  ' *.*是所有文件  想要什么文件自己改
判断循环首 (找到的文件 ≠ “”)
处理事件 ()
列表框1.加入项目 (文件目录 ＋ 找到的文件, )
找到的文件 ＝ 寻找文件 (, )
判断循环尾 ()
找到的文件 ＝ 寻找文件 (文件目录 ＋ “*.*”, #子目录 )
判断循环首 (找到的文件 ≠ “”)
处理事件 ()
如果真 (取文本左边 (找到的文件, 1) ≠ “.”)
子程序_寻找文件 (文件目录 ＋ 找到的文件)
找到的文件 ＝ 寻找文件 (, #子目录 )
判断循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 子程序_寻找文件 (“D:\”)  ' 自己写目录<br /> <br /> .子程序 子程序_寻找文件<br /> .参数 文件目录, 文本型<br /> .局部变量 找到的文件, 文本型<br /> <br /> 文件目录 ＝ 删首尾空 (文件目录)<br /> .如果真 (取文本右边 (文件目录, 1) ≠ “\”)<br />     文件目录 ＝ 文件目录 ＋ “\”<br /> .如果真结束<br /> 找到的文件 ＝ 寻找文件 (文件目录 ＋ “*.*”, )  ' *.*是所有文件  想要什么文件自己改<br /> .判断循环首 (找到的文件 ≠ “”)<br />     处理事件 ()<br />     列表框1.加入项目 (文件目录 ＋ 找到的文件, )<br />     找到的文件 ＝ 寻找文件 (, )<br /> .判断循环尾 ()<br /> 找到的文件 ＝ 寻找文件 (文件目录 ＋ “*.*”, #子目录)<br /> .判断循环首 (找到的文件 ≠ “”)<br />     处理事件 ()<br />     .如果真 (取文本左边 (找到的文件, 1) ≠ “.”)<br />         子程序_寻找文件 (文件目录 ＋ 找到的文件)<br />     .如果真结束<br />     找到的文件 ＝ 寻找文件 (, #子目录)<br /> .判断循环尾 ()

用递归,楼上说得很对 你就是伸手党

梦境中的西岚╰

有点说的不详细 在说一下 是所有指定文件类型的的文件名字到列表框

E丶JavaScript

莫非这就是传说中的伸手党

梦境中的西岚╰

自焚 发表于 2016-4-29 00:59
莫非这就是传说中的伸手党

不是伸手党哦 有精易币奖励的哦

心中的沉默

楼上正解，取某文件类型路径显示到列表框

荖貢

用 搜索文件() 命令获取

lvzanhe

5楼正解

1278449943

梦境中的西岚╰ 发表于 2016-4-29 01:01
不是伸手党哦 有精易币奖励的哦

  被人理解错了