說(shuō)明 Match 對(duì)象只能通過(guò) RegExp 對(duì)象的 Execute 方法來(lái)創(chuàng)建，該方法實(shí)際上返回了 Match 對(duì)象的集合。所有的 Match 對(duì)象屬性都是只讀的。 在執(zhí)行正則表達(dá)式時(shí)，可能產(chǎn)生零個(gè)或多個(gè) Match 對(duì)象。每個(gè) Match 對(duì)象提供了被正則表達(dá)式搜索找到的字符串的訪問(wèn)、字符串的長(zhǎng)度，以及找到匹配的索引位置等。
下面的代碼說(shuō)明了 Match 對(duì)象的用法：
Function RegExpTest(patrn, strng) Dim regEx, Match, Matches ' 建立變量。 Set regEx = New RegExp ' 建立正則表達(dá)式。 regEx.Pattern = patrn ' 設(shè)置模式。 regEx.IgnoreCase = True ' 設(shè)置是否區(qū)分大小寫(xiě)。 regEx.Global = True ' 設(shè)置全局替換。 Set Matches = regEx.Execute(strng) ' 執(zhí)行搜索。 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
