|

楼主 |
发表于 2012-9-12 02:43:43
|
显示全部楼层
河北省沧州市
我把正则发上来 。- \w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*
复制代码- .版本 2
- .支持库 RegEx
- .子程序 正则_匹配批量, 整数型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量,失败返回0。
- .参数 源文本, 文本型, , 欲被匹配的文本
- .局部变量 局_正则, 正则表达式, , , 采用的 正则表达式 支持库,无此支持库的请到此下载:http://e.3600gz.cn/uploads/soft/zck/RegEx.rar
- .局部变量 局_搜索结果, 搜索结果, 静态, "0"
- .局部变量 局_匹配数, 整数型, , , 匹配数量
- .局部变量 局_计次, 整数型
- .如果真 (局_正则.创建 (“\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*”, 假) = 假)
- 信息框 (“正则创建失败,请检查正则表达式语句是否有误!”, #错误图标, )
- 返回 (0)
- .如果真结束
- 局_正则.多行模式 = 假
- 局_搜索结果 = 局_正则.搜索全部 (源文本)
- 局_匹配数 = 取数组成员数 (局_搜索结果)
- .如果真 (局_匹配数 = 0)
- 信息框 (“匹配失败,请检检查正则语句是否有误,数量:0”, #错误图标, )
- 返回 (0)
- .如果真结束
- .计次循环首 (局_匹配数, 局_计次)
- 输出调试文本 (“匹配文本 ” + 到文本 (局_计次) + “ 中的子匹配文本 1:” + 局_搜索结果 [局_计次].取子匹配文本 (源文本, 1, ))
- .计次循环尾 ()
- 返回 (局_匹配数)
复制代码 |
|