本源码有借鉴其他大神思路,简化优化其他功能代码 ,本源码涉及到一键导入导出,不覆盖保存文件,意外删除文件会马上生成文件再保存等案例。
.判断循环首 (已处理 < 总数)
内循环数 = 选择 (总数 - 已处理 < 10000, 总数 - 已处理, 10000) ' 分块处理 减少卡顿 或者可以多线程构造?思路而已...
.计次循环首 (内循环数, 计次)
a = a + 1
文件号 = 打开文件 (取运行目录 () + “\导出的文本.txt”, , )
.如果真 (文件号 = 0)
写到文件 (取运行目录 () + “\导出的文本.txt”, 到字节集 ({ }))
文件号 = 打开文件 (取运行目录 () + “\导出的文本.txt”, , )
.如果真结束
移到文件尾 (文件号)
插入文本行 (文件号, 超级列表框1.取标题 (a - 1, 1) + “----” + 超级列表框1.取标题 (a - 1, 2))
关闭文件 (文件号)
.计次循环尾 ()
已处理 = 已处理 + 内循环数
处理事件 ()
.判断循环尾 ()
下一篇 全新体验的易语言皮肤模块