5. RegExp对象
RegExp是正则表达式对象,提供简单的正则表达式支持功能。主要属性有Global、IgnoreCase、Pattern,主要方法有Execute、Replace、Test,其属性及方法的详细说明详见参考文档。下面的示例说明了RegExp对象的用法:
?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
Function RegExpTest(patrn, strng) Dim regEx, match, matches '建立变量。 Set regEx = New RegExp '建立正则表达式。 regEx.Pattern = patrn '设置模式。 regEx.IgnoreCase = True '设置是否区分字符大小写。 regEx.Global = True '设置全局可用性。 Set matches = regEx.Execute(strng) '执行搜索。 For Each match in matches '遍历匹配集合。 retStr = retStr & "Match found at position " retStr = retStr & match.FirstIndex & ". Match Value is '" retStr = retStr & match.Value & "'." & vbCRLF Next RegExpTest = retStr End Function MsgBox(RegExpTest( "is." , "IS1 is2 IS3 is4" )) |