批量导入QQ 到表格求助！！

玩世不恭KISS · 发表于 2012-12-30 14:26:56

{:soso_e109:}急！！！！！！！！！！！！！！！

悟空科技 · 发表于 2012-12-30 14:26:57

[e]
.版本 2
.支持库 iext

.子程序 _按钮_导入账号_被单击
.局部变量 QQ账号文件, 文本型
.局部变量局_QQ账号S, 文本型, , "0"
.局部变量 n, 整数型
.局部变量局_索引, 整数型
.局部变量局_QQ账号密码S, 文本型, , "0"

.如果真 (通用对话框1.打开 () ＝真)
超级列表框_qq.全部删除 ()
QQ账号文件＝到文本 (读入文件 (通用对话框1.文件名))
.判断开始 (寻找文本 (QQ账号文件, #换行符, , 假) ≠ -1)
      局_QQ账号S ＝分割文本 (QQ账号文件, #换行符, )
      .计次循环首 (取数组成员数 (局_QQ账号S), n)
         局_索引＝超级列表框_qq.插入表项 (, , , , , )
         .如果真 (寻找文本 (局_QQ账号S [n], “----”, , 假) ≠ -1)
            局_QQ账号密码S ＝分割文本 (局_QQ账号S [n], “----”, )
            超级列表框_qq.置标题 (局_索引, 0, 到文本 (局_索引＋ 1))
            超级列表框_qq.置标题 (局_索引, 1, 局_QQ账号密码S [1])
            超级列表框_qq.置标题 (局_索引, 2, 局_QQ账号密码S [2])
         .如果真结束

      .计次循环尾 ()

.默认
      .如果真 (寻找文本 (QQ账号文件, “----”, , 假) ≠ -1)
         局_索引＝超级列表框_qq.插入表项 (, , , , , )
         局_QQ账号密码S ＝分割文本 (QQ账号文件, “----”, )
         超级列表框_qq.置标题 (局_索引, 0, 到文本 (局_索引＋ 1))
         超级列表框_qq.置标题 (局_索引, 1, 局_QQ账号密码S [1])
         超级列表框_qq.置标题 (局_索引, 2, 局_QQ账号密码S [2])
[/e]

残血小羽 · 发表于 2012-12-30 14:33:26

是超级列表框吧

特思软件 · 发表于 2012-12-30 14:34:34

什么表格。

悟空科技 · 发表于 2012-12-30 14:40:35

[e]
.版本 2
.支持库 iext

.子程序 _按钮_导入账号_被单击
.局部变量 QQ账号文件, 文本型
.局部变量局_QQ账号S, 文本型, , "0"
.局部变量 n, 整数型
.局部变量局_索引, 整数型
.局部变量局_QQ账号密码S, 文本型, , "0"

.如果真 (通用对话框1.打开 () ＝真)
超级列表框_qq.全部删除 ()
QQ账号文件＝到文本 (读入文件 (通用对话框1.文件名))
.判断开始 (寻找文本 (QQ账号文件, #换行符, , 假) ≠ -1)
      局_QQ账号S ＝分割文本 (QQ账号文件, #换行符, )
      .计次循环首 (取数组成员数 (局_QQ账号S), n)
         局_索引＝超级列表框_qq.插入表项 (, , , , , )
         .如果真 (寻找文本 (局_QQ账号S [n], “----”, , 假) ≠ -1)
            局_QQ账号密码S ＝分割文本 (局_QQ账号S [n], “----”, )
            超级列表框_qq.置标题 (局_索引, 0, 到文本 (局_索引＋ 1))
            超级列表框_qq.置标题 (局_索引, 1, 局_QQ账号密码S [1])
            超级列表框_qq.置标题 (局_索引, 2, 局_QQ账号密码S [2])
         .如果真结束

      .计次循环尾 ()

.默认
      .如果真 (寻找文本 (QQ账号文件, “----”, , 假) ≠ -1)
         局_索引＝超级列表框_qq.插入表项 (, , , , , )
         局_QQ账号密码S ＝分割文本 (QQ账号文件, “----”, )
         超级列表框_qq.置标题 (局_索引, 0, 到文本 (局_索引＋ 1))
         超级列表框_qq.置标题 (局_索引, 1, 局_QQ账号密码S [1])
         超级列表框_qq.置标题 (局_索引, 2, 局_QQ账号密码S [2])
[/e]

zsl · 发表于 2013-2-3 00:44:00

提示: 该帖被管理员或版主屏蔽

		自动登录	找回密码
密码			注册

[已解决] 批量导入QQ 到表格求助！！

最佳答案

评分

点评

zsl zsl 当前离线用户组 T.6 总帖数阅读权限 90 关注数头像被屏蔽结帖率：75% (24/32)	发表于 2013-2-3 00:44:00 \| 显示全部楼层四川省乐山市提示: 该帖被管理员或版主屏蔽

	回复使用道具举报

[已解决] 批量导入QQ 到表格 求助！！

最佳答案

评分

点评

[已解决] 批量导入QQ 到表格求助！！