金字塔学院

# 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"))
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
应用于