1. 数组

多个变量的集合，有序的，通过索引建立顺序，访问各值。
数据类型必须相同。

1.1 静态数组

长度固定不可变

Dim 数组名(a to b) as 数据类型
e.g.
Dim MyArray1(10) As String
Dim MyArray2(10 to 20) As String

a和b均为数字，表示数据的索引起始于a，到b为止。也可以只写一个数字表示长度，则此时使用默认索引，从0开始。

1.2 动态数组

如果在定义时并不知道需要使用的数组的长度是多少，则可以定义它为动态数组，只需要在括号里面留空就行了。待确定了数组的长度之后，可以使用ReDim来重新定义数组。

Dim Myarr3() As String

1.3 数组的赋值与取值

虽然都是通过索引来对数组进行赋值，但与其它主流的编程语言不同的是，VBA中不是使用中括号[]而是使用小括号()进行的。

Dim arr(5) As String
For i = 1 to 5
     arr(i) = i       -----赋值
Next
Debug.Print arr(1)    -----取值

1.4 多维数组

定义一个四行五列的二维数组如下：

Dim Myarr(4, 5) as String

2 字典

“键－值”，有类似于微型数据库的作用，可用于临时保存一些数据信息。

2.1 创建字典

Dim d As Object
Set d = CreateObject("Scripting.Dictionary")

2.2 字典的方法

字典有6个方法，分别是Add、Exists、Keys、Items、Remove、RemoveAll。

• Add: 用于添加内容到字典中。
  d.Add key, item

• Exists: 用于判断指定的关键词是否存在于字典（的键）中。
  d.Exists(key)
  如果存在，返回True，否则返回False。通常会在向字典中添加条目的时候使用，即先判断字典中是否已存在这个记录，如果不存在则新增，否则进行其它的操作。

• Keys: 获取字典所有的键，返回类型是数组。
  d.Keys()

• Items: 获取字典所有的值，返回类型是数组。
  d.Items()

• Remove: 从字典中移除一个条目，是通过键来指定的。如果指定的键不存在，会发生错误。
  d.Remove(key)

• RemoveAll清空字典。

2.3 字典的属性

字典有4个属性：Count、Key、Item、ConpareMode

• Count: 用于统计字典中键－值对的数量。
  d.Count

• Key: 用于更改字典中已有的键。如果指定的键不存在，则会产生错误。如：
  d.Key("apple") = "Orange"

• Item: 用于写入或读取字典中指定键的值，如果指定的键不存在，则会新增。
  读取：Debug.Print d.Item("apple")
  写入：d.Item("apple") = 10

• CompareMode：用于设置或者读取字典对象中比较字符串时的比较模式。