请参阅                    应用于

描述

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

语法

object.Count

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