# Count 属性

object.Count

返回一个集合或 Dictionary 对象包含的项目数。只读。

参数 描述
object 必选项。是“应用于”列表中列出的任何集合或对象的名称。

说明 以下代码举例说明如何使用 Count 属性:

Function ShowKeys
  Dim a, d, i, s          ' 创建一些变量。
  Set d = CreateObject("Scripting.Dictionary")
  d.Add "a", "Athens"     ' 添加一些键和项目。
  d.Add "b", "Belgrade"
  d.Add "c", "Cairo"
  a = d.Keys              ' 获取键。
  For i = 0 To d.Count -1 '重复数组。
    s = s & a(i) & "<BR>" '创建返回字符串。
  Next
  ShowKeys = s
End Function
1
2
3
4
5
6
7
8
9
10
11
12
应用于