物件導向程式設計 (Visual Basic)

Visual Basic 為包括封裝、繼承和多型在內的物件導向程式設計提供完整支援。

「封裝」指的是將一組相關的屬性、方法和其他成員，視為單一單位或物件。

「繼承」則是描述依據現有類別來建立新類別的能力。

「多型」指的是您可以有多個交替使用的類別，即使每個類別是以不同的方式來實作相同的屬性或方法。

本節將說明下列概念：

• 類別與物件
  • 類別成員
    • 屬性與欄位
    • 方法
    • 建構函式
    • 解構函式
    • 活動
    • 巢狀類別
  • 存取修飾詞與存取層級
    • 具現化類別
    • 共用類別與成員
    • 匿名型別
• 繼承
  • 覆寫成員
• 介面
• 泛型
• 委派

類別與物件

「類別」和「物件」有時會交換使用，但事實上，類別說的是物件的「型別」，而物件則是類別之可使用的「執行個體」。 因此，建立物件的動作稱為「具現化」。 再以藍圖作比喻，若類別是藍圖，物件就是根據藍圖所蓋的建築物。

若要定義類別：

Class SampleClass
End Class

Visual Basic 也會提供輕量版的類別，稱為「結構」，當您必須建立龐大物件陣列而不想要使用太多記憶體時，這個結構會很有用。

若要定義結構：

Structure SampleStructure
End Structure

如需詳細資訊，請參閱

• Class 陳述式
• Structure 陳述式

類別成員

每個類別都有不同的「類別成員」，包括描述類別資料的屬性、定義類別行為的方法，以及提供不同類別與物件之間通訊的事件。

屬性與欄位

欄位和屬性表示物件包含的資訊。 欄位就像是變數，可直接讀取或設定。

若要定義欄位：

Class SampleClass
    Public SampleField As String
End Class

屬性具有取得和設定程序，讓您更容易控制設定與傳回數值的方式。

Visual Basic 可讓您建立私用欄位來儲存屬性值，或使用所謂的自動實作屬性，在幕後自動建立此字段，並提供屬性程式的基本邏輯。

若要定義自動實作的屬性：

Class SampleClass
    Public Property SampleProperty as String
End Class

如果您需要執行某些額外作業來讀取和寫入屬性值，請定義用來儲存屬性值的欄位，並提供儲存和擷取這個欄位的基本邏輯：

Class SampleClass
    Private m_Sample As String
    Public Property Sample() As String
        Get
            ' Return the value stored in the field.
            Return m_Sample
        End Get
        Set(ByVal Value As String)
            ' Store the value in the field.
            m_Sample = Value
        End Set
    End Property
End Class

大部分屬性都具有方法或程序，可以設定及取得屬性值。 但是您可以建立唯讀或唯寫屬性來限制不得修改或讀取。 在 Visual Basic 中，您可以使用 ReadOnly 和 WriteOnly 關鍵字。 不過，自動實作的屬性不可以是唯讀或只讀屬性。

如需詳細資訊，請參閱

• Property Statement
• Get 陳述式
• Set 陳述式
• ReadOnly
• WriteOnly

方法

「方法」是物件可執行的動作。

注意

在 Visual Basic 中，有兩個建立方法的方式：如果方法沒有傳回值，即使用 Sub 陳述式；如果有傳回值，則使用 Function 陳述式。

若要定義類別的方法：

Class SampleClass
    Public Function SampleFunc(ByVal SampleParam As String)
        ' Add code here
    End Function
End Class

類別可以有同一個方法的多個實作或「多載」，但是這些實作的參數個數和參數類型並不相同。

若要多載方法：

Overloads Sub Display(ByVal theChar As Char)
    ' Add code that displays Char data.
End Sub
Overloads Sub Display(ByVal theInteger As Integer)
    ' Add code that displays Integer data.
End Sub

在多數情況下，您是在類別定義中宣告方法。 不過，Visual Basic 也支援「擴充方法」，允許您在現有類別的實際定義之外將方法新增至類別。

如需詳細資訊，請參閱

• Function 陳述式
• Sub 陳述式
• 多載
• 擴充方法

建構函式

