为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

网站首页 > 易语言相关 > 易语言例程 正文

易语言递归实现目录枚举所有子目录

三叶资源网 2019-06-02 09:43:57 易语言例程 2156 ℃ 2 评论
.版本 2
.支持库 spec

.子程序 目录_枚举所有子目录
.参数 目录路径, 文本型
.参数 欲存放的数组变量, 文本型, 参考 数组
.局部变量 i, 整数型
.局部变量 zs, 文本型, , "0"

.计次循环首 (目录_枚举子目录 (目录路径, zs, 真), i)
    目录_枚举所有子目录 (zs [i] + “”, 欲存放的数组变量)
    加入成员 (欲存放的数组变量, zs [i] + “”)
    处理事件 ()
.计次循环尾 ()

.子程序 _按钮1_被单击
.局部变量 aaa, 文本型, , "0"
.局部变量 i, 整数型

目录_枚举所有子目录 (编辑框2.内容, aaa)
.计次循环首 (取数组成员数 (aaa), i)
    编辑框1.加入文本 (aaa [i] + #换行符)
.计次循环尾 ()
调试输出 (“共获得”, 取数组成员数 (aaa), “个目录”)

@901

文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

已有2位网友发表了看法:

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
战旗弹幕多线程传递POST区块链技术公交查询系统精易源码后台跳绳软件验证易语言滑动验证码临时会话万能快递单打印正则表达式测试工具网易登录自动回复获取拼多多指定店铺商品详情源码SqlServer二维数组自定义数据胆码随机界面设计
最新评论