Value 属性返回在一个搜索字符串中找到的匹配的值或文本 。 object.Value
object 参数总是一个 Match 对象 。 说明下列代码说明了 Value 属性的用法: 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 遍历Matches 集合 。 RetStr = RetStr & "Match " & I & " 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"))
|