遍历文件并加入二维数组 动态二维数组

nunu0530

如题 遍历文件并加入二维数组

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
文件数组	文本型		0
A	整数型
目录	文本型
文件名	文本型
多维数组	文本型		2,2

' 枚举目录下的所有exe文件
文件_枚举 (取运行目录 (), “*exe”, 文件数组, 真, 真, 真)
计次循环首 (取数组成员数 (文件数组), A)
目录 ＝ 文件_取目录 (文件数组 [A])
文件名 ＝ 文件_取文件名 (文件数组 [A], 真)
' 动态扩展多维数组的行数（从第1行开始）
' 重定义为 [当前行数][2] 的二维数组
重定义数组 (多维数组, 真, A, 2)
' 赋值新行数据
多维数组 [A] [1] ＝ 目录
多维数组 [A] [2] ＝ 文件名
计次循环尾 ()
调试输出 (“多维数组成员数量”, 取数组成员数 (多维数组))
返回 (0)  ' 可以根据您的需要返回任意数值

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 文件数组, 文本型, , "0"<br /> .局部变量 A, 整数型<br /> .局部变量 目录, 文本型<br /> .局部变量 文件名, 文本型<br /> .局部变量 多维数组, 文本型, , "2,2"<br /> <br /> ' 枚举目录下的所有exe文件<br /> 文件_枚举 (取运行目录 (), “*exe”, 文件数组, 真, 真, 真)<br /> <br /> .计次循环首 (取数组成员数 (文件数组), A)<br /> <br />     目录 ＝ 文件_取目录 (文件数组 [A])<br />     文件名 ＝ 文件_取文件名 (文件数组 [A], 真)<br /> <br />     ' 动态扩展多维数组的行数（从第1行开始）<br />     ' 重定义为 [当前行数][2] 的二维数组<br />     重定义数组 (多维数组, 真, A, 2)<br /> <br />     ' 赋值新行数据<br />     多维数组 [A] [1] ＝ 目录<br />     多维数组 [A] [2] ＝ 文件名<br /> .计次循环尾 ()<br /> 调试输出 (“多维数组成员数量”, 取数组成员数 (多维数组))<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值

wh1234567

感谢分享

jiangqiong

IDE的支持库 | 提升视觉体验，焕发开发激情  

胖子葛格

感谢大神分享~！

真冬

  

变量名	类 型	静态	数组	备 注
文件分离目录	文本型		0

调试输出 (枚举文件分离目录 (“D:\PC-GAME-D\inZOI”, “*exe”, 文件分离目录))
调试输出 (文件分离目录)

子程序名	返回值类型	公开	备 注
枚举文件分离目录	整数型
参数名	类 型	参考	可空	数组	备 注
参数_路径	文本型
参数_后缀名	文本型
参数_文件数组	文本型
参数_内部使用	逻辑型

变量名	类 型	静态	数组	备 注
局_文件名	文本型
局_路径	文本型

局_路径 ＝ 参数_路径
如果真 (参数_内部使用 ＝ 假)
清除数组 (参数_文件数组)
局_路径 ＝ 参数_路径 ＋ 选择 (取文本右边 (参数_路径, 1) ＝ “\”, “”, “\”)
局_文件名 ＝ 寻找文件 (局_路径 ＋ 参数_后缀名, )
判断循环首 (局_文件名 ≠ “”)
加入成员 (参数_文件数组, 局_路径)
加入成员 (参数_文件数组, 局_文件名)
局_文件名 ＝ 寻找文件 (, )
判断循环尾 ()
局_文件名 ＝ 寻找文件 (局_路径 ＋ “*”, #子目录 )
判断循环首 (局_文件名 ≠ “”)
判断 (局_文件名 ＝ “.” 或 局_文件名 ＝ “..”)

枚举文件分离目录 (局_路径 ＋ 局_文件名 ＋ “\”, 参数_后缀名, 参数_文件数组, 真)
局_文件名 ＝ 寻找文件 (, #子目录 )
判断循环尾 ()
如果真 (参数_内部使用 ＝ 假)
重定义数组 (参数_文件数组, 真, 取数组成员数 (参数_文件数组) ÷ 2, 2)
返回 (取数组下标 (参数_文件数组, 1))
返回 (0)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 文件分离目录, 文本型, , "0"<br /> <br /> 调试输出 (枚举文件分离目录 (“D:\PC-GAME-D\inZOI”, “*exe”, 文件分离目录))<br /> 调试输出 (文件分离目录)<br /> <br /> .子程序 枚举文件分离目录, 整数型, 公开<br /> .参数 参数_路径, 文本型<br /> .参数 参数_后缀名, 文本型<br /> .参数 参数_文件数组, 文本型, 数组<br /> .参数 参数_内部使用, 逻辑型, 可空<br /> .局部变量 局_文件名, 文本型<br /> .局部变量 局_路径, 文本型<br /> <br /> 局_路径 ＝ 参数_路径<br /> .如果真 (参数_内部使用 ＝ 假)<br />     清除数组 (参数_文件数组)<br />     局_路径 ＝ 参数_路径 ＋ 选择 (取文本右边 (参数_路径, 1) ＝ “\”, “”, “\”)<br /> .如果真结束<br /> 局_文件名 ＝ 寻找文件 (局_路径 ＋ 参数_后缀名, )<br /> .判断循环首 (局_文件名 ≠ “”)<br />     加入成员 (参数_文件数组, 局_路径)<br />     加入成员 (参数_文件数组, 局_文件名)<br />     局_文件名 ＝ 寻找文件 (, )<br /> .判断循环尾 ()<br /> 局_文件名 ＝ 寻找文件 (局_路径 ＋ “*”, #子目录)<br /> .判断循环首 (局_文件名 ≠ “”)<br />     .判断开始 (局_文件名 ＝ “.” 或 局_文件名 ＝ “..”)<br /> <br />     .默认<br />         枚举文件分离目录 (局_路径 ＋ 局_文件名 ＋ “\”, 参数_后缀名, 参数_文件数组, 真)<br />     .判断结束<br />     局_文件名 ＝ 寻找文件 (, #子目录)<br /> .判断循环尾 ()<br /> .如果真 (参数_内部使用 ＝ 假)<br />     重定义数组 (参数_文件数组, 真, 取数组成员数 (参数_文件数组) ÷ 2, 2)<br />     返回 (取数组下标 (参数_文件数组, 1))<br /> .如果真结束<br /> 返回 (0)

‘重写一份减少循环次数

张澈

感谢分享.

lmwdz

感谢分享.

191039295

感谢分享.

year1970

感谢分享，学习一下

ljx111

感谢分享