建構函式是類別方法，會在建立指定類型的物件時自動執行。 建構函式通常用來初始化新物件的資料成員， 而且只能在建立類別時執行一次。 此外，建構函式中的程式碼永遠會在類別中的任何其他程式碼執行之前執行。 不過，就和其他任何方法一樣，您可以建立多個建構函式多載。

若要定義類別的建構函式：

Class SampleClass
    Sub New(ByVal s As String)
        // Add code here.
    End Sub
End Class

如需詳細資訊，請參閱：物件存留期：物件的建立和終結。

解構函式

解構函式是用來解構類別的執行個體。 在 .NET Framework 中，記憶體回收行程會自動管理應用程式中 Managed 物件的記憶體配置及釋放。 不過，您可能仍然需要解構函式來清除應用程式建立的任何 Unmanaged 資源。 一個類別只能有一個解構函式。

如需 .NET Framework 中之解構函式和記憶體回收的詳細資訊，請參閱記憶體回收。

事件

事件可讓 類別 或物件在某些相關的事情發生時，告知其他類別或物件。 傳送 (或引發) 事件的類別稱為「發行者」，而接收 (或處理) 事件的類別則稱為「訂閱者」。 如需事件的詳細資訊以及如何引發和處理事件，請參閱處理和引發事件。

• 若要宣告事件，請使用 Event 陳述式。

• 若要引發事件，請使用 RaiseEvent 陳述式。

• 若要以宣告的方式指定事件處理常式，請使用 WithEvents 陳述式和 Handles 子句。

• 若要能夠動態新增、移除及變更與事件相關聯的事件處理常式，請將 AddHandler 陳述式和 RemoveHandler 陳述式與 AddressOf 運算子搭配使用。

巢狀類別

在類別中定義的另一個類別即稱為「巢狀」類別。 巢狀類別預設為私用。

Class Container
    Class Nested
    ' Add code here.
    End Class
End Class

若要建立巢狀類別的執行個體，請使用容器類別名稱，後面加上點號，再接著巢狀類別名稱，如下所示：

Dim nestedInstance As Container.Nested = New Container.Nested()

存取修飾詞與存取層級

所有類別及類別成員都可以使用「存取修飾詞」，指定要提供給其他類別的存取層級。

下列為可用的存取修飾詞：

Visual Basic 修飾詞	定義
公開	類型或成員可由相同組件或參考該組件的另一個組件中的任何其他程式碼存取。
私用	類型或成員只能由相同類別中的程式碼存取。
Protected	類型或成員只能由相同類別中，或是衍生類別中的程式碼存取。
Friend	類型或成員可由相同組件中的任何程式碼存取，但是不包括其他組件中的程式碼。
Protected Friend	類型或成員可由相同組件中的任何程式碼，或是其他組件中的任何衍生類別存取。

如需詳細資訊，請參閱 Visual Basic 中的存取層級。

具現化類別

若要建立物件，您必須將類別執行個體化，或是建立類別執行個體。

Dim sampleObject as New SampleClass()

將類別執行個體化之後，您就可以將值指派給執行個體的屬性和欄位，並叫用類別方法。

' Set a property value.
sampleObject.SampleProperty = "Sample String"
' Call a method.
sampleObject.SampleMethod()

若要在類別執行個體化期間將值指派給屬性，請使用物件初始設定式：

Dim sampleObject = New SampleClass With
    {.FirstProperty = "A", .SecondProperty = "B"}

如需詳細資訊，請參閱

• New 運算子
• 物件初始設定式：具名和匿名型別

共用類別與成員

類別的共用成員是類別所有執行個體共用的屬性、程序或欄位。

若要定義共用成員：

Class SampleClass
    Public Shared SampleString As String = "Sample String"
End Class

若要存取共用成員，請使用類別的名稱，但不要建立此類別的物件：

MsgBox(SampleClass.SampleString)

Visual Basic 中的共用模組只有共用成員，而且無法執行具現化。 共用成員也無法存取非共用屬性、欄位或方法

如需詳細資訊，請參閱

• [共用]
• Module 陳述式

匿名型別

使用匿名類型建立物件時，您不需要撰寫資料類型的類別定義， 編譯器 (Compiler) 會自動幫您建立類別 (Class)。 這個類別沒有可使用的名稱，但是包含您在宣告物件時指定的屬性。

