易语言超级列表框导入文本问题,求解决
求修改,问题是再次导入文本时,序列号又是重头开始,我要的是例如序列号20,再导入文本就往上加,而不是又从1,源码如下:.版本2.支持库iext.版本2.子程序_导入_被单...
求修改,问题是再次导入文本时,序列号又是重头开始,我要的是例如序列号20,再导入文本就往上加,而不是又从1,源码如下:
.版本 2
.支持库 iext
.版本 2
.子程序 _导入_被单击
.局部变量 数组, 文本型, , "0"
.局部变量 帐号密码, 文本型, , "2"
.局部变量 总数, 整数型
.局部变量 a, 整数型
.局部变量 表项索引, 整数型
通用对话框1.打开 ()
数组 = 分割文本 (到文本 (读入文件 (通用对话框1.文件名)), #换行符, )
总数 = 取数组成员数 (数组)
.计次循环首 (总数, a)
帐号密码 = 分割文本 (数组 [a], “----”, )
.如果真 (取数组成员数 (帐号密码) = 2)
表项索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项索引, 0, 到文本 (a))
超级列表框1.置标题 (表项索引, 1, 帐号密码 [1])
超级列表框1.置标题 (表项索引, 2, 帐号密码 [2]) 展开
.版本 2
.支持库 iext
.版本 2
.子程序 _导入_被单击
.局部变量 数组, 文本型, , "0"
.局部变量 帐号密码, 文本型, , "2"
.局部变量 总数, 整数型
.局部变量 a, 整数型
.局部变量 表项索引, 整数型
通用对话框1.打开 ()
数组 = 分割文本 (到文本 (读入文件 (通用对话框1.文件名)), #换行符, )
总数 = 取数组成员数 (数组)
.计次循环首 (总数, a)
帐号密码 = 分割文本 (数组 [a], “----”, )
.如果真 (取数组成员数 (帐号密码) = 2)
表项索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项索引, 0, 到文本 (a))
超级列表框1.置标题 (表项索引, 1, 帐号密码 [1])
超级列表框1.置标题 (表项索引, 2, 帐号密码 [2]) 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询