搜索文件bug?

tengbo

  1.png怎么丢了

12.rar (225.17 KB, 下载次数: 9)

2022-4-18 17:38 上传

点击文件名下载附件 源码在此

Ls60

  

计次循环首 (取数组成员数 (文件名), 计次)
寻找结果 ＝ 寻找文件 (目录名 ＋ 文件名 [计次], )
判断循环首 (寻找结果 ≠ “”)
' 调试输出 (寻找结果)
局_文件路径 ＝ 目录名 ＋ 寻找结果
如果 (是否停止搜索 ＝ 假)
如果 (是否搜索隐藏文件 ＝ 真)
处理事件 ()
列表框1.加入项目 (目录名 ＋ 寻找结果, )
如果真 (位与 (2, 取文件属性 (目录名 ＋ 寻找结果)) ≠ 2)
处理事件 ()
列表框1.加入项目 (目录名 ＋ 寻找结果, )

寻找结果 ＝ 寻找文件 (, )
调试输出 (局_文件路径)
跳出循环 ()

判断循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .计次循环首 (取数组成员数 (文件名), 计次)<br /> <br />     寻找结果 ＝ 寻找文件 (目录名 ＋ 文件名 [计次], )<br /> <br />     .判断循环首 (寻找结果 ≠ “”)<br />         ' 调试输出 (寻找结果)<br />         局_文件路径 ＝ 目录名 ＋ 寻找结果<br />         .如果 (是否停止搜索 ＝ 假)<br />             .如果 (是否搜索隐藏文件 ＝ 真)<br />                 处理事件 ()<br />                 列表框1.加入项目 (目录名 ＋ 寻找结果, )<br />             .否则<br />                 .如果真 (位与 (2, 取文件属性 (目录名 ＋ 寻找结果)) ≠ 2)<br />                     处理事件 ()<br />                     列表框1.加入项目 (目录名 ＋ 寻找结果, )<br />                 .如果真结束<br /> <br />             .如果结束<br />             寻找结果 ＝ 寻找文件 (, )<br />             调试输出 (局_文件路径)<br />         .否则<br />             跳出循环 ()<br />         .如果结束<br /> <br />     .判断循环尾 ()<br /> .计次循环尾 ()

鹏书

文件_枚举 ()
你还是直接用这个命令吧。

dgfh541

计次循环首的计次 减1

Ruang

代码太乱了

唯美主义

这样改动一下就可以了

汉族

代码没问题

汉族

给你优化了一下

  

是否停止搜索 ＝ 假
如果真 (目录名 ＝ “”)
信息框 (“搜索目录不能为空”, 0, )
返回 ()
如果真 (取文本右边 (目录名, 1) ≠ “\”)
目录名 ＝ 目录名 ＋ “\”
计次循环首 (取数组成员数 (文件名), 计次)
寻找结果 ＝ 寻找文件 (目录名 ＋ 文件名 [计次], )
判断循环首 (寻找结果 ≠ “”)
如果 (是否停止搜索 ＝ 假)
判断 (是否搜索隐藏文件 ＝ 真)
处理事件 ()
列表框1.加入项目 (目录名 ＋ 寻找结果, )
局_文件路径 ＝ 目录名 ＋ 寻找结果
判断 (位与 (2, 取文件属性 (目录名 ＋ 寻找结果)) ≠ 2)
处理事件 ()
列表框1.加入项目 (目录名 ＋ 寻找结果, )
局_文件路径 ＝ 目录名 ＋ 寻找结果



跳出循环 ()
调试输出 (局_文件路径)
寻找结果 ＝ 寻找文件 (, )
判断循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> 是否停止搜索 ＝ 假<br /> .如果真 (目录名 ＝ “”)<br />     信息框 (“搜索目录不能为空”, 0, )<br />     返回 ()<br /> .如果真结束<br /> .如果真 (取文本右边 (目录名, 1) ≠ “\”)<br />     目录名 ＝ 目录名 ＋ “\”<br /> .如果真结束<br /> .计次循环首 (取数组成员数 (文件名), 计次)<br />     寻找结果 ＝ 寻找文件 (目录名 ＋ 文件名 [计次], )<br />     .判断循环首 (寻找结果 ≠ “”)<br />         .如果 (是否停止搜索 ＝ 假)<br />             .判断开始 (是否搜索隐藏文件 ＝ 真)<br />                 处理事件 ()<br />                 列表框1.加入项目 (目录名 ＋ 寻找结果, )<br />                 局_文件路径 ＝ 目录名 ＋ 寻找结果<br />             .判断 (位与 (2, 取文件属性 (目录名 ＋ 寻找结果)) ≠ 2)<br />                 处理事件 ()<br />                 列表框1.加入项目 (目录名 ＋ 寻找结果, )<br />                 局_文件路径 ＝ 目录名 ＋ 寻找结果<br />             .默认<br /> <br />             .判断结束<br /> <br />         .否则<br />             跳出循环 ()<br />         .如果结束<br />         调试输出 (局_文件路径)<br />         寻找结果 ＝ 寻找文件 (, )<br />     .判断循环尾 ()<br /> .计次循环尾 ()