Execute 方法

對(duì)指定的字符串執(zhí)行正則表達(dá)式搜索。

object.Execute(string)

參數(shù)

object

必選項(xiàng)?？偸且粋€(gè) RegExp 對(duì)象的名稱(chēng)。

string

必選項(xiàng)。要在其上執(zhí)行正則表達(dá)式的文本字符串。

說(shuō)明

正則表達(dá)式搜索的設(shè)計(jì)模式是通過(guò) RegExp 對(duì)象的 Pattern 來(lái)設(shè)置的。

Execute 方法返回一個(gè) Matches 集合，其中包含了在 string 中找到的每一個(gè)匹配的 Match 對(duì)象。如果未找到匹配，Execute 將返回空的 Matches 集合。

下面的代碼說(shuō)明了 Execute 方法的用法。

Function RegExpTest(patrn, strng)  Dim regEx, Match, Matches      ' Create variable.  Set regEx = New RegExp         ' Create a regular expression.  regEx.Pattern = patrn         ' Set pattern.  regEx.IgnoreCase = True         ' Set case insensitivity.  regEx.Global = True         ' Set global applicability.  Set Matches = regEx.Execute(strng)   ' Execute search.  For Each Match in Matches      ' Iterate Matches collection.    RetStr = RetStr  "Match found at position "    RetStr = RetStr  Match.FirstIndex  ". Match Value is '"    RetStr = RetStr  Match.Value  "'."  vbCRLF  Next  RegExpTest = RetStrEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))