关于快速寻找数组中某文本所在位置和次数的求助

小白请多指教

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
数组	文本型		0
a	文本型

加入成员 (数组, “1/-1--2--3--4--5--6--7--8--9-”)
加入成员 (数组, “2/-11--22--33--44--55--66--77--88--99-”)
加入成员 (数组, “3/-111--22--333--444--555--666--777--888--999-”)
加入成员 (数组, “4/-1111--22--3333--4444--5555--6666--7777--8888--9999-”)
加入成员 (数组, “5/-11111--22222--33333--44444--55555--66666--77777--88888--99999-”)
加入成员 (数组, “6/-111111--222222--333333--444444--555555--666666--777777--888888--999999-”)
加入成员 (数组, “7/-1111111--2222222--3333333--4444444--5555555--6666666--7777777--8888888--9999999-”)
加入成员 (数组, “8/-11111111--22222222--33333333--44444444--55555555--66666666--77777777--88888888--99999999-”)
加入成员 (数组, “9/-111111111--222222222--333333333--444444444--555555555--666666666--777777777--888888888--999999999-”)
加入成员 (数组, “10/-1111111111--2222222222--3333333333--4444444444--5555555555--6666666666--7777777777--8888888888--9999999999-”)
加入成员 (数组, “11/-11111111111--22222222222--33333333333--44444444444--55555555555--66666666666--77777777777--88888888888--99999999999-”)
' 假设这段数组是我获取到的， 我需寻找出-22-这个文本在这段数组中出现的次数，以及位置，如果使用计次循环是真的太慢了 因为我实际要寻找的数组量大概在20W
' 使用hashmap没有发现有模糊查找值的办法

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 a, 文本型<br /> <br /> 加入成员 (数组, “1/-1--2--3--4--5--6--7--8--9-”)<br /> 加入成员 (数组, “2/-11--22--33--44--55--66--77--88--99-”)<br /> 加入成员 (数组, “3/-111--22--333--444--555--666--777--888--999-”)<br /> 加入成员 (数组, “4/-1111--22--3333--4444--5555--6666--7777--8888--9999-”)<br /> 加入成员 (数组, “5/-11111--22222--33333--44444--55555--66666--77777--88888--99999-”)<br /> 加入成员 (数组, “6/-111111--222222--333333--444444--555555--666666--777777--888888--999999-”)<br /> 加入成员 (数组, “7/-1111111--2222222--3333333--4444444--5555555--6666666--7777777--8888888--9999999-”)<br /> 加入成员 (数组, “8/-11111111--22222222--33333333--44444444--55555555--66666666--77777777--88888888--99999999-”)<br /> 加入成员 (数组, “9/-111111111--222222222--333333333--444444444--555555555--666666666--777777777--888888888--999999999-”)<br /> 加入成员 (数组, “10/-1111111111--2222222222--3333333333--4444444444--5555555555--6666666666--7777777777--8888888888--9999999999-”)<br /> 加入成员 (数组, “11/-11111111111--22222222222--33333333333--44444444444--55555555555--66666666666--77777777777--88888888888--99999999999-”)<br /> <br /> ' 假设这段数组是我获取到的， 我需寻找出-22-这个文本在这段数组中出现的次数，以及位置，如果使用计次循环是真的太慢了 因为我实际要寻找的数组量大概在20W<br /> ' 使用hashmap没有发现有模糊查找值的办法

时髦猪

  

子程序名	返回值类型	公开	备 注
数组_寻找数组	整数型		寻找指定成员在数组中出现的次数，
参数名	类 型	参考	可空	数组	备 注
待查找的数组	文本型
待查找的成员	文本型
寻找到的数组	整数型				返回出现的位置数组信息

.版本 2<br /> <br /> .子程序 数组_寻找数组, 整数型, , 寻找指定成员在数组中出现的次数，<br /> .参数 待查找的数组, 文本型, 数组, <br /> .参数 待查找的成员, 文本型, , <br /> .参数 寻找到的数组, 整数型, 参考 数组, 返回出现的位置数组信息

