逐步解說:定義類別 (Visual Basic)
這份逐步解說文件示範如何定義類別,以便您用來建立物件。 內容也會說明如何將屬性和方法新增至新類別,並示範如何初始化物件。
注意
在下列指示的某些 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」。