求助一个很简单的超级列表框导入问题

飞翔的企鹅1

我想把一个外部的文本，通过通用对话框，导入到超级列表框内，文本是有格式的，例如 q123456----qq123456 qs10001----qs10001 da2344----sx2ssde 这种的然后可以把第一行的前部分写入到到编辑框1 后部分写入到编辑框2 最后还有一个按钮就是下一个，点击一下自动换到第2行的前部分写入到到编辑框1 后部分写入到编辑框2  、

Xiao白

做好了！你自己看吧
导入.rar (1.63 KB, 下载次数: 132)

2011-9-3 15:38 上传

点击文件名下载附件
源码

飞翔的企鹅1

大家帮帮我呀！

飞翔的企鹅1

555555没有人会吗

a307

00.rar (1.73 KB, 下载次数: 43)

2011-9-3 15:37 上传

点击文件名下载附件


没用通用对话框。
刚刚正好写了一个这样的源码。
所以 我就稍微改了下。

小马过河

上源码
[e].版本 2
.支持库 iext

.程序集 窗口程序集1
.程序集变量 表项数
.程序集变量 哪一个

.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 文本数组, 文本型, , "0"
.局部变量 子文本数组, 文本型, , "0"
.局部变量 计次

文本 ＝ 到文本 (读入文件 (编辑框_路径.内容))  ' 此处写入你要的文件路径
文本数组 ＝ 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (文本数组), 计次)
    子文本数组 ＝ 分割文本 (文本数组 [计次], “----”, )
    超级列表框1.插入表项 (计次 － 1, 子文本数组 [1], , , , )
    超级列表框1.置标题 (计次 － 1, 1, 子文本数组 [2])

.计次循环尾 ()
表项数 ＝ 超级列表框1.取表项数 ()


.子程序 _按钮2_被单击

.如果真 (哪一个 ＝ 表项数 ＋ 1)
    哪一个 ＝ 0
.如果真结束

编辑框1.内容 ＝ 超级列表框1.取标题 (哪一个, 0)
编辑框2.内容 ＝ 超级列表框1.取标题 (哪一个, 1)
哪一个 ＝ 哪一个 ＋ 1
[/e]

飞翔的企鹅1

a307 发表于 2011-9-3 15:29
没用通用对话框。
刚刚正好写了一个这样的源码。
所以 我就稍微改了下。

和你和我说的不一样哦~

a307

飞翔的企鹅1 发表于 2011-9-3 15:48
和你和我说的不一样哦~

说了
就是没有通用对话框吧。

通用对话框知道用吧。

应该没别的了吧。

飞翔的企鹅1

小马过河 发表于 2011-9-3 15:30
上源码

我是新手 代码看不懂哦 不过还是谢谢你了！{:3_240:}

飞翔的企鹅1

baims 发表于 2011-9-3 15:38
做好了！你自己看吧

你能帮我把那个QQ账户改成账户吗？ 我测试了 你的源码就是我要求的 谢谢你