易语言基础点击导入账号没有反应 求大神们看看哪里需要修改的
.版本 2.支持库 iext
.程序集 窗口程序集_启动窗口
.子程序 _按钮_游戏路径_被单击
.如果真 (通用对话框_游戏路径.打开 () ＝ 真)
编辑框_游戏路径.内容 ＝ 通用对话框_游戏路径.文件名
.如果真结束
.子程序 _按钮_开始_被单击
运行 (编辑框_游戏路径.内容, 假, )
.子程序 _按钮_导入账号_被单击
.局部变量 文件号, 整数型
.局部变量 文本, 文本型
.局部变量 分割后的文本, 文本型, , "0"
.局部变量 有多少行, 整数型
.局部变量 n, 整数型
.局部变量 账号密码数组, 文本型, , "0"
文件号 ＝ 打开文件 (取运行目录 () ＋ “\账号文本.txt”, , )
文本 ＝ 读入文本 (文件号, )
分割后的文本 ＝ 分割文本 (文本, #换行符, )
有多少行 ＝ 取数组成员数 (分割后的文本)
.计次循环首 (3, n)
超级列表框1.插入表项 (, , , , , )
账号密码数组 ＝ 分割文本 (分割后的文本 , “----”, )
超级列表框1.置标题 (n － 1, 0, 账号密码数组 )
超级列表框1.置标题 (n － 1, 1, 账号密码数组 )
超级列表框1.置标题 (n － 1, 2, “准备登入”)
' ''''''''''''''''''''''''''写入账号密码
.计次循环尾 ()
关闭文件 (文件号)
感谢分享！！！
页:
[1]