超快速物件導向(Object-Oriented Programming,OOP)概念複習(VB.NET)

封裝

　　由類別(Class)來封裝「資料成員、方法(Sub/Function)、屬性(Property)、建構式(New)」

　　一、定義Class

view sourceprint?

1	Public Class Bruce

2

3

End Class

　　二、含Namespace的Class定義

view sourceprint?

1	Namespace KK

2	Public Class Bruce

3

4

End Class

5	End Namespace

繼承

　　BaseClass(父,基礎)　　　　　　　　NewClass(子,衍生)
　　　　NotInheritable　　　　　　　　　　Inherits

　　NotInheritable：不可被繼承。

view sourceprint?

1	Public NotInheritable Class Bruce

2

3

End Class

　　Inherits：繼承BaseClass。

view sourceprint?

1	Public Class Bruce

2	Inherits Customer

3

4

End Class

繼承--覆寫

　　BaseClass(父,基礎)　　　　　　　　NewClass(子,衍生)
　　　　Overridable　　　　　　　　　　　　Overrides
　　　　　　　　　　　　　　　　　　　　　 Shadows
　　　　　　　　　　　　　　　　　　　　　 MyBase

　　Overridable：方法可被覆寫。

view sourceprint?

1	Public Class Bruce

2	Public Overridable Function FunName(ByVal a As Integer) As Integer

3

'...

4	End Function

5

End Class

　　Overrides：覆寫BaseClas方法。

view sourceprint?

1	Public Class KingKong

2	Inherits Bruce

3	Public Overrides Function FunName(ByVal a As Integer) As Integer

4

'...

5	End Function

6

End Class

　　Shadows：建立同名新方法，非覆寫BaseClass版本。

view sourceprint?

1	Public Class KingKong

2	Inherits Bruce

3	Public Shadows Function FunName(ByVal a As Integer) As Integer

4

'...

5	End Function

6

End Class

　　MyBase：在NewClass引用BaseClass版本方法。

抽象

　　MustInherit BaseClass(父,基礎)　　NewClass(子,衍生)
　　　　MustOverride 　　　　　　　　　　　Overrides

　　MustInherit：宣告為抽象類別。
　　MustOverride：宣告抽象方法。

view sourceprint?

1	Public MustInherit Class Bruce

2	Public MustOverride Function FunName(ByVal a As Integer) As Integer

3

End Class

　　Overrides：實作抽象方法。

view sourceprint?

1	Public Class KingKong

2	Inherits Bruce

3	Public Overrides Function FunName(ByVal a As Integer) As Integer

4

'...

5	End Function

6

End Class

介面

　　Interface(介面)　　　　　　　　　 NewClass(子,衍生)
　　　　　　　　　　　　　　　　　　　　　 Implements

　　Interface：宣告介面。(一般都會使用大寫I開頭)

view sourceprint?

1	Interface IBruce

2	Function FunName() As Integer

3

4	End Interface

　　Implements：實作介面。

view sourceprint?

1	Public Class KingKong

2	Implements IBruce

3	Public Function FunName() As Integer Implements IBruce.FunName

4

'...

5	End Function

6

End Class