需要一个更高效的写法，附源码

aismy

.版本 2
.支持库 spec
.子程序 _按钮1_被单击
' 我有很多待查询的文本，有没有更方便的写法？
.如果 (寻找文本 (编辑框2.内容, “11”, , 假) ≠ -1)
    调试输出 (“找到了11”)
.否则
    .如果 (寻找文本 (编辑框2.内容, “22”, , 假) ≠ -1)
        调试输出 (“找到了22”)
    .否则
        .如果 (寻找文本 (编辑框2.内容, “33”, , 假) ≠ -1)
            调试输出 (“找到了33”)
        .否则
            .如果 (寻找文本 (编辑框2.内容, “44”, , 假) ≠ -1)
                调试输出 (“找到了44”)
            .否则
            .如果结束
        .如果结束
    .如果结束
.如果结束


------------

上面代码能实现我现在的内容，但如果我有100个待查询的关键词，那么就要复制100次？

请问有没有更好的方法？

简单说就是依次查找指点标题是否带有某些关键词，谢谢

ccini

.版本 2

.子程序 _按钮1_被单击
.局部变量 查找文本, 文本型
.局部变量 劈开文本, 文本型, , "0"
.局部变量 c, 整数型

查找文本 ＝ “11|22|33|44|55|66|77|88|99|00|”
劈开文本 ＝ 分割文本 (查找文本, “|”, )
.计次循环首 (取数组成员数 (劈开文本), c)
    输出调试文本 (“关键文本:” ＋ 劈开文本 [c])
    .如果真 (寻找文本 (编辑框1.内容, 劈开文本 [c], , 假) ≠ -1)
        输出调试文本 (“找到了:” ＋ 到文本 (劈开文本 [c]))
        跳出循环 ()
    .如果真结束

.计次循环尾 ()

ccini

记次循环{:3_227:}{:3_227:}

qq793359277

换行符分割
计次循环查找

老贼富甲天下

改成判断试试，代码能减少{:3_233:}

ccini

楼主验货，交币{:3_244:}

爱家的小懒虫

点我头像加Q

爱家的小懒虫

1. 
   
2. .版本 2
   
3. .支持库 RegEx
   
4. .程序集 窗口程序集1
   
5. .子程序 _按钮1_被单击
   
6. .局部变量 文本, 文本型
   
7. .局部变量 正则, 正则表达式
   
8. .局部变量 搜索结果, 搜索结果, , "0"
   
9. .局部变量 i, 整数型
   
10. 编辑框2.内容 ＝ “”
    
11. 文本 ＝ 编辑框1.内容
    
12. 正则.创建 (“(\d)\1”, 真)  ' 可以匹配 2个相同的数字
    
13. 搜索结果 ＝ 正则.搜索全部 (文本)
    
14. .如果真 (取数组成员数 (搜索结果) ＞ 0)
    
15.     搜索结果 ＝ 正则.搜索全部 (文本)
    
16.     .计次循环首 (取数组成员数 (搜索结果), i)
    
17.         编辑框2.加入文本 (搜索结果 [i].取匹配文本 (文本, ) ＋ #换行符)
    
18.     .计次循环尾 ()
    
19.     返回 ()
    
20. .如果真结束
    
21. 编辑框2.加入文本 (“没有找到!”)
    

复制代码

老贼富甲天下

ccini 发表于 2011-10-16 21:19
楼主验货，交币

谢谢噢{:3_236:}

56seer龙

.版本 2
.支持库 RegEx
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 正则, 正则表达式
.局部变量 搜索结果, 搜索结果, , "0"
.局部变量 i, 整数型
编辑框2.内容 ＝ “”
文本 ＝ 编辑框1.内容
正则.创建 (“(\d)\1”, 真)  ' 可以匹配 2个相同的数字
搜索结果 ＝ 正则.搜索全部 (文本)
.如果真 (取数组成员数 (搜索结果) ＞ 0)
    搜索结果 ＝ 正则.搜索全部 (文本)
    .计次循环首 (取数组成员数 (搜索结果), i)
        编辑框2.加入文本 (搜索结果 [i].取匹配文本 (文本, ) ＋ #换行符)
    .计次循环尾 ()
    返回 ()
.如果真结束
编辑框2.加入文本 (“没有找到!”)