搜索指定后缀名和删除指定大小文件

这个只是针对某个指定文件夹下面的所以文件以及子文件夹。

.如果真 (取文本右边 (路径, 1) ≠ “\”)
路径 ＝ 路径 ＋ “\”
.如果真结束
文件名 ＝ 寻找文件 (路径 ＋ “*.” ＋ 选择 (是否为空 (后缀), “*”, 后缀), )
标签1.标题 ＝ 路径
.判断循环首 (文件名 ≠ “”)
处理事件 ()
.如果真 (文件名 ≠ “.” 且 文件名 ≠ “..”)
列表框1.加入项目 (路径 ＋ 文件名 ＋ “ ” ＋ 到文本 (四舍五入 (取文件尺寸 (路径 ＋ 文件名) ÷ 1024, 0)) ＋ “KB”, )
.如果真 (四舍五入 (取文件尺寸 (路径 ＋ 文件名) ÷ 1024, 0) ＝ 到整数 (编辑框2.内容)) ' 判断文件大小
删除文件 (路径 ＋ 文件名) ' 删除文件
个数 ＝ 个数 ＋ 1
.如果真结束
状态条1.置文本 (1, “删除了” ＋ 到文本 (个数) ＋ “个”)
.如果真结束
文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
文件名 ＝ 寻找文件 (路径 ＋ “*.*”, #子目录)
.判断循环首 (文件名 ≠ “”)
处理事件 ()
.如果真 (取文本左边 (文件名, 1) ≠ “.”)
递归搜寻文件 (路径 ＋ 文件名, 后缀)
.如果真结束
文件名 ＝ 寻找文件 (, #子目录)