介绍说明
Match 对象只能通过 RegExp 对象 Execute 思路方法来创建该思路方法实际上返回了 Match 对象集合所有 Match 对象属性都是只读
在执行正则表达式时可能产生零个或多个 Match 对象每个 Match 对象提供了被正则表达式搜索找到串访问、串长度以及找到匹配索引位置等
下面代码介绍说明了 Match 对象使用方法:
Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches ' 建立变量
Set regEx = New RegExp ' 建立正则表达式
regEx.Pattern = patrn ' 设置模式
regEx.IgnoreCase = True ' 设置是否区分大小写
regEx.Global = True ' 设置全局替换
Set Matches = regEx.Execute(strng) ' 执行搜索
For Each Match in Matches ' 遍历 Matches 集合
RetStr = RetStr & "Match " & I & " found at position "
RetStr = RetStr & Match.FirstIndex & ". Match Value is "'
RetStr = RetStr & Match.Value & "'." & vbCRLF
Next
RegExpTest = RetStr
End Function
MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))