在VB 6中，对象有一个很清楚的定义以及很容易理解的生命周期的概念，对象的生命周期是由下面的事件来定义的。

  事件描述

  Sub Main 运行时它将作为组件被装载，并且是在对象创建之前装载。

Class_Initialize 它是在对象中其它代码运行之前运行。当对象被创建的时候它被运行程序所调用。

Class_Terminate 是在对象中其它代码运行之后再运行。当对象被卸载的时候被运行程序调用。

  在VB.NET，对象也有生命周期的概念，但是已经跟以前大不一样了。特别地，我们不再有相同的组件级的Sub Main（它作为一个DLL被装载）的概念，并且Class_Terminate事件也被改变了，而Class_Initialize事件被成熟的构造函数方法所取代。值得指出的是，这个构造函数方法可以接收参数。

现在在VB.NET中，我们定义一个生命周期只需要用了一个New事件，这个New事件是在对象中其它代码之前运行的，并且在对象被创建的时候被调用。

从VB 6到VB.NET确实变化很大，下面我们具体讨论。

构造

   对象构造是在我们创建一个类新的实例的时候被触发的。具体可以使用关键字NEW来实现它。

Sub Main

  自从VB 6基于COM，创建一个对象将触发一个Sub Main过程运行。这将发生在一个对象从一个给定的组件（通常为DLL）创建来的时候。在创建对象之前，VB 6运行程序将装载DLL（动态连接库）并运行Sub Main过程。

   .NET通用语言运行程序处理组件采取不同的方法，当然VB.NET也是这样的。这就意味着没有Sub Main过程在组件装载时候被调用。实际上，Sub Main只使用在当一个应用程序开始的时候。当另外的组件被应用程序装载的时候，只有在类中的代码才被调用。

   其实在VB6中依靠Sub Main是不明智的做法，因为代码将在所有错误操作之前被运行。Sub Main中的Bugs是难以在VB6中调试。如果我们不得不使用依赖于Sub Main概念的代码来初始化，那么我们需要在VB.NET执行一个工作区。

   在每一个类中从构造函数方法中调用一个方法是很容易做到的。举个例子，我们可以在一个模块中创建一个有效的代码：

Public Module CentralCode

Private blnHasRun As Boolean

Public Sub Initialize()

If Not blnHasRun Then

blnHasRun = True

（在这里作初始化工作）

End If

End Sub

End Module

  这个程序是被设计为只运行一次，不管是怎么被调用。我们可以从类中的每一个构造函数来使用这个方法。比如 ：

Public Class TheClass

Public Sub New()

CentralCode.Initialize()

（这里加入另外的工作）

End Sub

End Class

以上的代码虽然作了一些额外的工作，它跟使用VB6类型的Sub Main程序达到同样的效果。

New方法

   就象Sub Main，Class_Initialize是在其它VB6类中的代码运行之前被调用的。此外，它是在错误处理之前被调用的，所以使得调试变得很难，而错误作为一般的错误显示在客户端来实例化对象。另外地，Class_Initialize不用参数，这意味着在VB6中没有方法可以在对象被创建的时候用数据来进行初始化。

VB.NET剔除了Class_Initialize而采用完整的构造函数方法。这个构造函数有完整的错误处理能力以及可以接收参数。所以我们可以在创建对象的时候来对它们进行初始化，这是VB.NET一个十分重要的特性。VB.NET中构造函数方法是Sub New。

Public Class TheClass

Public Sub New()

(在这里初始化对象)

End Sub

End Class

  利用这种类型的构造函数，可以如下创建类的实例：

Dim obj As New TheClass()

   这个例子类似于在Class_Initialize创建一个VB6代码。

但是，经常地，我们在创建对象的时候往往要用数据来初始化对象。我们可以从数据库中来装载一些数据，或者我们可以直接为对象提供数据。不管用什么方法，我们是想在对象被创建的时候为它提供一些数据。

为了做到这点，可以增加参数列表给New方法：

Public Class TheClass

Public Sub New(ByVal ID As Integer)

(在这里使用ID数值来初始化对象)

End Sub

End Class

   现在我们来创建类的一个实例，并且为对象提供数据，代码如下：

Dim obj As New TheClass(42)

   为了增加灵活型，我们可以接收可选的参数数值。为了实现这个，可以有两种方法：通过使用Optional关键字来声明一个可选择的参数，或者通过重载New方法。为了使用Optional关键字，我们简单地声明可选择的参数，代码如下：

Public Sub New(Optional ByVal ID As Integer = -1)

If ID = -1 Then

（这里可以初始化对象）

Else

（这里可以使用ID数值来初始化对象）

End If

End Sub

   这种方法太过于理想化了，但是，既然我们不得不检查是否参数是（不是）已经提供，然后决定怎样初始化对象。New方法又两个方法可以实现。第一种是对于每种行为类型而言的，它可以通过重载来实现：

Public Overloads Sub New()

（这里可以初始化对象）

End Sub

Public Overloads Sub New(ByVal ID As Integer)

（这里可以使用ID数值来初始化对象）

