易语言正则表达式对象

对象.创建 (“VBScript.RegExp”, ) ' 创建正则表达式对象
对象.写属性 (“Pattern”, patrn) ' 创建正则表达式的模式
对象.写属性 (“IgnoreCase”, 取反 (是否区分大小写))
对象.写属性 (“Global”, 1) ' 设置全局可用性。
' 对象.写属性 (“Multiline”, 1)
搜索对象 ＝ 对象.对象型方法 (“Execute”, strng) ' 执行搜索
length ＝ 搜索对象.读数值属性 (“Count”, ) ' 取搜索出的个数
.计次循环首 (length, i) ' 遍历搜索对象
搜索对象2 ＝ 搜索对象.对象型方法 (“Item”, i － 1)
临时文本 ＝ 搜索对象2.读文本属性 (“Value”, )
临时文本 ＝ 取文本中间 (临时文本, 删头长度 ＋ 1, 取文本长度 (临时文本) － 删头长度 － 删尾长度)
加入成员 (retstrng, 头部文本 ＋ 临时文本 ＋ 尾部文本)
.计次循环尾 ()