excelvba常见字典用法集锦及代码详解(全)
ExcelVBA——字典实用技巧
ExcelVBA——字典实⽤技巧
最近写了⼀些⼩功能，对字典有了进⼀步的理解，太强⼤了！
个⼈最近⽤过的字典应⽤有这么⼏个，写下来防⽌⾃⼰忘~同时⽅便⼤家
⼀、查找重复⾏
【原理】利⽤字典的exist⽅法，将数据加⼊字典时判断⼀下，如果已经存在，就说明当前数据为重复数据，应该删除
【⽰例代码】
Sub chongfu() '查重
Dim i As Long
Dim endline As Long'定义⼯作表长度变量
endline = Sheet3.Range("A30000").End(xlUp).Row '获取⼯作表Sheet3有数据的最后⼀⾏⾏号
Set d = CreateObject("scripting.dictionary") '设定字典d
For i = endline To2Step -1'从最后⼀⾏开始，依次把各个字段拼接到⼀起（注意，这⾥我的需求是这⼏个字段拼在⼀起的字符串不允许重复，因此我先拼接再判重）'把所有字符串拼接到数组⾥
If Sheet3.Cells(i, 2) <> ""Then'判断该⾏是否为空
If IsError(Sheet3.Cells(i, 2)) = False Then'如果关键单元格不是#N/A，则进⼊字典设置
x = Sheet3.Cells(i, 2) '******************设置赋给字典的变量,即需要去重的单元格！*******************
If Not d.Exists(x) Then'判断是否重复
d(x) = x '如果不重复，则把x定为item
VBA字典用法集锦及案例代码详解
VBA字典用法集锦及案例代码详解
VBA中的字典是一种集合数据类型，它可以用来存储键值对。字典中的键是唯一的，而值可以重复。通过键可以快速查找和访问对应的值。
以下是一些常见的VBA字典用法和案例代码的详解：
1.创建字典
可以使用Dictionary对象来创建一个新的字典对象。例如：
```vba
Dim dict As Object
Set dict = CreateObject("Scripting.Dictionary")
```
2.添加键值对
使用Add方法可以向字典中添加键值对。例如：
```vba
dict.Add "Key1", "Value1"
dict.Add "Key2", "Value2"
```
3.访问值
可以使用键来访问字典中的对应的值。例如：
```vba
Dim value As String
value = dict("Key1")
```
4.更新值
使用键来更新字典中的值。例如：
```vba
dict("Key1") = "NewValue"
```
5.删除键值对
可以使用Remove方法来删除字典中的键值对。例如：```vba
dict.Remove "Key1"
```
6.遍历字典
可以使用For Each循环来遍历字典中的键值对。例如：```vba
Dim key As Variant
Dim value As Variant
For Each key In dict.Keys
value = dict(key)
'执行其他操作
Next key
```
7.检查键是否存在
可以使用Exists方法来检查字典中是否包含指定的键。例如：```vba
vba中字典的经典用法
vba中字典的经典用法
字典是VBA中非常常用的数据结构，它可以用于存储和处理键值对数据。
以下是VBA中字典的一些经典用法：
1. 添加键值对：
使用Add方法可以向字典中添加一个键值对：
```
Dim dict As Object
Set dict = CreateObject("Scripting.Dictionary")
dict.Add "key1", "value1"
dict.Add "key2", "value2"
```
2. 访问值：
通过键可以直接访问对应的值：
```
Dim value As String
value = dict("key1")
```
3. 更新值：
通过键可以更新对应的值：
```
dict("key1") = "new value1"
```
4. 删除键值对：
使用Remove方法可以删除字典中的键值对：
```
dict.Remove "key1"
```
5. 遍历字典：
可以使用For Each循环来遍历字典中的所有键值对：```
Dim key As Variant
For Each key In dict.Keys
MsgBox key & ": " & dict(key)
Next key
```
6. 判断键是否存在：
可以使用Exists方法来判断某个键是否存在于字典中：```
If dict.Exists("key1") Then
MsgBox "Key1 exists"
Else
MsgBox "Key1 does not exist"
End If
```
7. 获取字典的大小：
使用Count属性可以获取字典中键值对的数量：
VBA中，字典（Dictionary）应用的实例讲解
VBA中，字典（Dictionary）应⽤的实例讲解
⼤家好，我们今⽇继续讲解VBA代码解决⽅案的第126讲内容：在VBA中字典的应⽤。也许许多的朋友对此⽐较陌⽣，在有的语⾔⾥字典也称之为MAP,应⽤也是⽐较⼴泛的。
字典，其实就是⼀些“键－值”对。使⽤起来⾮常⽅便，有类似于微型数据库的作⽤，可⽤于临时保存⼀些数据信息。
⼀ VBA中创建字典：⽤的是WSH引⽤。
Dim myd As Object
Set myd = CreateObject("Scripting.Dictionary")
⼆字典的⽅法，有Add、Exists、Keys、Items、Remove、RemoveAll，六个⽅法。
① Add ⽤于添加内容到字典中。如myd.Add key, item 第⼀个参数为键，第⼆个参数为键对应的值
② Exists⽤于判断指定的关键词是否存在于字典（的键）中。如myd.Exists(key)。如果存在，返回True，否则返回False。通常会在向字典中添加条⽬的时候使⽤，即先判断字典中是否已存在这个记录，如果不存在则新增，否则进⾏其它的操作。
③ Keys获取字典所有的键，返回类型是数组。如myd.Keys()
④ Items获取字典所有的值，返回类型是数组。如myd.Items()
⑤ Remove从字典中移除⼀个条⽬，是通过键来指定的。myd.Remove(key)如果指定的键不存在，会发⽣错误。
⑥ RemoveAll 清空字典。
三字典的属性有Count、Key、Item、ConpareMode四种属性
excel vba 字典用法
excel vba 字典用法
ExcelVBA字典是一种高效的数据结构，可以用来存储和访问大量的数据。字典是由键和值组成的一对一关系的集合。每个键对应一个值，通过键可以快速地查找对应的值。
在 Excel VBA 中，字典可以通过创建 Dictionary 对象来实现。下面是一个简单的例子：
```
Dim dict As New Dictionary
```
创建了一个名为 dict 的字典对象，可以使用 Add 方法向其中添加键值对：
```
dict.Add 'apple', 1
dict.Add 'banana', 2
dict.Add 'orange', 3
```
在字典中查找值可以使用 Item 方法：
```
Debug.Print dict.Item('apple') '输出 1
```
字典还提供了一些其他的方法：
- Count 方法可以返回字典中键值对的数量。
- Exists 方法可以判断字典中是否存在某个键。
- Remove 方法可以删除字典中的某个键值对。
可以使用 For Each 循环遍历字典中的所有键值对：
```
For Each key In dict.Keys
Debug.Print key & ' - ' & dict.Item(key)
Next key
```
字典是一个非常有用的工具，尤其是当需要处理大量的数据时。在 Excel VBA 中使用字典可以大大提高代码的效率和可读性。
EXCEL VBA 常见字典用法集锦及代码详解(全)之欧阳化创编
常见字典用法集锦及
代码详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们
也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows 脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对
象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
vba中字典用法
vba中字典用法
字典是一种用于存储键值对的数据结构，在VBA中经常被用来解
决需要快速查找和访问数据的问题。本文将介绍VBA中字典的用法，
包括字典的创建、添加、删除和查找等操作。
一、字典的创建
要使用字典，首先需要声明和初始化一个字典变量。可以使用“Dim”语句声明一个字典变量，并使用“CreateObject”函数初始化它，示例代码如下：
Dim dict As Object
Set dict = CreateObject("Scripting.Dictionary")
二、字典的添加
字典的添加操作指的是向字典中添加键值对。使用“Add”方法可
以向字典中添加一个键值对，示例代码如下：
dict.Add "key1", "value1"
在字典中，键必须是唯一的，如果添加重复的键，会触发错误。
可以使用“Exists”方法检查键是否已存在于字典中，示例代码如下：If Not dict.Exists("key1") Then
dict.Add "key1", "value1"
三、字典的删除
字典的删除操作指的是从字典中删除一个键值对。可以使用“Remove”方法将指定的键值对从字典中移除，示例代码如下：
dict.Remove "key1"
如果要清空整个字典，可以使用“RemoveAll”方法，示例代码如下：
dict.RemoveAll
四、字典的查找
字典的查找操作指的是根据键查找对应的值。可以使用“Item”
方法获取指定键的值，示例代码如下：
Dim value As Variant
value = dict("key1")
VBA字典用法集锦及代码详解
VBA字典用法集锦及代码详解
常见字典用法集锦及代码详解
蓝桥玄霜
常见字典用法集锦及代码详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过
northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触
到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件
的（FileSystemObject ）对象也是微软Windows脚本语言中的一份子。
vba 字典 用法
VBA中的字典（Dictionary）是一种特殊的对象，用于存储键值对（Key-Value Pair）。使用字典可以很方便地存储、查询和管理数据。
下面是一些VBA字典的基本用法：
创建字典对象
vba
Dim myDict As Object
Set myDict = CreateObject("Scripting.Dictionary")
向字典中添加键值对
vba
myDict.Add "key1", "value1"
myDict.Add "key2", "value2"
获取字典中的值
vba
Dim value As Variant
value = myDict("key1")
判断键是否存在
vba
If myDict.Exists("key1") Then
' do something
End If
删除字典中的键值对
vba
myDict.Remove "key1"
清空字典中的所有键值对
vba
myDict.RemoveAll()
除了以上基本用法，VBA字典还有很多高级用法，比如遍历字典中的所有键值对、合并多个字典等。可以根据实际需求使用相应的语法和方法来实现。
EXCEL VBA 常见字典用法集锦及代码详解(全)
常见字典用法集锦及代码详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
VBA字典用法集锦及代码详解
常见字典用法集锦及代码详解
TongDog工作室
常见字典用法集锦及代码详解
2 前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH 论坛的想学习VBA 里面字典用法的，几乎都看过研究过northwolves 狼版主、oobird 版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary ）对象是微软Windows 脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp ）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject ）对象也是微软Windows 脚本语言中的一份子。
VBA字典用法集锦及代码详解
常见字典用法集锦及代码详解
常见字典用法集锦及代码详解
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
“典”字就是具有唯一性的关键字，后面的解释就是它的项，和“典”字联合组成一对数据。
常用关键字英汉对照：
Dictionary 字典
Key 关键字
Item 项，或者译为条目
字典对象的方法有6个：Add方法、Keys方法、Items方法、Exists方法、Remove方法、RemoveAll方法。
Add方法
向Dictionary 对象中添加一个关键字项目对。
object.Add (key, item)
参数
object
必选项。总是一个Dictionary 对象的名称。
key
必选项。与被添加的item 相关联的key。
item
必选项。与被添加的key 相关联的item。
说明
如果key 已经存在，那么将导致一个错误。
2
字典的简介
常用语句：
Dim d
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens"
d.Add "b", "Belgrade"
excel vba字典用法
在Excel VBA中，可以使用字典对象（Dictionary Object）来存储和操作键值对。以下是一些使用Excel VBA字典的基本用法：
1. 创建字典对象
```vba
Dim myDictionary As Object
Set myDictionary = CreateObject("Scripting.Dictionary")
```
2. 添加键值对
```vba
myDictionary.Add Key:= "Key1", Item:= "Value1"
myDictionary.Add Key:= "Key2", Item:= "Value2"
```
3. 获取键对应的值
```vba
Dim value As Variant
value = myDictionary.Item("Key1")
```
4. 遍历字典中的所有键值对
```vba
Dim key As Variant
Dim value As Variant
For Each key In myDictionary.Keys value = myDictionary.Item(key)
' Do something with key and value Next key
```
5. 删除字典中的键值对
```vba
myDictionary.Remove "Key1"
```
6. 检查键是否存在于字典中
```vba
If myDictionary.Exists("Key1") Then
' Do something if the key exists
（完整版）VBA字典用法集锦及案例代码详解
（完整版）VBA字典⽤法集锦及案例代码详解
VBA字典⽤法集锦及案例代码详解
dada
VBA字典⽤法集锦及案例代码详解
前⾔
凡是上过学校的⼈都使⽤过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的⼯具书。有了它们，我们可以很⽅便的通过查找某个关键字，进⽽查到这个关键字的种种解释，⾮常快捷实⽤。
凡是上过EH论坛的想学习VBA⾥⾯字典⽤法的，⼏乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这⾥接触到和学习到字典的，在此，对他们表⽰深深的谢意，同时也对很多把字典⽤得出神⼊化的⾼⼿们致敬，从他们那⾥我们也学到了很多，也得到了提⾼。
字典对象只有4个属性和6个⽅法，相对其它的对象要简洁得多，⽽且容易理解使⽤⽅便，功能强⼤，运⾏速度⾮常快，效率极⾼。深受⼤家的喜爱。
本⽂希望通过对⼀些字典应⽤的典型实例的代码的详细解释来给初次接触字典和想要进⼀步了解字典⽤法的朋友提供⼀点备查的参考资料，希望⼤家能喜欢。
给代码注释估计是⼤家都怕做的，因为往往是出⼒不讨好的，稍不留神或者⾃⼰确实理解得不对，还会贻误他⼈。所以下⾯的这些注释如果有不对或者不妥当的地⽅，请⼤家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语⾔中的⼀个很有⽤的对象。
附带提⼀下，有名的正则表达式（RegExp）对象和能⽅便处理驱动器、⽂件夹和⽂件的（FileSystemObject）对象也是微软Windows脚本语⾔中的⼀份⼦。
EXCEL VBA 常见字典用法集锦及代码详解(全)之欧阳科创编
常见字典用法集锦及代码
详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象
要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
(完整版)VBA字典用法集锦及案例代码详解
VBA字典用法集锦及案例代码详解
dada
VBA字典用法集锦及案例代码详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
常见字典用法集锦及代码详解
前言
凡是上过学校的人都使用过字典，从新华字典、成语词典，到英汉字典以及各种各样数不胜数的专业字典，字典是上学必备的、经常查阅的工具书。有了它们，我们可以很方便的通过查找某个关键字，进而查到这个关键字的种种解释，非常快捷实用。
凡是上过EH论坛的想学习VBA里面字典用法的，几乎都看过研究过northwolves狼版主、oobird版主的有关字典的精华贴和经典代码。我也是从这里接触到和学习到字典的，在此，对他们表示深深的谢意，同时也对很多把字典用得出神入化的高手们致敬，从他们那里我们也学到了很多，也得到了提高。
字典对象只有4个属性和6个方法，相对其它的对象要简洁得多，而且容易理解使用方便，功能强大，运行速度非常快，效率极高。深受大家的喜爱。
本文希望通过对一些字典应用的典型实例的代码的详细解释来
给初次接触字典和想要进一步了解字典用法的朋友提供一点备查的参考资料，希望大家能喜欢。
给代码注释估计是大家都怕做的，因为往往是出力不讨好的，稍不留神或者自己确实理解得不对，还会贻误他人。所以下面的这些注释如果有不对或者不妥当的地方，请大家跟帖时指正批评，及时改正。
字典的简介
字典（Dictionary）对象是微软Windows脚本语言中的一个很有用的对象。
附带提一下，有名的正则表达式（RegExp）对象和能方便处理驱动器、文件夹和文件的（FileSystemObject）对象也是微软Windows脚本语言中的一份子。
字典对象相当于一种联合数组，它是由具有唯一性的关键字（Key）和它的项（Item）联合组成。就好像一本字典书一样，是
由很多生字和对它们对应的注解所组成。比如字典的“典”字的解释是这样的：
“典”字就是具有唯一性的关键字，后面的解释就是它的项，和“典”字联合组成一对数据。
常用关键字英汉对照：
Dictionary 字典
Key 关键字
Item 项，或者译为条目
字典对象的方法有6个：Add方法、Keys方法、Items方
法、Exists方法、Remove方法、RemoveAll方法。
Add方法
向 Dictionary 对象中添加一个关键字项目对。
(key, item)
参数
object
必选项。总是一个 Dictionary 对象的名称。
key
必选项。与被添加的 item 相关联的 key。
item
必选项。与被添加的 key 相关联的 item。
说明
如果 key 已经存在，那么将导致一个错误。
常用语句：
Dim d
Set d = CreateObject("")
"a", "Athens"
"b", "Belgrade"
"c", "Cairo"
代码详解
1、Dim d ：创建变量，也称为声明变量。变量d声明为可变型数据类型(Variant)，d后面没有写数据类型，默认就是可变型数据类型(Variant)。也有写成Dim d As Object的，声明为对象。
2、Set d = CreateObject("")：创建字典对象，并把字典对象赋给变量d。这是最常用的一句代码。所谓的“后期绑定”。用了这句代码就不用先引用c:\windows\system32\了。
3、"a", "Athens"：添加一关键字”a”和对应于它的项”Athens”。
4、 "b", “Belgrade”：添加一关键字”b”和对应于它的项”Belgrade”。
5、 "c", “Cairo”：添加一关键字”c”和对应于它的项”Cairo”。
Exists方法
如果Dictionary 对象中存在所指定的关键字则返回true，否则返回 false。
(key)
参数
object
必选项。总是一个 Dictionary 对象的名称。
key
必选项。需要在 Dictionary 对象中搜索的 key 值。
常用语句：
Dim d, msg$
Set d = CreateObject("")
"a", "Athens"
"b", "Belgrade"
"c", "Cairo"
If ("c") Then
msg = "指定的关键字已经存在。"
Else
msg = "指定的关键字不存在。"
End If
代码详解
1、Dim d, msg$ ：声明变量，d见前例；msg$ 声明为字符串数据类型(String)，一般写法为Dim msg As String。String
的类型声明字符为美元号 ($)。
2、If ("c") Then：如果字典中存在关键字”c”，那么执行下面的语句。
3、msg = "指定的关键字已经存在。" ：把"指定的关键字已经存在。"字符串赋给变量msg。
4、Else ：否则执行下面的语句。
5、msg = "指定的关键字不存在。" ：把"指定的关键字不存在。"字符串赋给变量msg。
6、End If ：结束If …Else…Endif判断。
Keys方法
返回一个数组，其中包含了一个 Dictionary 对象中的全部现有的关键字。
( )
其中 object 总是一个 Dictionary 对象的名称。常用语句：
Dim d, k
Set d = CreateObject("")
"a", "Athens"
"b", "Belgrade"
"c", "Cairo"
k=
[B1].Resize,1)=(k)