VB.Net Tutorial/Class Module/Inherits
Версия от 16:40, 26 мая 2010; (обсуждение)
"Inherits" must be first line. There can be only one
Public Class Person
Inherits System.Object
Public Name As String
Public Birthday As Date
End Class
Public Class Student
Inherits Person
Public Sub New(ByVal StudentName As String, ByVal BirthDate As Date)
MyBase.Name = StudentName
MyBase.Birthday = BirthDate
End Sub
Public StudentID
Public Overrides Function ToString() As String
Return (Me.Name)
End Function
End Class