Global 屬性
設(shè)置或返回一個(gè) Boolean 值,該值指明在整個(gè)搜索字符串時(shí)模式是全部匹配還是只匹配第一個(gè)。
object.Global [= True | False ]
對(duì)象 參數(shù)總是 RegExp 對(duì)象。如果搜索應(yīng)用于整個(gè)字符串,Global 屬性的值為 True,否則其值為 False。默認(rèn)的設(shè)置為 False。
說(shuō)明
下面的代碼說(shuō)明了 Global 屬性的用法(改變賦予 Global 屬性的值并觀察其效果):
Function RegExpTest(patrn, strng) Dim regEx ,match,matches '
建立變量。 Set regEx = New RegExp '
建立規(guī)范表達(dá)式。 regEx.Pattern = patrn '
設(shè)置模式。 regEx.IgnoreCase = True '
設(shè)置是否區(qū)分字母的大小寫(xiě)。 regEx.Global = True '
設(shè)置全程性質(zhì)。set matches= regEx.Execute(strng) '
執(zhí)行搜索。for each match in matches '
重復(fù)匹配集合RetStr=RetStr "Match found at position "
RetStr=RetStrMatch.FirstIndex".Match Value is '"
RetStr=RetStrMatch.Value"'."vbCRLF Next
RegExpTest=RetStr
End Function
MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))