Public Class Student '聲明一個方法 Public Overloads Function GetStuInfo(ByVal Name As String) As String Console.WriteLine(Name) Return Nothing End Function '重載以前聲明的方法,增長了一個參數 Public Overloads Function GetStuInfo(ByVal Name As String, ByVal StuID As String) As String Console.WriteLine(Name, StuID) Return Nothing End Function '第二次重載,增長了一個參數,並且類型也與以前的不一樣 Public Overloads Function GetStuInfo(ByVal Name As String, ByVal Stuid As String, ByVal Age As Integer) As String Console.WriteLine(Name, Stuid, Age) Return True End Function End Class
'聲明一個必須被繼承的抽象類 Public MustInherit Class People Public MustOverride Function GetName() As String End Class '聲明一個類並繼承People, Public Class Father : Inherits People '重寫People中的方法 Public Overrides Function GetName() As String Console.WriteLine("個人父類是People") Return True End Function '從新聲明一個方法,用來在子類中使用NotOverridable Public Overridable Function ShowMe() As String Return "父親" End Function End Class '繼承Father並重寫其方法 Public Class Son : Inherits Father '重寫Father中的方法 Public Overrides Function GetName() As String Console.WriteLine("個人父類是Father") Return True End Function '聲明一個不能夠在Son子類中重寫的方法,要聲明一個NotOverridable的方法,那麼此方法必須同時也聲明爲Overrides類型 Public NotOverridable Overrides Function ShowMe() As String Return "兒子" End Function End Class