Comprueba si una cadena determinada coincide con el patrón de expresión regular. El método Test devuelve un valor booleano (True o False). Devuelve True si la cadena coincide con el patrón y False si no es así.
Sintaxis: RegExpObject.Test(string)
Argumentos: - string: cadena que desea probar con respecto al patrón de expresión regular.
Ejemplo:
Dim regEx, str, result
' Create a new RegExp object
Set regEx = CreateObject("VBScript.RegExp")
' Set the pattern for matching email addresses
regEx.IgnoreCase = True
regEx.Global = True
regEx.Pattern = "^[a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,}$"
' Test if the string is a valid email
str = "example@example.com"
result = regEx.Test(str)
If result Then
'Logic for Valid email
Else
'Logic for Invalid email
End If