精易模块这个不行么

小白请多指教

时髦猪 发表于 2023-8-1 17:13
[e=4].版本 2

.子程序 数组_寻找数组, 整数型, , 寻找指定成员在数组中出现的次数，

这个不是搜索 并且慢

时髦猪

可以改成搜索

慢不慢我不清楚 你可以试试
其实也是循环查找

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
数组	文本型	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

加入成员 (数组, “1/-1--2--3--4--5--6--7--8--9-”)
加入成员 (数组, “2/-11--22--33--44--55--66--77--88--99-”)
加入成员 (数组, “3/-111--22--333--444--555--666--777--888--999-”)
加入成员 (数组, “4/-1111--22--3333--4444--5555--6666--7777--8888--9999-”)
加入成员 (数组, “5/-11111--22222--33333--44444--55555--66666--77777--88888--99999-”)
加入成员 (数组, “6/-111111--222222--333333--444444--555555--666666--777777--888888--999999-”)
加入成员 (数组, “7/-1111111--2222222--3333333--4444444--5555555--6666666--7777777--8888888--9999999-”)
加入成员 (数组, “8/-11111111--22222222--33333333--44444444--55555555--66666666--77777777--88888888--99999999-”)
加入成员 (数组, “9/-111111111--222222222--333333333--444444444--555555555--666666666--777777777--888888888--999999999-”)
加入成员 (数组, “10/-1111111111--2222222222--3333333333--4444444444--5555555555--6666666666--7777777777--8888888888--9999999999-”)
加入成员 (数组, “11/-11111111111--22222222222--33333333333--44444444444--55555555555--66666666666--77777777777--88888888888--99999999999-”)

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

变量名	类 型	静态	数组	备 注
找到的	整数型		0

数组_寻找数组 (数组, “-22-”, 找到的)
调试输出 (找到的)

子程序名	返回值类型	公开	备 注
数组_寻找数组	整数型		寻找指定成员在数组中出现的次数，
参数名	类 型	参考	可空	数组	备 注
待查找的数组	文本型
待查找的成员	文本型
寻找到的数组	整数型				返回出现的位置数组信息

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (取数组成员数 (待查找的数组), i)
系统_处理事件 ()
' 如果真 (待查找的成员 ＝ 待查找的数组 [i])如果真 ()
' 加入成员 (寻找到的数组, i)
如果真 (寻找文本 (待查找的数组 [i], 待查找的成员, 1, 假) ≠ -1)
加入成员 (寻找到的数组, i)

计次循环尾 ()
返回 (取数组成员数 (寻找到的数组))

子程序名	返回值类型	公开	备 注
系统_处理事件			比普通的处理事件速度要快3倍左右；

