Count 属性

返回一个集合或 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 = sEnd Function

VBS教程：属性-Count 属性

原文：http://www.jb51.net/article/4439.htm