逐步解說：定義類別 (Visual Basic)

發行項
05/22/2023

這份逐步解說文件示範如何定義類別，以便您用來建立物件。內容也會說明如何將屬性和方法新增至新類別，並示範如何初始化物件。

注意

在下列指示的某些 Visual Studio 使用者介面項目中，您的電腦可能會顯示不同的名稱或位置：您所擁有的 Visual Studio 版本以及使用的設定會決定這些項目。如需詳細資訊，請參閱將 Visual Studio IDE 個人化。

若要定義類別

按一下 [檔案] 功能表的 [新增專案] 來建立專案。 [新增專案] 對話方塊隨即出現。
從 Visual Basic 專案範本清單中選取 [Windows 應用程式]，以顯示新專案。
按一下 [專案] 功能表的 [新增類別]，將新類別新增至專案。 [加入新項目] 對話方塊隨即出現。
選取 [類別] 範本。
將新類別命名為 UserNameInfo.vb，然後按一下 [新增] 即可顯示新類別的程式碼。
```
Public Class UserNameInfo
End Class
```
注意

您可以使用 Visual Basic 的「程式碼編輯器」輸入 Class 關鍵字，後面接著新類別的名稱，藉此將類別新增至啟動表單。「程式碼編輯器」會提供對應的 End Class 陳述式。
在 Class 和 End Class 陳述式之間新增下列程式碼，藉此定義類別的私人欄位：
```
Private userNameValue As String
```
將欄位宣告為 Private，代表它只能使用在類別當中。您可以使用存取修飾詞 (例如 Public) 來提供更多存取權，藉此讓類別外部也能使用欄位。如需詳細資訊，請參閱 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

新增下列程式碼可定義類別的方法：

Public Sub Capitalize()
    ' Capitalize the value of the property.
    userNameValue = UCase(userNameValue)
End Sub

新增名為 Sub New 的程序，可為新類別定義參數化的建構函式：
```
Public Sub New(ByVal UserName As String)
    ' Set the property value.
    Me.UserName = UserName
End Sub
```
建立以這個類別為基礎的物件時，系統就會自動呼叫 Sub New 建構函式。這個建構函式會設定欄位值來保留使用者名稱。

若要建立按鈕來測試類別

在 [方案總管] 以滑鼠右鍵按一下啟動表單的名稱，然後按一下 [檢視表設計工具]，即可將啟動表單變更為設計模式。根據預設，Windows 應用程式專案的啟動表單名為 Form1.vb。主要表單會隨即出現。

將按鈕新增至主要表單，然後按兩下，即可顯示 Button1_Click 事件處理常式的程式碼。新增下列程式碼以呼叫測試程序：

' 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)

執行應用程式

按下 F5 可執行應用程式。按一下表單上的按鈕以呼叫測試程序。程序會顯示訊息，指出原始 UserName 為「MOORE, BOBBY」，這是因為程序呼叫了物件的 Capitalize 方法。
按一下 [確定] 來解除訊息方塊。 Button1 Click 程序會變更 UserName 屬性的值並顯示訊息，指出 UserName 的新值為「Worden, Joe」。

Share via

逐步解說：定義類別 (Visual Basic)

若要定義類別

若要建立按鈕來測試類別

執行應用程式

另請參閱

意見反應

其他資源