|
楼主 |
发表于 2024-5-22 03:03:00
|
显示全部楼层
广东省深圳市
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 数组 | 文本型 | | 0 | 成员数 | 整数型 | | | 第二成员数 | 整数型 | | | i | 整数型 | | | 第二i | 整数型 | | |
通用对话框1.初始目录 = 编辑框1.内容 编辑框1.内容 = 浏览文件夹 (“选择文件夹”, )成员数 = 文件_枚举 (编辑框1.内容, “*.*”, 数组, )计次循环首 (成员数, i )列表框1. 加入项目 (数组 [i ], )计次循环尾 ()输出调试文本 (“枚举到” + 到文本 (成员数 ) + “个文件”)程序_延时 (3, 1 )第二成员数 = 文件_枚举 (编辑框1.内容, “*.*”, 数组, )计次循环首 (第二成员数, 第二i )列表框1. 加入项目 (数组 [第二i ], )计次循环尾 ()输出调试文本 (“枚举到” + 到文本 (成员数 ) + “个文件”)程序_延时 (3, 1 )判断循环首 (成员数 ≠ 第二成员数 )程序_延时 (3, 1 )成员数 = 文件_枚举 (编辑框1.内容, “*.*”, 数组, )计次循环首 (成员数, i )列表框1. 加入项目 (数组 [i ], )计次循环尾 ()输出调试文本 (“枚举到” + 到文本 (成员数 ) + “个文件”)程序_延时 (3, 1 )第二成员数 = 文件_枚举 (编辑框1.内容, “*.*”, 数组, )计次循环首 (第二成员数, 第二i )列表框1. 加入项目 (数组 [第二i ], )计次循环尾 ()输出调试文本 (“枚举到” + 到文本 (成员数 ) + “个文件”)程序_延时 (3, 1 )如果真 (成员数 = 第二成员数 )跳出循环 ()判断循环尾 ()
|
|