【超级列表框读取数据】

admin

在开发中有一个非常常见的技术就是读取指定格式的文本，如下方的账号密码文本

user1==jiasias
user2==ndcmka
user3==dhciajci

读取后的效果如下图：


本节代码难度较大，重点考察了对于数组和计次循环首的理解，我们将上方的账号密码文本存储到桌面，文件名为123.txt

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
数据路径	文本型
总数据	文本型
数据_一级数组	文本型		0	每一行作为一个数组成员
数据_一级数组数	整数型
数据_二级数组	文本型		0	账号，密码
i	整数型
索引	整数型

数据路径 ＝ 取特定目录 (3) ＋ “123.txt”
总数据 ＝ 到文本 (读入文件 (数据路径))
调试输出 (总数据)
数据_一级数组 ＝ 分割文本 (总数据, #换行符, )  ' 每一行称为作为一个数组成员，全体构成一级数组
数据_一级数组数 ＝ 取数组成员数 (数据_一级数组)  ' 取出一级数组的个数，也就是看有几行
计次循环首 (数据_一级数组数, i)  ' i是自变量，循环到第几次就是几
数据_二级数组 ＝ 分割文本 (数据_一级数组 [i], “==”, )
' 这句代码是精华，对一级数组成员进行2次分割，配合自变量i，使得每一次的数据_一级数组 [i]结果是不一样的
' 当i=1时
' 数据_一级数组 [i]的结果为user1==jiasias
' 数据_二级数组[1]=user1,数据_二级数组[2]=jiasias
' 当i=2时
' 数据_一级数组 [i]的结果为user2==ndcmka
' 数据_二级数组[1]=user2,数据_二级数组[2]=ndcmka
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (i))
超级列表框1.置标题 (索引, 1, 数据_二级数组 [1])
超级列表框1.置标题 (索引, 2, 数据_二级数组 [2])
计次循环尾 ()

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数据路径, 文本型<br /> .局部变量 总数据, 文本型<br /> .局部变量 数据_一级数组, 文本型, , "0", 每一行作为一个数组成员<br /> .局部变量 数据_一级数组数, 整数型<br /> .局部变量 数据_二级数组, 文本型, , "0", 账号，密码<br /> .局部变量 i, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 数据路径 ＝ 取特定目录 (3) ＋ “123.txt”<br /> <br /> 总数据 ＝ 到文本 (读入文件 (数据路径))<br /> 调试输出 (总数据)<br /> <br /> 数据_一级数组 ＝ 分割文本 (总数据, #换行符, )  ' 每一行称为作为一个数组成员，全体构成一级数组<br /> 数据_一级数组数 ＝ 取数组成员数 (数据_一级数组)  ' 取出一级数组的个数，也就是看有几行<br /> .计次循环首 (数据_一级数组数, i)  ' i是自变量，循环到第几次就是几<br />     数据_二级数组 ＝ 分割文本 (数据_一级数组 <i>, “==”, )<br />     ' 这句代码是精华，对一级数组成员进行2次分割，配合自变量i，使得每一次的数据_一级数组 <i>结果是不一样的<br />     ' 当i=1时<br />     ' 数据_一级数组 <i>的结果为user1==jiasias<br />     ' 数据_二级数组[1]=user1,数据_二级数组[2]=jiasias<br /> <br />     ' 当i=2时<br />     ' 数据_一级数组 <i>的结果为user2==ndcmka<br />     ' 数据_二级数组[1]=user2,数据_二级数组[2]=ndcmka<br /> <br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (索引, 0, 到文本 (i))<br />     超级列表框1.置标题 (索引, 1, 数据_二级数组 [1])<br />     超级列表框1.置标题 (索引, 2, 数据_二级数组 [2])<br /> .计次循环尾 ()

源码下载：

超级列表框读取数据.e (4.86 KB, 下载次数: 205)

2023-4-6 21:02 上传

点击文件名下载附件

（点击返回课程目录：https://shuxiangyage.net/forum.php?mod=viewthread&tid=1134）