若要建立匿名類型的執行個體：

' sampleObject is an instance of a simple anonymous type.
Dim sampleObject =
    New With {Key .FirstProperty = "A", .SecondProperty = "B"}

如需詳細資訊，請參閱匿名型別。

繼承

繼承可讓您建立新類別以重複使用、擴充和修改其他類別中定義的行為。 成員被繼承的類別稱為「基底類別」，而繼承這種成員的類別即稱為「衍生類別」。 不過，Visual Basic 中的所有類別都隱含繼承 Object 類別，這個類別會支援 .NET 類別階層架構，並為所有類別提供低階服務。

注意

Visual Basic 不支援多重繼承。 也就是說，您只能為衍生類別指定一個基底類別。

若要繼承基底類別：

Class DerivedClass
    Inherits BaseClass
End Class

所有類別預設都可以被繼承。 不過，您可以指定類別是否不得當做基底類別，或是建立只能當做基底類別的類別。

若要指定類別不得當做基底類別使用：

NotInheritable Class SampleClass
End Class

若要指定類別只能當做基底類別且無法執行個體化：

MustInherit Class BaseClass
End Class

如需詳細資訊，請參閱

• Inherits 陳述式
• NotInheritable
• MustInherit

覆寫成員

衍生類別預設會從其基底類別繼承所有成員。 如果想要變更所繼承成員的行為，您必須覆寫這個成員。 也就是說，您可以定義衍生類別中方法、屬性或事件的新實作。

下列修飾詞是用來控制如何覆寫屬性及方法：

Visual Basic 修飾詞	定義
Overrides	允許在衍生類別中覆寫類別成員。
覆寫	覆寫在基底類別中定義的虛擬 (可覆寫) 成員。
NotOverridable	防止在繼承的類別中覆寫成員。
New	要求在衍生類別中覆寫類別成員。
陰影	隱藏繼承自基底類別的成員。

介面

介面就像類別，可定義屬性、方法和事件集。 但與類別不同的是，介面並不提供實作。 介面是由類別實作，並定義為與類別不同的實體。 介面就代表著一種合約，因為實作介面的類別必須完全依介面的定義來實作這個介面的各個方面。

若要定義介面：

Public Interface ISampleInterface
    Sub DoSomething()
End Interface

若要在類別中實作介面：

Class SampleClass
    Implements ISampleInterface
    Sub DoSomething
        ' Method implementation.
    End Sub
End Class

如需詳細資訊，請參閱

• 介面
• Interface 陳述式
• Implements 陳述式

泛型

.NET 中的類別、結構、介面和方法可以包括「型別參數」，這些參數會定義可儲存或使用的物件類型。 泛型最常見的範例是集合，您可以在其中指定要儲存於集合之物件的類型。

若要定義泛型類別：

Class SampleGeneric(Of T)
    Public Field As T
End Class

若要建立泛型類別的執行個體：

Dim sampleObject As New SampleGeneric(Of String)
sampleObject.Field = "Sample string"

如需詳細資訊，請參閱

• 泛型
• Generic Types in Visual Basic

委派

「委派」是定義方法簽章的類型，可以提供任何具有相容簽章之方法的參考。 您可以透過委派叫用 (Invoke) 或呼叫方法。 委派可以用來將方法當做引數傳遞給其他方法。

注意

事件處理常式就是透過委派叫用的方法。 如需使用委派處理事件的詳細資訊，請參閱處理和引發事件。

若要建立委派：

Delegate Sub SampleDelegate(ByVal str As String)

若要建立與委派所指定簽章相符之方法的參考：

Class SampleClass
    ' Method that matches the SampleDelegate signature.
    Sub SampleSub(ByVal str As String)
        ' Add code here.
    End Sub
    ' Method that instantiates the delegate.
    Sub SampleDelegateSub()
        Dim sd As SampleDelegate = AddressOf SampleSub
        sd("Sample string")
    End Sub
End Class

如需詳細資訊，請參閱

• 委派
• Delegate 陳述式
• AddressOf 運算子

另請參閱

• Visual Basic 程式設計指南