易语言中 按钮被单击 超级列表框选择读取TXT文本文件的代码 怎么写 求高手赐教 50
2个回答
展开全部
文本格式为这样:
帐号----密码----名称
代码这样写:
.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 文本1, 文本型
.局部变量 分割的文本, 文本型, , "0"
.局部变量 计次, 整数型
.局部变量 分割的文本2, 文本型, , "0"
.局部变量 索引, 整数型
文本1 = 读入文本 (打开文件 (“文件地址”, 1, 1), )
分割的文本 = 分割文本 (文本1, #换行符, )
.计次循环首 (取数组成员数 (分割的文本), 计次)
分割的文本2 = 分割文本 (分割的文本 [计次], “----”, )
.如果真 (取数组成员数 (分割的文本2) > 2)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 分割的文本2 [1])
超级列表框1.置标题 (索引, 1, 分割的文本2 [2])
超级列表框1.置标题 (索引, 2, 分割的文本2 [3])
.如果真结束
.计次循环尾 ()
关闭所有文件 ()
帐号----密码----名称
代码这样写:
.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 文本1, 文本型
.局部变量 分割的文本, 文本型, , "0"
.局部变量 计次, 整数型
.局部变量 分割的文本2, 文本型, , "0"
.局部变量 索引, 整数型
文本1 = 读入文本 (打开文件 (“文件地址”, 1, 1), )
分割的文本 = 分割文本 (文本1, #换行符, )
.计次循环首 (取数组成员数 (分割的文本), 计次)
分割的文本2 = 分割文本 (分割的文本 [计次], “----”, )
.如果真 (取数组成员数 (分割的文本2) > 2)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 分割的文本2 [1])
超级列表框1.置标题 (索引, 1, 分割的文本2 [2])
超级列表框1.置标题 (索引, 2, 分割的文本2 [3])
.如果真结束
.计次循环尾 ()
关闭所有文件 ()
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询