易语言：关于 子程序 放入循环使用的问题 （在线等）

版本 2
.程序集 窗口程序集1
.程序集变量 临时目录数组, 文本型, , "0"

.子程序 _按钮1_被单击
.局部变量 n1, 整数型
子程序寻找所有目录 (“C:”)

.子程序 _按钮2_被单击
.局部变量 n1, 整数型

.计次循环首 (取数组成员数 (临时目录数组), n1)
    子程序寻找所有目录 (临时目录数组 [n1])
.计次循环尾 ()

.子程序 子程序寻找所有目录
.参数 父目录, 文本型

.局部变量 目录, 文本型

目录 ＝ 寻找文件 (父目录 ＋ “\*”, 16)
.判断循环首 (目录 ≠ “”)
    目录 ＝ 父目录 ＋ “\” ＋ 目录
    加入成员 (临时目录数组, 目录)
    编辑框1.加入文本 (目录 ＋ #换行符)
    目录 ＝ 寻找文件 (, 16)
.判断循环尾 ()
   
我的问题是将 子程序寻找所有目录 放到循环里面怎么用不了！单击按钮1可以正常，   单击按钮2   程序就说     被调试易程序运行完毕