正则表达式(RegExp)对象

提供简单的正则表达式支持功能。

说明

下面的代码说明了RegExp对象的用法:

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 =RetStrEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))

属性

Global 属性 | IgnoreCase 属性 | Pattern 属性

方法

Execute 方法 | Replace 方法 | Test 方法

要求

版本 5

请参阅

Match 对象 | Matches 集合

返回首页