.版本 2.支持库 iext.程序集 窗口程序集1.子程序 _按钮_搜索_被单击文件搜索 (“C:”, “*.*”).子程序 文件搜索.参数 欲寻找的目录, 文本型, , 如：C:,表示C盘,记得C字后面两点一定要写.参数 欲寻找的文件名, 文本型, , 如果寻找全部文件可以填入*.*或*.txt只找txt文件.局部变量 局部_子目录, 文本型.局部变量 局部_文件名, 文本型.局部变量 局部_文件时间, 日期时间型.局部变量 局部_项目索引, 整数型.如果真 (取文本右边 (欲寻找的目录, 1) ≠ “/”) 欲寻找的目录 ＝ 欲寻找的目录 ＋ “/”.如果真结束局部_文件名 ＝ 寻找文件 (欲寻找的目录 ＋ 欲寻找的文件名, ).判断循环首 (局部_文件名 ≠ “”) 局部_文件时间 ＝ 取文件时间 (欲寻找的目录 ＋ 局部_文件名) .如果真 (局部_文件时间 ＞ 日期框_起始.今天 且 局部_文件时间 ＜ 日期框_结束.今天) 局部_项目索引 ＝ 超级列表框1.插入表项 (, , , , , ) 超级列表框1.置标题 (局部_项目索引, 0, 欲寻找的目录 ＋ 局部_文件名) 超级列表框1.置标题 (局部_项目索引, 1, 到文本 (局部_文件时间)) .如果真结束 处理事件 () 局部_文件名 ＝ 寻找文件 (, ).判断循环尾 ()局部_子目录 ＝ 寻找文件 (欲寻找的目录 ＋ “*.*”, #子目录).判断循环首 (局部_子目录 ≠ “”) .如果真 (取文本左边 (局部_子目录, 1) ≠ “.”) 处理事件 () 文件搜索 (欲寻找的目录 ＋ 局部_子目录 ＋ “/”, 欲寻找的文件名) .如果真结束 局部_子目录 ＝ 寻找文件 (, #子目录).判断循环尾 ()
