易语言函数封装之[文本数组去除首行]

.版本 2
.子程序 文本数组去除首行, , , 文本数组去除首行
.参数 数组, 文本型, 参考 数组
.局部变量 临时数组, 文本型, , "0"
.局部变量 计次, 整数型
重定义数组 (临时数组, 假, 取数组成员数 (数组)1)
.计次循环首 (取数组成员数 (数组)1, 计次)
临时数组 [计次] = 数组 [计次 + 1]
.计次循环尾 ()
数组 = 临时数组
.版本 2 .子程序 文本数组去除首行, , , 文本数组去除首行 .参数 数组, 文本型, 参考 数组 .局部变量 临时数组, 文本型, , "0" .局部变量 计次, 整数型 重定义数组 (临时数组, 假, 取数组成员数 (数组) - 1) .计次循环首 (取数组成员数 (数组) - 1, 计次) 临时数组 [计次] = 数组 [计次 + 1] .计次循环尾 () 数组 = 临时数组
.版本 2

.子程序 文本数组去除首行, , , 文本数组去除首行
.参数 数组, 文本型, 参考 数组
.局部变量 临时数组, 文本型, , "0"
.局部变量 计次, 整数型

重定义数组 (临时数组, 假, 取数组成员数 (数组) - 1)
.计次循环首 (取数组成员数 (数组) - 1, 计次)
    临时数组 [计次] = 数组 [计次 + 1]
.计次循环尾 ()
数组 = 临时数组

 

赞 (2)