作成 2010.01.08
更新 2010.01.08
更新 2010.01.08
VBScript で正規表現
サンプル1
このサンプルではstrBの文字列がstrAのパターンに合致するか確認します。
Option Explicit Dim strA, strB Dim regEx Set regEx = New RegExp strA = "^te3-0st$" strB = "tE3-0sT" regEx.Pattern = strA regEx.Global = False regEx.IgnoreCase = True If regEx.Test(strB) Then MsgBox "B true" Else MsgBox "B false" End If
サンプル２
このサンプルではstrAのパターンに合致した複数の値を取得します。
Option Explicit Dim strA, strB Dim regEx, Matches, Match Set regEx = New RegExp strA = "\d+" strB = "000aaa111" regEx.Pattern = strA regEx.Global = True regEx.IgnoreCase = False Set Matches = regEx.Execute(strB) For Each Match in Matches WScript.Echo Match.FirstIndex & ":'" & Match.value & "'" Next