求助论坛兄弟们,谢谢了!! 同时查找多个文件

真实的我

文件名 ＝ 寻找文件 (目录 ＋ “1.EXE”, )                  


“1.EXE”    这个地方        我想改为可以同时查找   1.exe  2.exe 3.exe 4.exe 5.exe


代码应 怎写的,,谢谢兄弟了!!

Hoibben

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .子程序 _窗口1_创建完毕
   
5. .局部变量 a, 文本型, , "0"
   
6. .局部变量 目录, 文本型
   
7. .局部变量 文件名, 文本型
   
8. .局部变量 b
   
9. 
   
10. 目录 ＝ 取运行目录 () ＋ “\”
    
11. a ＝ { “1.exe”, “2.exe”, “3.exe”, “4.exe”, “5.exe” }
    
12. .计次循环首 (取数组成员数 (a), b)
    
13.     文件名 ＝ 寻找文件 (目录 ＋ a [b], )
    
14.     调试输出 (文件名)
    
15. .计次循环尾 ()
    

复制代码

补充内容 (2013-6-22 14:23):
直接复制进去。。。

找不到好友

精易模块里有
自己找，我懒得找了

小布°

楼桑的可以

Farmer°

寻找文件("*.exe")
这样可以?

Farmer°

禁止IP 发表于 2013-6-22 14:28
楼桑的可以

我感觉楼上的哪个写了和没写差不多...

Hoibben

农夫三拳有点痛 发表于 2013-6-22 14:36
我感觉楼上的哪个写了和没写差不多...

先声明，仅交流而已，不针对。。。
我想说是在说我吧，你觉得没写一样？敢问你的寻找文件("*.exe")就可以？我这个是主要针对卤煮发的问题写的，绝对符合提问的要求，你怎么说不可以呢？你确定你试了吗？当然如果文件(名)不确定的话我倒觉得可以用枚举的方法比较好。。。

御风软件

精易模块，文件_枚举 ()
--------------------------------------------------------------------------------
如果都是你说的+1的，假如判断N个，那么可以写成

.计次循环首 (N,i )
    文件名 ＝ 寻找文件 (目录 ＋ 到文本（i）+“.exe”], )
.计次循环尾 ()

Farmer°

Hoibben 发表于 2013-6-22 15:02
先声明，仅交流而已，不针对。。。
我想说是在说我吧，你觉得没写一样？敢问你的寻找文件("*.exe")就可 ...

5555555我只是说说,又没针对你

真实的我

.版本 2

.子程序 搜寻, , , 如提供搜索目录路径，将会搜索此目录所有在内的文件。
.参数 目录, 文本型, , 目录，如“C:\”盘。
.局部变量 文件名, 文本型

处理事件 ()  ' 给出机会以接收停止按钮事件，搜索时会占用程序的资源，使得延时处理其它事件，所要用：“处理事件（）”。
.如果真 (取文本右边 (目录, 1) ≠ “\”)  ' 判断当前目录的格式是否正确。如“C:”,这格式是不正确的,改为"C:\"。
    目录 ＝ 目录 ＋ “\”
.如果真结束
文件名 ＝ 寻找文件 (目录 ＋ “1.EXE”, )
标签1.标题 ＝ “正在查找目录：” ＋ 目录
.如果真 (文件名 ≠ “”)
    找到文件 ＝ 真



1.exe  改为同时查找    1.exe 2.exe 3.exe 4.exe 5.exe   应怎写呀,,,谢谢各位