求救啊，帮我看一下，运行成功，但是搜不出来任何文件。。

.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.参数 默认路径, 整数型
默认路径 ＝ “F:\”
.子程序 _按钮1_被单击
.参数 默认路径, 文本型
.如果真 (编辑框1.内容 ＝ “”)
返回 ()
.如果真结束
搜索文件 (默认路径, 编辑框1.内容)
.子程序 搜索文件
.参数 根目录, 文本型
.参数 文件名称, 文本型
.局部变量 关键词, 文本型, , "0"
.局部变量 搜到的文件名, 文本型
.局部变量 i, 整数型
关键词 ＝ 分割文本 (文件名称, “;”, )
搜到的文件名 ＝ 寻找文件 (根目录 ＋ “*.*”, )
.判断循环首 (搜到的文件名 ≠ “”)
.计次循环首 (取数组成员数 (关键词), i)
.如果真 (寻找文本 (搜到的文件名, 关键词 [i], , 假) ≠ -1)
列表框1.加入项目 (搜到的文件名, )
.如果真结束
.计次循环尾 ()
搜到的文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
搜到的文件名 ＝ 寻找文件 (根目录 ＋ “*.*”, 16)
.判断循环首 (搜到的文件名 ≠ “”)
.如果真 (取文本左边 (搜到的文件名, 1) ≠ “.”)
搜索文件 (根目录 ＋ 搜到的文件名, 文件名称)
.如果真结束
搜到的文件名 ＝ 寻找文件 (, 16)
.判断循环尾 ()