.计次循环首 (超级列表框EX1.取列数 (), )
超级列表框EX1.删除列 (1)
.计次循环尾 ()
.如果真 (取反 (正则表达式.创建 (表达式文本, 忽略大小写, 匹配多行, 全局匹配)))
超级列表框EX1.插入列 (, 200, “错误提示”, , 0, , , , , , , , , , , , , , , , )
超级列表框EX1.置标题 (超级列表框EX1.插入项目 (, , ), 1, “对不起,您所输入的正则语法有误!”, )
返回 ()
.如果真结束
表达式个数 = 正则表达式.搜索全部 (被搜索文本)
.如果真 (正则表达式.取子表达式个数 () < 1)
超级列表框EX1.插入列 (, 200, “错误提示”, , 0, , , , , , , , , , , , , , , , )
超级列表框EX1.置标题 (超级列表框EX1.插入项目 (, , ), 1, “对不起,您所输入的正则语法有误!”, )
返回 ()
.如果真结束
超级列表框EX1.插入列 (, 40, “序号”, , 0, , , , , , , , , , , , , , , , )
超级列表框EX1.插入列 (, 150, “表达式文本”, , 0, , , , , , , , , , , , , , , , )
.计次循环首 (正则表达式.取子表达式个数 (), i)
超级列表框EX1.插入列 (, 150, “匹配文本-” + 到文本 (i), , 0, , , , , , , , , , , , , , , , )
.计次循环尾 ()
.计次循环首 (表达式个数, i)
ber = 超级列表框EX1.插入项目 (, , )
超级列表框EX1.置标题 (ber, 1, 到文本 (i), )
超级列表框EX1.置标题 (ber, 2, 表达式文本, )
.计次循环首 (正则表达式.取子表达式个数 (), ii)
超级列表框EX1.置标题 (ber, ii + 2, 正则表达式.取子匹配文本 (i, ii), )
.计次循环尾 ()
.计次循环尾 ()