VBScript のメソッド、Test

まんま

Function RegExpTest(patrn, strng)
  Dim regEx, retVal              ' 変数を作成します。

  Set regEx = New RegExp         ' 正規表現を作成します。
  regEx.Pattern = patrn          ' パターンを設定します。
  regEx.IgnoreCase = False       ' 大文字と小文字を区別するように設定します。
  retVal = regEx.Test(strng)     ' 検索をテストします。
  If retVal Then
    RegExpTest = "一致する文字列が 1 つ以上見つかりました。"
  Else
    RegExpTest = "一致する文字列が見つかりません。"
  End If
End Function

MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))
MsgBox(RegExpTest("iS", "IS1 is2 IS3 is4"))