| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 目录_枚举子目录1 | 整数型 | 取一个文件夹下级子目录;成功返回子目录数量,失败返回0;通过是否枚举子目录参数,可以枚举所有的子目录 | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 父文件夹路径 | 文本型 | 如:D:\Program Files;目录分割符请用\,路径不以\结尾会自动添加 | 子目录数组 | 文本型 | 用来装载返回的子目录路径; | 是否带路径 | 逻辑型 | 可为空默认为真,假=不带,真=带; | 是否继续向下枚举 | 逻辑型 | 为空,默认不枚举。 |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 子目录名 | 文本型 | |||||
| 本级子目录列表 | 文本型 | "0" | ||||
| 目录计数器 | 整数型 | |||||
| 目录总数 | 整数型 | |||||
| 局_目录 | 文本型 | |||||
如果真 (取文本右边 (局_目录, 1) ≠ “\”)
局_目录 = 局_目录 + “\”子目录名 = 寻找文件 (局_目录 + “*.*”, #子目录 )
是否带路径 = 选择 (是否为空 (是否带路径), 真, 是否带路径)
判断循环首 (子目录名 ≠ “”)
如果真 (取文本左边 (子目录名, 1) ≠ “.”)
加入成员 (本级子目录列表, 子目录名)

如果 (是否带路径)

加入成员 (子目录数组, 局_目录 + 子目录名)

加入成员 (子目录数组, 子目录名)


处理事件 ()
子目录名 = 寻找文件 (, #子目录 )
判断循环尾 ()目录总数 = 取数组成员数 (本级子目录列表)
如果真 (是否继续向下枚举)
计次循环首 (取数组成员数 (本级子目录列表), 目录计数器)

如果真 (目录_是否有子目录 (局_目录 + 本级子目录列表 [目录计数器]))

目录总数 = 目录总数 + 目录_枚举子目录1 (局_目录 + 本级子目录列表 [目录计数器], 子目录数组, 是否带路径, 是否继续向下枚举)



计次循环尾 ()返回 (目录总数)
词条作者信息 使用例程
