一、 以下是代码的详细注释:
Dim d '定义变量d
Set d = CreateObject("Scripting.Dictionary") '创建 Scripting.Dictionary 对象实例
d.Add "a", "Athens" '调用 Scripting.Dictionary 对象的方法,添加一些关键字和项目
、
二、以下是相关的知识:
1. Scripting.Dictionary 对象
这个对象的用途是:用于存储数据键和项目对。
说明:
Dictionary 对象等价于 PERL 联合数组。项目可以是数据的任何形式,并存储在数组中。每个项目都与一个具有唯一性的键相联。该键用于取得单个项目,并且通常是整数或字符串,但也可以是除数组以外的任何类型。
2. Add 方法
用途:向 Dictionary 对象中添加一个关键字项目对。
语法:object.Add (key, item)
参数:
object 必选项。总是一个 Dictionary 对象的名称。
key 必选项。与被添加的 item 相关联的 key。
item 必选项。与被添加的 key 相关联的 item。
说明: 如果 key 已经存在,那么将导致一个错误。
创建一个字典对象