如果真 (GetInputState () ≠ 0)
处理事件 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 数组, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 加入成员 (数组, “1/-1--2--3--4--5--6--7--8--9-”)<br /> 加入成员 (数组, “2/-11--22--33--44--55--66--77--88--99-”)<br /> 加入成员 (数组, “3/-111--22--333--444--555--666--777--888--999-”)<br /> 加入成员 (数组, “4/-1111--22--3333--4444--5555--6666--7777--8888--9999-”)<br /> 加入成员 (数组, “5/-11111--22222--33333--44444--55555--66666--77777--88888--99999-”)<br /> 加入成员 (数组, “6/-111111--222222--333333--444444--555555--666666--777777--888888--999999-”)<br /> 加入成员 (数组, “7/-1111111--2222222--3333333--4444444--5555555--6666666--7777777--8888888--9999999-”)<br /> 加入成员 (数组, “8/-11111111--22222222--33333333--44444444--55555555--66666666--77777777--88888888--99999999-”)<br /> 加入成员 (数组, “9/-111111111--222222222--333333333--444444444--555555555--666666666--777777777--888888888--999999999-”)<br /> 加入成员 (数组, “10/-1111111111--2222222222--3333333333--4444444444--5555555555--6666666666--7777777777--8888888888--9999999999-”)<br /> 加入成员 (数组, “11/-11111111111--22222222222--33333333333--44444444444--55555555555--66666666666--77777777777--88888888888--99999999999-”)<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 找到的, 整数型, , "0"<br /> <br /> 数组_寻找数组 (数组, “-22-”, 找到的)<br /> 调试输出 (找到的)<br /> <br /> <br /> <br /> <br /> .子程序 数组_寻找数组, 整数型, 公开, 寻找指定成员在数组中出现的次数，<br /> .参数 待查找的数组, 文本型, 数组<br /> .参数 待查找的成员, 文本型<br /> .参数 寻找到的数组, 整数型, 参考 数组, 返回出现的位置数组信息<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (待查找的数组), i)<br />     系统_处理事件 ()<br />     ' 如果真 (待查找的成员 ＝ 待查找的数组 <i>)如果真 ()<br />     ' 加入成员 (寻找到的数组, i)<br />     .如果真 (寻找文本 (待查找的数组 <i>, 待查找的成员, 1, 假) ≠ -1)<br />         加入成员 (寻找到的数组, i)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (取数组成员数 (寻找到的数组))<br /> <br /> .子程序 系统_处理事件, , 公开, 比普通的处理事件速度要快3倍左右；<br /> <br /> .如果真 (GetInputState () ≠ 0)<br />     处理事件 ()<br /> .如果真结束

补充内容 (2023-8-1 17:32):
.版本 2

.DLL命令 GetInputState, 整数型, "user32", "GetInputState"

小白请多指教

时髦猪 发表于 2023-8-1 17:27
可以改成搜索

慢不慢我不清楚 你可以试试

老哥这个方法我试过了 不行的 因为我要处理的不是这个提供的例子 我要操作的数值非常大 不能用计次循环

美稀宗

文本每行长度也不一样吗

笨来无一悟

-22-  2的的个数确不确定 数量不确定只是取次数 可以用正则表达式【 --22*-- 】数量确定可以用快速文本对象 数量不确定还要取位置和次数 暂时没有想出高效的算法

笨来无一悟

数量不确定 只取出现次数 可以用正则 数量确定的 取位置和次数 直接用快速文本对象就可以了 游标循环+1就取出来了数量不确定还有同时取出次数和位置 低效的算法不想发

风清云游

这种情况下还用数组 就是你的错了

美稀宗

37万条用了4秒多，你电脑配置好点应该速度更快

  

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

变量名	类 型	静态	数组	备 注
文件号	整数型
文本	文本型
文本数组	文本型		0
变量地址	整数型
搜索结果	整数型
i	整数型
文本长度	整数型
搜索结果文本	文本型
时间	整数型
内存地址	整数型
文本行	整数型
文本行长度	整数型
偏移	整数型
字节集	字节集
文本位置	整数型

时间 ＝ 取启动时间 ()
文件号 ＝ 打开文件 (取当前目录 () ＋ “\待处理文本.txt”, 1, )
文本 ＝ 读入文本 (文件号, )
文本长度 ＝ 取文本长度 (文本)
关闭文件 (文件号)
内存地址 ＝ 申请内存 (4 �� (取整 (文本长度 ÷ 4) ＋ 1), 真)
写到内存 (文本, 内存地址, )
字节集 ＝ 指针到字节集 (内存地址, 4 �� (取整 (文本长度 ÷ 4) ＋ 1))
文件号 ＝ 打开内存文件 ()
循环判断首 ()
文本行 ＝ 寻找字节集 (字节集, { 13, 10 }, 偏移 ＋ 1) ＋ 1
文本行长度 ＝ 文本行 － 文本位置
如果 (文本行 ＞ 0)
i ＝ i ＋ 1
文本位置 ＝ 文本行

