Length 属性返回在字符串搜索中找到的匹配的长度 。 object.Length
object 参数总是一个 Match 对象 。 说明下面的代码说明了 Length 属性的用法: 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 & " 匹配 " & I & " 位于 " RetStr = RetStr & Match.FirstIndex & " 。匹配的长度为" RetStr = RetStr & Match.Length RetStr = RetStr & " 个字符 。" & vbCRLF Next RegExpTest = RetStr End Function MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))
|