创建表达式("(爱)|(是)|(姐)|(间)",假,假) '
        开始匹配("阿里山扩大飞机我爱啊螺丝扣搭街坊立刻是埃里克的风景姐阿里山的空间发间隔")
        判断循环首 匹配下一个() = 真
                内容 = 取匹配文本() '取匹配到的文本
                位置 = 取匹配开始位置() '取匹配到的文本在文本中的开始位置
                结果 = 结果 & "\n" & "找到：" & 内容 & "---位置：" & 位置
                变量循环首 计次 = 1 至 取子匹配数量()
                        结果 = 结果 & "\n子匹配文本：" & 取子匹配文本(计次)
                变量循环尾
        判断循环尾
        编辑框3.内容 = 结果

楼上正解

1. 事件 按钮1.被单击()
   
2.        
   
3.         变量 wb 为 文本型()
   
4.         变量  i 为 整数型
   
5.        
   
6.         wb = 分割文本(编辑框2.内容,"/n")
   
7.        
   
8.         判断循环首 i < 取数组成员数(wb)
   
9.                
   
10.                 如果 寻找文本(编辑框1.内容,wb(i),0) <> -1 则
    
11.                        
    
12.                         编辑框3.内容="已找到"
    
13.                        
    
14.                         退出 事件
    
15.                 结束 如果
    
16.                 i=i+1
    
17.         判断循环尾
    
18. 
    
19.         编辑框3.内容="未找到匹配文本"
    
20.        
    
21. 结束 事件

复制代码