|
发表于 2011-7-31 16:47:44
|
显示全部楼层
广东省佛山市
本帖最后由 fsjoe 于 2011-7-31 16:49 编辑
[0-9]{5,10}
[e]
.版本 2
.支持库 RegEx
.子程序 功能_匹配正则, 文本型, , 本子程序采用【精易编程助手】生成
.参数 源文本, 文本型, , 欲被匹配的文本
.参数 子匹配索引, 整数型, 可空, 0=取匹配文本 从1开始将代表为子匹配文本的索引
.局部变量 局_正则, 正则表达式
.局部变量 局_搜索结果, 搜索结果, 静态, "0"
.如果真 (局_正则.创建 (“[0-9]{5,10}”, 真) = 假)
信息框 (“正则创建失败”, 0, )
返回 (“”)
.如果真结束
局_搜索结果 = 局_正则.搜索全部 (源文本)
.如果真 (取数组成员数 (局_搜索结果) = 0)
信息框 (“匹配文本数量为0”, 0, )
返回 (“”)
.如果真结束
.判断开始 (子匹配索引 = 0)
返回 (局_搜索结果 [1].取匹配文本 (源文本, ))
.判断 (子匹配索引 > 0)
返回 (局_搜索结果 [1].取子匹配文本 (源文本, 子匹配索引, ))
.默认
.判断结束
返回 (“”)
[/e]
|
|