超级列表框多关键词筛选

随心软件

是不是你列表框里是你的数据，然后不能包含你那个网页里获取的数据
要把包含网页里数据的内容删掉？是这个意思么。

Shouting°

yangguang 发表于 2017-10-16 00:44
是不是你列表框里是你的数据，然后不能包含你那个网页里获取的数据
要把包含网页里数据的内容删掉？是这个 ...

网页里的是关键词,  如果列表框里面有 其中一个关键词就删除 列表框行

随心软件

Shouting° 发表于 2017-10-16 00:44
就是 关键词跟超级列表框比对   在超级列表框找到关键词 之后  删除整行啊

只要这一行包含了那个网页获取到的关键词，就把这一行删除掉。是这个意思吧

Shouting°

yangguang 发表于 2017-10-16 00:47
只要这一行包含了那个网页获取到的关键词，就把这一行删除掉。是这个意思吧

是的, 就是这样

随心软件

1. .版本 2
   
2. .支持库 EThread
   
3. .支持库 iext
   
4. 
   
5. .子程序 _按钮1_被单击
   
6. 
   
7. 启动线程 (&子程序1, , )
   
8. 
   
9. .子程序 子程序1
   
10. .局部变量 过滤标题内容, 文本型
    
11. .局部变量 关键词数组, 文本型, , "0"
    
12. .局部变量 局_计次, 整数型
    
13. .局部变量 局_计次2, 整数型
    
14. .局部变量 当前行数, 整数型
    
15. .局部变量 行内容, 文本型
    
16. 
    
17. 过滤标题内容 ＝ 到文本 (网页_访问_对象 (“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”))
    
18. 关键词数组 ＝ 分割文本 (过滤标题内容, “●”, )
    
19. 
    
20. .计次循环首 (超级列表框1.取表项数 (), 局_计次)
    
21.     ' 从下向上查找,以免期间删除行索引错乱
    
22.     当前行数 ＝ 超级列表框1.取表项数 () － 局_计次
    
23.     行内容 ＝ 超级列表框1.取标题 (当前行数, 0)
    
24. 
    
25.     .计次循环首 (取数组成员数 (关键词数组), 局_计次2)
    
26.         .如果真 (倒找文本 (行内容, 关键词数组 [局_计次2], , 假) ＞ -1)
    
27.             超级列表框1.删除表项 (当前行数)
    
28.             跳出循环 ()
    
29.         .如果真结束
    
30. 
    
31.     .计次循环尾 ()
    
32. 
    
33. .计次循环尾 ()
    

复制代码

补充内容 (2017-10-16 00:55):
你试一下，不要每次都在编辑框里显示出来，会很影响速度

Shouting°

yangguang 发表于 2017-10-16 00:54
补充内容 (2017-10-16 00:55):
你试一下，不要每次都在编辑框里显示出来，会很影响速度

这样删除了一下  不包含关键词的  行

补充内容 (2017-10-16 00:58):

yangguang 发表于 2017-10-16 00:54
补充内容 (2017-10-16 00:55):
你试一下，不要每次都在编辑框里显示出来，会很影响速度

这样删除了一些  不包含关键词的  行

Shouting°

yangguang 发表于 2017-10-16 01:02
.版本 2
.支持库 iext
.支持库 spec

嗯, 这样正确了, 不知道数据大如何,   先这样吧