至简至真，代码的进化-----1句代码导入数据，并分割，转数组

花老板

先看效果，一句代码，就实现了
》读入文件  
》按行分割
》提取每个行的指定数据（可空，不需要则不写）。


注：路径如果是在运行目录，直接写文件名，如果不在本目录就写路径，会自动区分。
直接贴带代码。调用了精易模块

  

子程序名	返回值类型	公开	备 注
快捷导入	整数型
参数名	类 型	参考	可空	数组	备 注
路径	文本型				运行目录路径
转换数组	文本型
取中间前	文本型
取中间后	文本型

变量名	类 型	静态	数组	备 注
i	整数型
临时数组	文本型		0
str2	文本型

如果 (文本是否存在 (路径, “\”) ＝ 真)
文本_1 ＝ 到文本 (读入文件 (路径))

文本_1 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\” ＋ 路径))
临时数组 ＝ 分割文本 (文本_1, #换行符, )
如果 (是否为空 (取中间前) ＝ 假 或 是否为空 (取中间后) ＝ 假)
计次循环首 (取数组成员数 (临时数组), i)
str2 ＝ 文本_取出中间文本 (临时数组 [i], 取中间前, 取中间后)
加入成员 (转换数组, str2)
计次循环尾 ()



计次循环首 (取数组成员数 (临时数组), i)
加入成员 (转换数组, 临时数组 [i])
计次循环尾 ()

返回 (取数组成员数 (转换数组))

.版本 2<br /> <br /> .子程序 快捷导入, 整数型, 公开<br /> .参数 路径, 文本型, , 运行目录路径<br /> .参数 转换数组, 文本型, 参考 数组<br /> .参数 取中间前, 文本型, 可空<br /> .参数 取中间后, 文本型, 可空<br /> .局部变量 i, 整数型<br /> .局部变量 临时数组, 文本型, , "0"<br /> .局部变量 str2, 文本型<br /> <br /> .如果 (文本是否存在 (路径, “\”) ＝ 真)<br />     文本_1 ＝ 到文本 (读入文件 (路径))<br /> <br /> .否则<br />     文本_1 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\” ＋ 路径))<br /> .如果结束<br /> 临时数组 ＝ 分割文本 (文本_1, #换行符, )<br /> .如果 (是否为空 (取中间前) ＝ 假 或 是否为空 (取中间后) ＝ 假)<br />     .计次循环首 (取数组成员数 (临时数组), i)<br />         str2 ＝ 文本_取出中间文本 (临时数组 <i>, 取中间前, 取中间后)<br />         加入成员 (转换数组, str2)<br />     .计次循环尾 ()<br /> <br /> .否则<br /> <br />     .计次循环首 (取数组成员数 (临时数组), i)<br />         加入成员 (转换数组, 临时数组 <i>)<br />     .计次循环尾 ()<br /> <br /> .如果结束<br /> <br /> 返回 (取数组成员数 (转换数组))

落寞23333

挺棒 有时候读文件确实需要

w2500369

新技能已 get

（ΘζΘ）

我生成的exe程序才几个字符。点一下可以完成好多功能。。。。

zddxxxx

为什么我的不行呢

zddxxxx

为什么我的不行呢

xiaoniu1230

支持开源~！感谢分享

呆呆1

插眼。。。。

kyo9766

最简答的代码，就可以写出很多的功能，感谢分享

易福娃

学习一下！