VB.NET對象的示例分析

這篇文章主要介紹了VB.NET對象的示例分析，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

對象的生命周期

在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確實變化很大，下面我們具體討論。

構造

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對象被創建的時候用數據來進行初始化。

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代碼。

但是，經常地，我們在創建VB.NET對象的時候往往要用數據來初始化對象。我們可以從數據庫中來裝載一些數據，或者我們可以直接為對象提供數據。不管用什么方法，我們是想在對象被創建的時候為它提供一些數據。

為了做到這點，可以增加參數列表給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  

這種方法不僅可以避免有條件的檢查以及簡化了代碼，而且它還使得對于客戶代碼VB.NET對象的使用都變得更清晰。這個重載New方法可以使用參數也可以不用參數，有更大的靈活性。
實際上，通過重載，我們可以創建許多不同的構造函數，也可以利用許多種不同的方法來初始化我們的VB.NET對象。

感謝你能夠認真閱讀完這篇文章，希望小編分享的“VB.NET對象的示例分析”這篇文章對大家有幫助，同時也希望大家多多支持億速云，關注億速云行業資訊頻道，更多相關知識等著你來學習!