各位基友 在次提供我捣鼓的快速查找文本的小方案 顺便请教下如何快速的分割文本

超级菜鸟王

俺又来鸟  昨天捣鼓了个快速查找文本指定内容的 提取 指定内容的行位置 和内容   测试174W的文本 只需要3秒左右  大部分时间都用在分割文本这里了  想问下有人可以帮忙
捣鼓下 如何快速的分割么  谢鸟哈

分享我的源码--------------------------------可查找文件文本 也可以查找 框框内文本 各种搞啊    跪求 大文本快速分割   我捣鼓了下分割 最快的分割174W 文本也要花费 2.6秒时间 才分割完毕 表示灰常纠结的说  
------------------------------------------

  

子程序名	返回值类型	公开	备 注
_按钮_启动_被单击

启动线程 (&执行处理, , )

子程序名	返回值类型	公开	备 注
执行处理

重定义数组 (数组, 假, 0)
快速字节.从文件读 (“D:\桌面\X无泪X_我的专用模块_无泪\代理(43).txt”)
数组 ＝ 快速字节.分割字节集 ({ 13 }, )
快速字节.清除字节集 ()
计次循环首 (到整数 (取数组成员数 (数组)), X)
如果真 (寻找字节集 (数组 [X], 到字节集 (编辑框_查找内容.内容), ) ≠ -1)
完成个数 ＝ 完成个数 ＋ 1
调试输出 (到文本 (数组 [X]))

计次循环尾 ()
信息框 (“完成”, 0, , )

i支持库列表	支持库注释
EThread	多线程支持库
commobj	通用对象支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 commobj<br /> .支持库 spec<br /> <br /> .子程序 _按钮_启动_被单击<br /> <br /> 启动线程 (&执行处理, , )<br /> <br /> .子程序 执行处理<br /> <br /> 重定义数组 (数组, 假, 0)<br /> 快速字节.从文件读 (“D:\桌面\X无泪X_我的专用模块_无泪\代理(43).txt”)<br /> 数组 ＝ 快速字节.分割字节集 ({ 13 }, )<br /> 快速字节.清除字节集 ()<br /> .计次循环首 (到整数 (取数组成员数 (数组)), X)<br />     .如果真 (寻找字节集 (数组 [X], 到字节集 (编辑框_查找内容.内容), ) ≠ -1)<br />         完成个数 ＝ 完成个数 ＋ 1<br />         调试输出 (到文本 (数组 [X]))<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 信息框 (“完成”, 0, , )

‘-------------------------------------------------------------

Nichkhun

路过顺便顶一下

夜华

要么完整 要么别发，都到时候说缺这缺那的！！

伸伸党

读入到内存？要是内存不够呢？

超级菜鸟王

不好意思哈 忘记把 那个快速字节集的 命令打上了  在程序集 加个  .程序集变量 数组, 字节集, , "0" .程序集变量 快速字节, 快速字节集对象