说明

Match对象只能通过RegExp对象的Execute方法来创建，该方法实际上返回了Match对象的集合。所有的Match对象属性都是只读的。

在执行正则表达式时，可能产生零个或多个Match对象。每个Match对象提供了被正则表达式搜索找到的字符串的访问、字符串的长度，以及找到匹配的索引位置等。

下面的代码说明了Match对象的用法：

FunctionRegExpTest(patrn,strng)

DimregEx,Match,Matches'建立变量。

SetregEx=NewRegExp'建立正则表达式。

regEx.Pattern=patrn'设置模式。

regEx.IgnoreCase=True'设置是否区分大小写。

regEx.Global=True'设置全局替换。

SetMatches=regEx.Execute(strng)'执行搜索。

ForEachMatchinMatches'遍历Matches集合。

RetStr=RetStr&"Match"&I&"foundatposition"

RetStr=RetStr&Match.FirstIndex&".MatchValueis"'

RetStr=RetStr&Match.Value&"'."&vbCRLF

Next

RegExpTest=RetStr

EndFunction

MsgBox(RegExpTest("is.","IS1is2IS3is4"))