正则寻找文本

306028258

[e].版本 2 .支持库 RegEx .支持库 iext  .子程序 _按钮2_被单击 .局部变量 a, 文本型 .局部变量 s, 整数型  正则表达式.创建 (“\('(.*?)','”, ) s ＝ 1  .计次循环首 (这里的次数怎么写?, )     搜索结果 ＝ 正则表达式.搜索 (编辑框2.内容, s, )     a ＝ 搜索结果.取子匹配文本 (编辑框2.内容, 1, s)     超级列表框1.插入表项 (, a, , , , ) .计次循环尾 ()  [/e]

我想把找到的链接一行一行加入超级列表,但是循环的次数不知道怎么得到,我正在学习正则,,希望大家能帮助我一下

正则寻找链接.rar (7.47 KB, 下载次数: 23)

2011-10-18 16:18 上传

点击文件名下载附件

笨潴

1. 
   
2. .版本 2
   
3. .支持库 RegEx
   
4. .支持库 iext
   
5. .支持库 spec
   
6. .支持库 wmp9
   
7. 
   
8. .程序集 窗口程序集1
   
9. .程序集变量 正则表达式, 正则表达式
   
10. .程序集变量 搜索结果, 搜索结果, , "0"
    
11. 
    
12. .子程序 _按钮1_被单击
    
13. 
    
14. 通用对话框1.打开 ()
    
15. 编辑框1.内容 ＝ 通用对话框1.文件名
    
16. 编辑框2.内容 ＝ 到文本 (读入文件 (编辑框1.内容))
    
17. 
    
18. 
    
19. .子程序 _按钮2_被单击
    
20. .局部变量 a, 文本型
    
21. .局部变量 s, 整数型
    
22. .局部变量 n, 整数型
    
23. .局部变量 计次, 整数型
    
24. 
    
25. 正则表达式.创建 (“\('(.*?)','”, )
    
26. s ＝ 1
    
27. 搜索结果 ＝ 正则表达式.搜索全部 (编辑框2.内容)
    
28. .计次循环首 (取数组成员数 (搜索结果), 计次)
    
29.     a ＝ 搜索结果 [计次].取子匹配文本 (编辑框2.内容, 1, )
    
30.     超级列表框1.插入表项 (n, a, , , , )
    
31. .计次循环尾 ()
    
32. 调试输出 (a, s, n)
    
33. 
    
34. 
    
35. 
    
36. .子程序 __启动窗口_创建完毕
    
37. 
    
38. .' 如果 (编辑框1.内容 ≠ “”)
    
39.     ' 编辑框2.内容 ＝ 到文本 (读入文件 (编辑框1.内容))
    
40.     ' 调试输出 (取文本长度 (编辑框2.内容))
    
41. .否则
    
42.     ' 返回 ()
    
43. .如果结束
    
44. 
    
45. 
    
46. 
    
47. .子程序 _超级列表框1_被双击, 逻辑型
    
48. .参数 横向位置, 整数型
    
49. .参数 纵向位置, 整数型
    
50. .参数 功能键状态, 整数型
    
51. 
    
52. 播放器1.地址 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, )
    
53. 
    

复制代码

306028258

{:3_228:}  自己沙发一下   大家棒棒忙谢谢