请参阅                   应用于

描述

返回一数组，其中包含有 Dictionary 对象的所有现存键。

语法

object.Keys

object 应为 Dictionary 对象的名称。

说明

下列代码举例说明如何使用 Keys 方法：

 Function DicDemo 
Dim a,d,i             '创建一些变量
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
  DicDemo = s
End Function