大文本读取至列表框（超级列表框或虚表）

怀念一片叶子

源文本 无非就是 账号----密码  这样，百万的数据在100M以内，不存在变量放不下这么一说

个人实现思路如下
用快速文本 先将整行的内容加载至文本数组中，测试双核CPU 处理200万行的数据需要6分钟

  

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
文件	文本型

变量名	类 型	静态	数组	备 注
文件号	整数型
sz	文本型		0
账号	文本型		0
密码	文本型		0
i	整数型

调试输出 (取现行时间 ())
文件号 ＝ 打开文件 (文件, , )
移到文件首 (文件号)
.while (是否在文件尾 (文件号, 真) ＝ 假)
sz ＝ 分割文本 (读入一行 (文件号), “----”, )
加入成员 (账号, sz [1])
加入成员 (密码, sz [2])
.wend ()
清除数组 (sz)
调试输出 (取现行时间 ())

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .参数 文件, 文本型<br /> .局部变量 文件号, 整数型<br /> .局部变量 sz, 文本型, , "0"<br /> .局部变量 账号, 文本型, , "0"<br /> .局部变量 密码, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 调试输出 (取现行时间 ())<br /> 文件号 ＝ 打开文件 (文件, , )<br /> 移到文件首 (文件号)<br /> .while (是否在文件尾 (文件号, 真) ＝ 假)<br />     sz ＝ 分割文本 (读入一行 (文件号), “----”, )<br />     加入成员 (账号, sz [1])<br />     加入成员 (密码, sz [2])<br /> .wend ()<br /> 清除数组 (sz)<br /> 调试输出 (取现行时间 ())<br />

用打开文件在3分钟左右

  

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
文件	文本型

变量名	类 型	静态	数组	备 注
文件号	整数型
sz	文本型		0
账号	文本型		0
密码	文本型		0
i	整数型

调试输出 (取现行时间 ())
文件号 ＝ 打开文件 (文件, , )
移到文件首 (文件号)
.while (是否在文件尾 (文件号, 真) ＝ 假)
sz ＝ 分割文本 (读入一行 (文件号), “----”, )
加入成员 (账号, sz [1])
加入成员 (密码, sz [2])
.wend ()
清除数组 (sz)
调试输出 (取现行时间 ())

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .参数 文件, 文本型<br /> .局部变量 文件号, 整数型<br /> .局部变量 sz, 文本型, , "0"<br /> .局部变量 账号, 文本型, , "0"<br /> .局部变量 密码, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 调试输出 (取现行时间 ())<br /> 文件号 ＝ 打开文件 (文件, , )<br /> 移到文件首 (文件号)<br /> .while (是否在文件尾 (文件号, 真) ＝ 假)<br />     sz ＝ 分割文本 (读入一行 (文件号), “----”, )<br />     加入成员 (账号, sz [1])<br />     加入成员 (密码, sz [2])<br /> .wend ()<br /> 清除数组 (sz)<br /> 调试输出 (取现行时间 ())<br />

光读取文件就已经用了3分钟，即使边读取边插入超级列表框都需要10分钟以上，
有没有大佬有更好的实现思路给个例子。

已获得悬赏

最佳答案

QQ已经告诉你了

• 揰掵佲
• 发表于2017-10-30
• 详细答案 >

揰掵佲

这样很慢的。。。。你不如直接用代码编辑框

怀念一片叶子

揰掵佲 发表于 2017-10-30 16:54
这样很慢的。。。。你不如直接用代码编辑框

虫大  能扔我个例子么

揰掵佲

怀念一片叶子 发表于 2017-10-30 19:31
虫大  能扔我个例子么

QQ已经告诉你了