易语言如何判断当前目录下有多少.jar和.zip文件的数量？

易语言如何判断当前目录下有多少.jar和.zip文件的数量并且显示在标签上？

.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 后缀名, 文本型, , "2"
.局部变量 次数, 整数型
.局部变量 文件名, 文本型
.局部变量 数量, 整数型

后缀名 ＝ { “jar”, “zip” }
.计次循环首 (2, 次数)
数量 ＝ 0
文件名 ＝ 寻找文件 (取运行目录 () ＋ “\*.” ＋ 后缀名 [次数], )
.判断循环首 (文件名 ≠ “”)
数量 ＝ 数量 ＋ 1
文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
后缀名 [次数] ＝ 后缀名 [次数] ＋ “有” ＋ 到文本 (数量)
.计次循环尾 ()
标签1.标题 ＝ “后缀名” ＋ 后缀名 [1] ＋ “个文件”
标签2.标题 ＝ “后缀名” ＋ 后缀名 [2] ＋ “个文件”

可以私聊我~