VBS中正则表达式的使用格式

Set FindItemRegEx=New RegExp 
FindItemRegEx.Pattern="yourPattern"
FindItemRegEx.Global = True
FindItemRegEx.IgnoreCase = True
Set Matches = FindItemRegEx.Execute(yourString)  
If Matches.Count<>0 Then
    For each Match in Matches
             ...
    Next
End If