VB之Collction--介绍+加入自定义+提高效率-----.docVIP

VB之Collection---Collection集合 集合是方法将一系列相关的项构成组的一种方法。Visual Basic 中集合可用于跟踪很多事情，例如程序中加载的窗体（窗体集合），或者在窗体中的所有控件（控件集合）。 Visual Basic 提供的类属 Collection 类可用来定义自己的集合。需要多少集合对象，就可以建立多少 Collection 对象－ 即 Collection 类的实例。还可使用集合对象作为自己的集合类和对象模型的基础，它将在本章后面的“创建自己的集合类”和“对象模型”中讨论。 例如，集合是跟踪多窗体的最好方法。在“创建用户界面”中的“多文档界面 (MDI) 应用程序”里讨论用户可以打开任何数目文档窗口的应用程序。以下代码段演示如何使用集合对象的 Add 方法，对用户建立的 MDI 子窗体列表进行管理。该代码假定已经存在一个名为 mdiDocument 的窗体，其 MDIChild 属性设置为 True。 父 MDIForm 中的模块级集合。 Public colDocuments As New Collection 建立新的 MDI 子文档窗体的代码。 Private Sub mnuFileNew() Dim f As New mdiDocument Static intDocumentNumber As Integer intDocumentNumber = intDocumentNumber 1 下面的语句创建窗体。 f.Caption = Document intDocumentNumber 给集合添加对象引用。 colDocuments.Add f f.Show End Sub colDocuments 的作用象是内置窗体集合的一个子集，它只包含窗体 mdiDocument 的一些实例。每添加一个新窗体，自动调节集合的大小。可使用 For Each ... Next 在集合内进行迭代。如果赋予窗体一个可以检索的键，那么可提供一文本字符串作为 Add 方法的第二个参数，如本节后面部分所述。 在变量 colDocuments 的声明中，New 关键字导致当该变量第一次被引用时，在代码中创建集合对象。因为集合是类，而不是数据类型，所以必须建立集合实例，并且在变量中记录对该实例（对象）的引用。 象其它任何对象一样，当包含其引用的最后一个变量被设置成 Nothing 或不可见时，Collection 对象将被撤消。它包含的所有对象引用将被释放。因此，变量 colDocuments 在父 MDIForm 中声明，于是它将存在于程序存活期中的整个过程。 注意 如果使用集合来跟踪窗体，当窗体被卸载之后，应使用集合的 Remove 方法从集合中删除该对象引用。只要对该窗体的引用仍然存在，就不能收回窗体使用的内存，并且 Collection 对象保存的引用象对象变量中的引用一样完好。 集合对象的构成 Collection 对象将每一项存储于 Variants 对象中。于是，能够添加到 Collection 对象里的内容列表就和能够存储到 Variants 中的内容列表是相同的。这包括标准数据类型、对象和数组－但不包括用户定义类型。 不管 Variants 中存储的是什么，它都占 16 字节，因此使用 Collection 对象不如使用数组的效率高。然而，不能 ReDim 一个 Collection 对象，ReDim Collection 对象能够使代码更清楚、更容易维护。此外，集合对象按键能进行快速的查找，而数组却不能。 注意 准确一点说，即使是把数据存储在其它地方，Variants 也总是只占 16 个字节。例如，如果把字符串或数组赋给 Variants，Variants 将包含一个指向字符串和数组数据备份的指针。在 32 位系统中，指针只使用了 Variants 的 4 个字节，而且 Variants 中实际上不存在数据。 若要存储一个对象，Variants 将包含该对象引用，就象对象变量所做的一样。对字符串和数组来说，也只使用 Variants 的 4 个字节。 数字数据类型存储在 Variants 中。不管什么样的数据类型，Variants 仍然占 16 个字节。 除了 Variants 大小之外，还有很多情况需要使用 Collection 对象来存储上面列出的所有数据类型。应该知道进行权衡：使用 Collection 对象能够编写清楚且容易维护的代码－ 所花费的仅是将一些项存储在 Variant 中。 集合对象的属性和方法 每个集合对象都有属性和方法，使用它们能够插入、删除和检索该集合中的项。 属性或方法 描述 Add 方法 给集合添加项。 Count 属性 返回集合中项的数目。只读。 I