如何定義VB.NET類

這篇文章給大家分享的是有關如何定義VB.NET類的內容。小編覺得挺實用的，因此分享給大家做個參考，一起跟隨小編過來看看吧。

一.VB.NET類定義

1.單擊“文件”菜單上的“新建項目”，創建一個項目。“新建項目”對話框隨即出現。

2.從 Visual Basic 項目模板列表中選擇“Windows 應用程序”，以顯示新項目。

3.在“項目”菜單中單擊“添加類”，將一個新類添加到項目中。出現“添加新項”對話框。

4.選擇“類”模板。

5.給新類 UserNameInfo.vb 命名，然后單擊“添加”以顯示新類的代碼。

Visual Basic 復制代碼   Public Class UserNameInfo  End Class

注意可以使用 Visual Basic“代碼編輯器”，在新類的名稱之前鍵入 Class 關鍵字，將類添加到啟動窗體中。“代碼編輯器”會提供相應的 End Class 語句。

6.在 Class 和 End Class 語句之間加入以下代碼，為類定義私有字段：

Visual Basic 復制代碼   Private userNameValue As String

將字段聲明為 Private 意味著該字段只能在該類內使用。可以通過使用提供更大訪問權限的訪問修飾符（如 Public）來使字段得以從類的外部進行訪問。有關更多信息，請參見 Visual Basic 中的訪問級別。

7.通過添加以下代碼為類定義屬性：

Visual Basic 復制代碼   Public Property UserName() As String  Get  ' Gets the property value.  Return userNameValue  End Get  Set(ByVal Value As String)  ' Sets the property value.  userNameValue = Value  End Set  End Property

8.通過添加以下代碼為類定義方法：

Visual Basic 復制代碼   Public Sub Capitalize()'   Capitalize the value of the property.  userNameValue = UCase(userNameValue)  End Sub

9.通過添加名為 Sub New 的過程為新類定義參數化的構造函數：

Visual Basic 復制代碼   Public Sub New(ByVal UserName As String)  ' Set the property value.  Me.UserName = UserName  End Sub

當創建基于此類的對象時，會自動調用 Sub New 構造函數。此構造函數設置保存用戶名的字段值。

二.創建測試類的按鈕

1.右擊“解決方案資源管理器”中啟動窗體的名稱，將啟動窗體更改為設計模式，然后單擊“視圖設計器”。默認情況下，“Windows 應用程序”項目的啟動窗體的名稱為 Form1.vb。主窗體隨即出現。

2.在主窗體中添加一個按鈕，然后雙擊該按鈕顯示 Button1_Click 事件處理程序的代碼。添加下列代碼以調用測試過程：

Visual Basic 復制代碼   ' Create an instance of the class.  Dim user As New UserNameInfo("Moore, Bobby")  ' Capitalize the value of the property.  user.Capitalize()  ' Display the value of the property.  MsgBox("The original UserName is: " & user.UserName)  ' Change the value of the property.  user.UserName = "Worden, Joe" ' Redisplay the value of the property.  MsgBox("The new UserName is: " & user.UserName)

三.VB.NET類定義運行應用程序

按 F5 運行應用程序。單擊窗體上的按鈕以調用測試過程。它會顯示一則消息，說明原來的 UserName 是“MOORE, BOBBY”，因為該過程調用了對象的 Capitalize 方法。

單擊“確定”關閉該消息框。Button1 Click 過程會更改 UserName 屬性的值，并顯示一則消息，說明 UserName 的新值為“Worden, Joe”。

感謝各位的閱讀！關于“如何定義VB.NET類”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，讓大家可以學到更多知識，如果覺得文章不錯，可以把它分享出去讓更多的人看到吧！