跳出循环 ()

循环判断首 ()
搜索结果 ＝ 寻找字节集 (指针到字节集 (内存地址 ＋ 偏移, 文本行长度), 到字节集 (欲搜索文本), 搜索结果 ＋ 取字节集长度 (到字节集 (欲搜索文本)))
如果 (搜索结果 ≥ 1)
写文本行 (文件号, 到文本 (i) ＋ “|” ＋ 到文本 (搜索结果))
偏移 ＝ 偏移 ＋ 文本行长度

循环判断尾 (搜索结果 ≥ 1)
循环判断尾 (文本行 ＞ 0)
移到文件首 (文件号)
搜索结果文本 ＝ 读入文本 (文件号, )
关闭文件 (文件号)
文件号 ＝ 打开文件 (取当前目录 () ＋ “\搜索结果文本.txt”, 4, )
写出文本 (文件号, 搜索结果文本)
关闭文件 (文件号)
调试输出 (取启动时间 () － 时间)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 搜索文本<br /> .参数 欲搜索文本, 文本型<br /> .局部变量 文件号, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 变量地址, 整数型<br /> .局部变量 搜索结果, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 文本长度, 整数型<br /> .局部变量 搜索结果文本, 文本型<br /> .局部变量 时间, 整数型<br /> .局部变量 内存地址, 整数型<br /> .局部变量 文本行, 整数型<br /> .局部变量 文本行长度, 整数型<br /> .局部变量 偏移, 整数型<br /> .局部变量 字节集, 字节集<br /> .局部变量 文本位置, 整数型<br /> <br /> 时间 ＝ 取启动时间 ()<br /> 文件号 ＝ 打开文件 (取当前目录 () ＋ “\待处理文本.txt”, 1, )<br /> 文本 ＝ 读入文本 (文件号, )<br /> 文本长度 ＝ 取文本长度 (文本)<br /> 关闭文件 (文件号)<br /> 内存地址 ＝ 申请内存 (4 × (取整 (文本长度 ÷ 4) ＋ 1), 真)<br /> 写到内存 (文本, 内存地址, )<br /> 字节集 ＝ 指针到字节集 (内存地址, 4 × (取整 (文本长度 ÷ 4) ＋ 1))<br /> 文件号 ＝ 打开内存文件 ()<br /> .循环判断首 ()<br />     文本行 ＝ 寻找字节集 (字节集, { 13, 10 }, 偏移 ＋ 1) ＋ 1<br />     文本行长度 ＝ 文本行 － 文本位置<br />     .如果 (文本行 ＞ 0)<br />         i ＝ i ＋ 1<br />         文本位置 ＝ 文本行<br /> <br />     .否则<br />         跳出循环 ()<br />     .如果结束<br /> <br />     .循环判断首 ()<br />         搜索结果 ＝ 寻找字节集 (指针到字节集 (内存地址 ＋ 偏移, 文本行长度), 到字节集 (欲搜索文本), 搜索结果 ＋ 取字节集长度 (到字节集 (欲搜索文本)))<br />         .如果 (搜索结果 ≥ 1)<br />             写文本行 (文件号, 到文本 (i) ＋ “|” ＋ 到文本 (搜索结果))<br />         .否则<br />             偏移 ＝ 偏移 ＋ 文本行长度<br />         .如果结束<br /> <br />     .循环判断尾 (搜索结果 ≥ 1)<br /> <br /> .循环判断尾 (文本行 ＞ 0)<br /> 移到文件首 (文件号)<br /> 搜索结果文本 ＝ 读入文本 (文件号, )<br /> 关闭文件 (文件号)<br /> 文件号 ＝ 打开文件 (取当前目录 () ＋ “\搜索结果文本.txt”, 4, )<br /> 写出文本 (文件号, 搜索结果文本)<br /> 关闭文件 (文件号)<br /> 调试输出 (取启动时间 () － 时间)