Test 方法
對指定的字符串執(zhí)行一個正則表達式搜索,并返回一個 Boolean 值指示是否找到匹配的模式。
object.Test(string)
參數(shù)
object
必選項??偸且粋€ RegExp 對象的名稱。
string
必選項。要執(zhí)行正則表達式搜索的文本字符串。
說明
正則表達式搜索的實際模式是通過RegExp對象的Pattern屬性來設置的。RegExp.Global屬性對Test方法沒有影響。
如果找到了匹配的模式,Test方法返回True;否則返回False。
下面的代碼說明了Test 方法的用法。
Function RegExpTest(patrn, strng) Dim regEx, retVal '
建立變量。 Set regEx = New RegExp '
建立正則表達式。 regEx.Pattern = patrn '
設置模式。 regEx.IgnoreCase = False '
設置是否區(qū)分大小寫。 retVal = regEx.Test(strng)
'
執(zhí)行搜索測試。 If retVal Then
RegExpTest = "
找到一個或多個匹配。"
Else
RegExpTest = "
未找到匹配。"
End If
End Function
MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))