|
发表于 2011-7-23 13:49:39
|
显示全部楼层
广东省东莞市
本帖最后由 exit11 于 2011-7-23 13:51 编辑
[e].版本 2
.支持库 RegEx
.支持库 iext
.支持库 spec
.子程序 __启动窗口_创建完毕
.局部变量 a, 文本型
.局部变量 正则, 正则表达式
.局部变量 结果, 搜索结果, , "0"
.局部变量 x, 整数型
.局部变量 索引, 整数型
a = 子文本替换 (#常量1, #换行符, , , , 真)
正则.创建 (“姓名(.*?)地址(.*?)电话(.*?)QQ(\d{1,})”, )
结果 = 正则.搜索全部 (a)
.计次循环首 (取数组成员数 (结果), x)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 结果 [x].取子匹配文本 (a, 1, ))
超级列表框1.置标题 (索引, 1, 结果 [x].取子匹配文本 (a, 2, ))
超级列表框1.置标题 (索引, 2, 结果 [x].取子匹配文本 (a, 3, ))
超级列表框1.置标题 (索引, 3, 结果 [x].取子匹配文本 (a, 4, ))
调试输出 (结果 [x].取子匹配文本 (a, 4, ), )
.计次循环尾 ()
[/e] |
|