|
发表于 2011-10-10 13:01:02
|
显示全部楼层
广东省东莞市
本帖最后由 exit11 于 2011-10-10 13:03 编辑
[e].版本 2
.支持库 RegEx
.支持库 spec
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 正则, 正则表达式
.局部变量 结果, 搜索结果, , "0"
.局部变量 x, 整数型
.局部变量 临时文本, 文本型
.局部变量 临时文本2, 文本型
.局部变量 返回文本, 文本型
.局部变量 临时数组, 文本型, , "2"
正则.创建 (#常量2, )
结果 = 正则.搜索全部 (#常量1)
.计次循环首 (取数组成员数 (结果), x)
临时文本 = 结果 [x].取匹配文本 (#常量1, )
临时文本2 = 结果 [x].取子匹配文本 (#常量1, 2, )
临时数组 = 分割文本 (临时文本2, “ ”, )
临时文本 = 子文本替换 (临时文本, 临时文本2, 临时数组 [2] + “ ” + 临时数组 [1], , , 真)
临时文本2 = 结果 [x].取子匹配文本 (#常量1, 4, )
临时数组 = 分割文本 (临时文本2, “ ”, )
临时文本 = 子文本替换 (临时文本, 临时文本2, 临时数组 [2] + “ ” + 临时数组 [1], , , 真)
调试输出 (结果 [x].取匹配文本 (#常量1, ))
调试输出 (临时文本)
.计次循环尾 ()[/e]
|
|