Test 方法

對指定的字符串執(zhí)行一個正則表達(dá)式搜索，并返回一個 Boolean 值指示是否找到匹配的模式。

object.Test(string)

參數(shù)

object

必選項(xiàng)?？偸且粋€ RegExp 對象的名稱。

string

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

說明

正則表達(dá)式搜索的實(shí)際模式是通過RegExp對象的Pattern屬性來設(shè)置的。RegExp.Global屬性對Test方法沒有影響。

如果找到了匹配的模式，Test方法返回True；否則返回False。

下面的代碼說明了Test 方法的用法。

Function RegExpTest(patrn, strng)  Dim regEx, retVal            ' 建立變量。  Set regEx = New RegExp         ' 建立正則表達(dá)式。  regEx.Pattern = patrn         ' 設(shè)置模式。  regEx.IgnoreCase = False         ' 設(shè)置是否區(qū)分大小寫。  retVal = regEx.Test(strng)         ' 執(zhí)行搜索測試。  If retVal Then    RegExpTest = "找到一個或多個匹配。"  Else    RegExpTest = "未找到匹配。"  End IfEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))