【VBA编程】10.自定义集合

自定义集合类型，类似于变量声明，只是要将Dim关键字和New collection关键字搭配起来使用，其语法描述如下：其中集合名的命名方式同于标准变量的命名

Dim 集合名 As New collection

对于已经定义的集合对象，可以使用集合的Add方法向集合中添加元素，语法如下：

集合名.add item[,key] [,before] [,after]

item：是一个必要的参数，表示将要添加到集合的对象名称

Key: 是一个可选参数，表示该对象在集合中以关键字表示，以供访问结合元素时，能够按照关键字访问

before:表示位于一个对象之前，其值为集合中某一对象的索引号

after:表示位于一个对象之后，其值为集合中某一对象的索引号

【环境准备】

首先插入“类模块”

 

修改“类模块”名称

双击修改后的“类模块”名称，并在代码窗口写下如下代码：

然后，新建插入“模块”

【代码区域】

Sub 自定义集合()
 Dim zdyjh As New Collection '自定义一个集合
 Dim obj As classname '定义一个对象
 Dim num As Integer '定义一个计数器
 Set obj = New classname '对一个变量赋值
 obj.name = "杨过" '为对象的属性赋值
 zdyjh.Add Item:=obj, Key:=