End Sub

   这种方法不仅可以避免有条件的检查以及简化了代码，而且它还使得对于客户代码对象的使用都变得更清晰。这个重载New方法可以使用参数也可以不用参数，有更大的灵活性。

实际上，通过重载，我们可以创建许多不同的构造函数，也可以利用许多种不同的方法来初始化我们的对象。

在VB.NET中构造函数方法是可选的。但是只有一个例外，那就是当我们使用继承的时候，父类就只有一个构造函数需要参数。在本教程的后面我们将讨论继承。

  对象的终止在VB6中对象是在最后引用移除后被终止的。换成另外一句话说，当没有其它代码引用这个对象的时候，这个对象将自动终止。具体触发这个终止事件的是Class_Terminate。这种方法是使用引用计数来决定对象是否被终止的，是VB的一个直接的产品，它跟COM有紧密的联系。

  所以我们在需要终止这个对象的使用就调用Class_Terminate事件，使得很容易控制对象。但是它也有不足之处。很明显地，虽然在两个对象之间创建循环引用是很容易，但是它们将在内存中永远地被运行。这正是在VB6中其中一种导致内存泄漏的缺陷。

  这个内存泄漏问题在VB6以前的版本中是无法克服的。在VB6中，循环引用只发生在不同组件上。在VB6中，由相同的组件中的类创建而来的类将被自动终止，即使它们有循环引用。但是，如果对象来自不同的组件，循环引用问题就依然存在。这个是个很大的问题，它给许多VB开发人员带来了麻烦。所以，在VB6中程序不得不寻求各种方法来终止对象。

  不象COM，.NET不是使用引用计数来决定对象是否被终止的。取而代之的是，它使用了一个有名的“垃圾收集”方案来终止对象。可能听到“垃圾收集”方案，您会云里雾里的，它的意思实际上是在VB.NET中我们不用预先定一个对象的终止方案，因此我们就不能准确地预测对象什么时候被终止的。下面我们详细探讨一下“垃圾收集”。 “垃圾收集”

  在.NET中，引用计数不是一个基础功能部分。相反地，对象是通过一个“垃圾收集”机理被终止。在某特定的时间（这决定特殊的规则），一个任务会在所有的对象中运行来查找哪些已经没有被引用的对象，并且将这些对象终止，即所谓的“垃圾收集”，名字是有点土，但更形象化。

由以上的讨论我们可以知道，我们不能很准确地知道对象是在什么时候被终止的。我们除去对象的所有引用之后，并不是意味着对象快速地被终止了。此时对象还存在于内存中，直到垃圾收集处理程序运行之后才将它从内存中清除。

  垃圾收集的主要好处是它清除了由引用计数带来的循环应用问题。如果两个对象互相有引用，并且在程序中没有其它互相引用的代码时，垃圾收集程序就会发现它们并将它们终止。这一点在COM中是不可能做到的，因为它们将在内存中永远存在。

  垃圾收集还有另外一个潜在的性能优点：在对象被取消引用的时候不用花很多的精力在终止对象上；利用了垃圾收集，这个终止处理过程是在应用程序处于空闲状态发生的，所以它减轻了对用户的影响。但是，垃圾收集也会发生在应用程序处在运行装载的时候，这时候系统将会运行在较低的系统资源下。

另外，我们可以通过编写代码来手动触发垃圾收集处理程序：

System.GC.Collect()

  以上这个处理过程要花一些时间，但是我们在想终止对象的时候也不必每次都执行这个处理过程。我们最好是这样来设计我们的应用程序：在最后终止对象的时候才将对象从内存在清除。

Finalize方法

  这个垃圾收集机理提供了一些功能，这些功能可以跟VB6中的Class_Terminate事件相媲美。当对象被终止的时候，垃圾收集处理的代码将调用Finalize方法，它就象Class_Terminate一样可以进行一些最后的内存清理工作。

Protected Overrides Sub Finalize()

（此处可以进行一些内存清理工作）

End Sub

  以上的这些代码可以使用Protected（保护）作用域也可以使用重载关键字。这里值得指出的是，这种方法是在对象被垃圾收集机理终止之前被调用的，所以它跟Class_Terminate很是相似。

但是，我们还需要记得这种方法可以在对象被取消引用后被调用，它是通过最后一段客户代码来实现的。

实现Dispose方法

  在有些场合中Finalize方法是不可接收的。如果我们有一个对象，它是使用一些非常有限的宝贵的系统资源，比如数据库连接、文件处理或者系统锁住等等。这时候我们就需要确保系统资源在对象被取消引用的时候是否被释放。

  为了实现这个目的，我们可以执行这样一个方法，它可以被客户代码调用来强迫对象被清除并且释放系统资源。虽然这不是一个很好的解决方案，但是它确实是很有效的。习惯上，这个方法就取名为Dispose，其代码如下：

Public Sub Dispose()

（此处可以进行一些清除工作）

End Sub

  在必要的时候，我们可以调用这个方法来确保内存清除工作的进行。

  从上面的讨论中，我们可以深刻地体会倒VB6和VB.NET在创建类和对象的一些变化。下一个教程我们将详细讨论一下对象的继承。