超级列表框多关键词筛选

Shouting° · 发表于 2017-10-16 00:02:04

超级列表框多关键词筛选删除怎么写？我自己弄得慢的要死, 哪位大哥帮一下忙改一下提速一下谢谢
注意代码里面有上万的关键词需要跟超级列表框里面的比对筛选所以好慢好慢

QQ截图20171015235932.png

随心软件 · 发表于 2017-10-16 00:02:05

.版本 2
.支持库 iext
.支持库 spec

.计次循环首 (超级列表框1.取表项数 (), 局_计次)
' 从下向上查找,以免期间删除行索引错乱
当前行数＝超级列表框1.取表项数 () －局_计次
行内容＝超级列表框1.取标题 (当前行数, 0)

.计次循环首 (取数组成员数 (关键词数组), 局_计次2)
      .如果真 (关键词数组 [局_计次2] ≠ “”)
         .如果真 (倒找文本 (行内容, 关键词数组 [局_计次2], , 假) ＞ -1)
            调试输出 (行内容, 关键词数组 [局_计次2])
            超级列表框1.删除表项 (当前行数)
            跳出循环 ()
         .如果真结束

      .如果真结束

.计次循环尾 ()

.计次循环尾 ()

补充内容 (2017-10-16 01:03):
如果真 (关键词数组 [局_计次2] ≠ “”)

添加一个这个判断，我刚才调试输出一下，是因为关键词有一个是空白的原因

Shouting° · 发表于 2017-10-16 00:02:57

忘记发代码了

Patek · 发表于 2017-10-16 00:20:32

子程序名	返回值类型	公开	备注
子程序1

变量名	类型	静态	数组	备注
n	整数型
i	整数型
过滤标题内容	文本型
分割	文本型		0
计次	整数型
关键计次	整数型
A	文本型

过滤标题内容＝到文本 (网页_访问_对象 (“http://www.660net.com/%E5%90%8E%E5%8F%B0%E5%8F%82%E6%95%B0/%E5%AE%9D%E8%B4%9D%E8%BF%87%E6%BB%A4.txt”))
分割＝分割文本 (过滤标题内容, “●”, )

计次循环首 (超级列表框1.取表项数 (), 计次)

A ＝超级列表框1.取标题 (计次－ 1, 0)

计次循环首 (取数组成员数 (分割), 关键计次)

A ＝文本_替换 (A, , , , 分割 [关键计次], “”)

计次循环尾 ()

调试输出 (A)

计次循环尾 ()
调试输出 (“ok”)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

补充内容 (2017-10-16 00:20):
纯文本模式查看...

Shouting° · 发表于 2017-10-16 00:24:07

Joker4tb 发表于 2017-10-16 00:20
[e=2].版本 2
.支持库 iext
.支持库 spec

我要删除行

Shouting° · 发表于 2017-10-16 00:25:56

Joker4tb 发表于 2017-10-16 00:20
[e=2].版本 2
.支持库 iext
.支持库 spec

何况这速度还是不行, 我超级列表框数据也几万以上的

Patek · 发表于 2017-10-16 00:33:21

Shouting° 发表于 2017-10-16 00:25
何况这速度还是不行, 我超级列表框数据也几万以上的

先把你的想法说清楚先...

Shouting° · 发表于 2017-10-16 00:38:22

Joker4tb 发表于 2017-10-16 00:33
先把你的想法说清楚先...

嗯, 速度不管了, 你帮我改成删除谢谢

随心软件 · 发表于 2017-10-16 00:41:03

麻烦再详细的说明一下你想要干什么，我看半天没看明白

Shouting° · 发表于 2017-10-16 00:44:16

yangguang 发表于 2017-10-16 00:41
麻烦再详细的说明一下你想要干什么，我看半天没看明白

就是关键词跟超级列表框比对在超级列表框找到关键词之后删除整行啊

		自动登录	找回密码
密码			注册

[已解决] 超级列表框多关键词筛选

最佳答案

浏览过的版块

精易论坛 - 有你更精彩 /2