快速掌握 VBScript 中的字典50

字典在 VBScript 中是一种强大的数据结构，用于存储键值对。它允许开发者以高效的方式组织和检索数据，特别是在处理表格数据或查找表时非常有用。

创建字典

要创建字典，请使用 CreateObject("") 函数。这将创建一个空字典对象。以下代码创建一个名为 "myDictionary" 的字典：
Dim myDictionary
Set myDictionary = CreateObject("")

添加键值对

要向字典中添加键值对，请使用 Add 方法。键可以是任何数据类型，而值可以是任何类型的值。以下代码向 "myDictionary" 字典中添加键 "name"，值 "John":
"name", "John"

检索值

要从字典中检索值，请使用 Item 方法。该方法接受一个键作为参数并返回与该键关联的值。以下代码从 "myDictionary" 字典中检索 "name" 键的值：
name = ("name")

检查键是否存在

要检查给定的键是否存在于字典中，请使用 Exists 方法。该方法接受一个键作为参数并返回一个布尔值，表示该键是否存在。以下代码检查 "age" 键是否存在于 "myDictionary" 字典中：
keyExists = ("age")

删除键值对

要从字典中删除键值对，请使用 Remove 方法。该方法接受一个键作为参数并删除与该键关联的值。以下代码从 "myDictionary" 字典中删除 "name" 键值对：
"name"

枚举字典

要枚举字典中的键值对，请使用 Keys() 和 Items() 集合。Keys() 集合返回一个包含字典中所有键的数组，而 Items() 集合返回一个包含字典中所有值的数组。以下代码枚举 "myDictionary" 字典中的键值对：
For i = 0 To UBound(())
key = (i)
value = (i)
"Key: " & key & ", Value: " & value
Next

其他方法

字典还提供其他方法，包括：
Clear：删除字典中的所有键值对。
Count：返回字典中的键值对数量。
ContainsKey：检查给定的键是否存在于字典中。
ContainsValue：检查给定的值是否存在于字典中。

示例

以下示例演示了如何使用 VBScript 中的字典：
Dim myDictionary
Set myDictionary = CreateObject("")
"name", "John"
"age", 30
"city", "New York"

name = ("name")
age = ("age")
city = ("city")
"Name: " & name
"Age: " & age
"City: " & city

输出：

Name: John
Age: 30
City: New York