删除指定文件夹的扩展名文件

.计次循环首 (超级列表框1.取表项数 (), )
.如果 (删除文件 (编辑框1.内容 ＋ “\” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)) ＝ 真)
超级列表框1.置标题 (超级列表框1.现行选中项, 4, “已删”)
成功 ＝ 成功 ＋ 1
.否则
超级列表框1.置标题 (超级列表框1.现行选中项, 4, “失败”)
失败 ＝ 失败 ＋ 1
.如果结束
编辑框3.加入文本 (“正在删除” ＋ 超级列表框1.取标题 (超级列表框1.现行选中项, 1) ＋ #换行符)
超级列表框1.现行选中项 ＝ 超级列表框1.现行选中项 ＋ 1
.计次循环尾 ()
编辑框3.加入文本 (“执行完毕,” ＋ 编辑框2.内容 ＋ “后缀文件总数” ＋ 到文本 (数量) ＋ “,成功” ＋ 到文本 (成功) ＋ “个,失败” ＋ 到文本 (失败) ＋ “个.” ＋ #换行符)