哪有这么简单.要先遍历目录和子目录.再每一个目录下找该文件.
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
寻找目录 (“e:”)
调试输出 (“end”)
.子程序 寻找目录
.参数 目录, 文本型
.局部变量 文件, 文本型
标题 = 目录
文件 = 寻找文件 (目录 + “\f.exe”, )
.如果真 (文件 ≠ “”)
信息框 (目录 + “\” + 文件, 0, )
返回 ()
.如果真结束
文件 = 寻找文件 (目录 + “\*.*”, #子目录)
.判断循环首 (文件 ≠ “”)
.如果真 (文件 ≠ “.” 且 文件 ≠ “..”)
寻找目录 (目录 + “\” + 文件)
.如果真结束
文件 = 寻找文件 (, #子目录)
.判断循环尾 ()
编辑框1.内容 = 寻找文件 (取运行目录 () + “\*.*”, )
文件名 = 寻找文件 (目录 + “*.srd”, 35)
要遍历寻找!!!