.版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 文件名, 文本型
.子程序 _按钮1_被单击
文件名 ＝ 寻找文件 (取运行目录 () ＋ “\” ＋ “*”, )
.如果真 (文件名 ＝ “”)
返回 ()
.如果真结束
.判断循环首 (文件名 ≠ “”)
.如果真 (文件名 ≠ “.” 且 文件名 ≠ “..”)
.如果真 (寻找文本 (文件名, 编辑框1.内容, , 假) ＞ -1)
超级列表框1.插入表项 (, 文件名, , , , )
.如果真结束
.如果真结束
文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024