之前的一些文章 , 我们详细解了集合、数组和字典这三种常用的数据结构 。在本文中 , 我们简单小结一下 , 看看它们之间有哪些区别 , 以巩固所学的知识 。
【VBA教程:数组、集合和字典】存储的类型
数组
数组是一组具有相同名称的同类元素 。可用来存储多个相同类型的变量 。
集合
集合可以用来存储不同的数据类型 。
字典
字典可以用来存储不同的数据类型 。
注意 , 在数组中 , 可以存储用户定义类型 。然而 , 不能在字典或集合中存储用户定义类型 。
变量声明
数组
在声明数组变量时 , 可以指定数组的大小 , 如:
Dim MyArray(5) As Integer
也可以先不指定数组的大小:
Dim MyArray() As Integer
在使用之前 , 须指定其大小:
ReDim MyArray(5)
集合
可以先声明集合变量:
Dim col As Collection
在需要使用该集合前创建集合对象:
Set col = New Collection
也可以在声明的同时创建集合对象:
Dim col As New Collection
字典
创建字典对象 , 先要设置对库文件Microsoft Scripting Runtime的引用 。可以编写声明字典对象变量的代码如下:
Dim dict As New Dictionary
或者:
Dim dict As Dictionary
Set dict = New Dictionary
对元素赋值
1.不能对集合中已有元素重新赋值 。
2.可以修改字典元素的值 。在给指定键的字典元素赋值时 , 如果指定键的字典元素已存在 , 则会修改该元素的值 。如果指定键的字典元素不存在 , 则会添加新字典元素 。
3.集合、字典都是对象 , 在返回整个对象时 , 应使用Set语句 。
对元素的访问
数组、集合、字典的存储结构不同 , 决定了访问其元素的差异 。
数组
每个元素放置在固定的位置 , 我们需要知道其索引 , 来访问它 。例如:
Dim MyArray(5) As Integer
Dim i As Integer
For i = 0 To 5
MyArray(i) = i
Nexti
‘访问第2个元素
Debug.Print MyArray(1)
数组的索引值默认从0开始 。
集合
下面的代码先声明集合对象 , 然后在添加元素项时定义键值:
Dim col As Collection
Dim rng As Excel.Range
Dim sRangeName As String
Set col = New Collection
sRangeName= “RangeName”
Set rng = Range(sRangeName)
col.Add rng, sRangeName
此时 , 想从该集合中获取特定元素项时 , 可以指定其位置(索引值) , 或者使用键值 。如果你知道其是第一个添加到集合中的且位置没有变化 , 可以使用索引值:
col.Item(1)
集合的索引值基于1 。也可以使用键值:
col.Item(sRangeName)
集合的索引值从1开始 。
字典
字典中有唯一标识元素的键 , 我们只需要使用这个键来访问元素 , 而不需知道其具体的存放位置 。
下面的代码添加对象到字典中 , 其语法与添加元素项到集合中非常相似 , 只是键和元素参数的位置相反:
Dim dict As Scripting.Dictionary
Dim rng As Excel.Range
Dim sRangeName As String
Set dict = New Scripting.Dictionary
sRangeName= “RangeName”
Set rng = Range(sRangeName)
dict.Add sRangeName, rng
可以使用下面的语句来获取指定键所在的元素项:
dict.Item(sRangeName)
添加元素
添加元素时 , 集合与字典的参数位置刚好相反 , 例如:
推荐阅读
- 怎么使用VBA打印PDF文件?
- 标识并使用VBA代码识别特定的工作簿
- 使用VBA读写Windows注册表
- excel使用VBA获取能够打开指定文件的EXE程序
- 怎么让VBA让用户仅能在指定单元格或单元格区域中输入数字
- excel图表使用VBA创建进度条
- VBA拆分算术表达式
- vba栈结构应用基础示例
- VBA快速处理上标
- 使用VBA实现栈结构