超级列表框高效导入文本 求例子

2987363174

把几万数据文本，拖到窗口然后分割进 超级列表框，只需要几秒时间！这样高效的代码该怎么写！我用过这样的软件，但是不知道他们怎么实现！

hk530944

  

子程序名	返回值类型	公开	备 注
_拖放对象1_得到文件
参数名	类 型	参考	可空	数组	备 注
接收到的文件路径	文本型

变量名	类 型	静态	数组	备 注
lswb	文本型
sz	文本型		0
i	整数型
sy	整数型

lswb ＝ 到文本 (读入文件 (接收到的文件路径))
sz ＝ 分割文本 (lswb, #换行符, )
计次循环首 (取数组成员数 (sz), i)
如果真 (sz [i] ≠ “”)
sy ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (sy, 0, 到文本 (sy ＋ 1))
超级列表框1.置标题 (sy, 1, 文本_取左边 (sz [i], “----”, , ))
超级列表框1.置标题 (sy, 2, 文本_取右边 (sz [i], “----”, , ))
处理事件 ()
计次循环尾 ()
显示日志 (“导入账号成功”)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _拖放对象1_得到文件<br /> .参数 接收到的文件路径, 文本型<br /> .局部变量 lswb, 文本型<br /> .局部变量 sz, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 sy, 整数型<br /> <br /> lswb ＝ 到文本 (读入文件 (接收到的文件路径))<br /> sz ＝ 分割文本 (lswb, #换行符, )<br /> .计次循环首 (取数组成员数 (sz), i)<br />     .如果真 (sz <i> ≠ “”)<br />         sy ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (sy, 0, 到文本 (sy ＋ 1))<br />         超级列表框1.置标题 (sy, 1, 文本_取左边 (sz <i>, “----”, , ))<br />         超级列表框1.置标题 (sy, 2, 文本_取右边 (sz <i>, “----”, , ))<br />     .如果真结束<br />     处理事件 ()<br /> .计次循环尾 ()<br /> 显示日志 (“导入账号成功”)

xty

超级列表框快速导入,带编号,1万条125毫秒,10万条2秒3 非虚表
https://bbs.125.la/forum.php?mod=viewthread&tid=13916045&highlight=%D0%E9%B1%ED
彗星虚表演示，1秒插入1亿数据
https://bbs.125.la/forum.php?mod=viewthread&tid=13886083&highlight=%D0%E9%B1%ED

已注销184851

hk530944 发表于 2017-10-2 19:59
[e=3].版本 2
.支持库 iext

这种应该跟普遍的速度一样吧

hk530944

8000数据     2秒

2987363174

hk530944 发表于 2017-10-2 19:59
[e=3].版本 2
.支持库 iext

这个代码有点意思，他不会立即导入完毕导致软件卡死，而是慢慢的导入！总体来说好评！