Ejercicio
Clases Estudiante + Profesor
Objetivo
Cree un nuevo proyecto e incluya en él la clase Persona que acaba de crear.
Crear una clase "Alumno" y otra clase "Profesor", ambos descendientes de "Persona".
La clase "Estudiante" tendrá un método público "GoToClasses", que escribirá en pantalla "Voy a clase".
La clase "Profesor" tendrá un método público "Explicar", que mostrará en pantalla "La explicación comienza". Además, tendrá un atributo privado "subject", una cadena.
La clase Persona debe tener un método "SetAge (int n)" que indicará el valor de su edad (por ejemplo, 20 años).
El alumno dispondrá de un método público "ShowAge" en el que se escribirá en la pantalla "Mi edad es: 20 años" (o el número correspondiente).
Debe crear otra clase de prueba llamada "StudentAndTeacherTest" que contendrá "Main" y:
Crea una persona y haz que salude
Crea un estudiante, establece su edad en 21 años, dile que salude y muestra su edad
Crea un maestro, de 30 años, pídele que salude y luego explícale.
Código
Imports System
Namespace December_19th
Class Teacher
Inherits Person
Private subject As String
Public Sub Explain()
Console.WriteLine("Explanation begins")
End Sub
End Class
End Namespace
Namespace December_19th
Class StudentAndTeacherTest
Private Shared Sub Main()
Dim debug As Boolean = False
Dim myPerson As Person = New Person()
myPerson.Greet()
Dim myStudent As Student = New Student()
myStudent.SetAge(21)
myStudent.Greet()
myStudent.ShowAge()
Dim myTeacher As Teacher = New Teacher()
myTeacher.SetAge(30)
myTeacher.Greet()
myTeacher.Explain()
If debug Then Console.ReadLine()
End Sub
End Class
End Namespace
Namespace December_19th
Class Student
Inherits Person
Public Sub ShowAge()
Console.WriteLine("My age is: {0} years old", age)
End Sub
End Class
End Namespace
Namespace December_19th
Class Person
Protected age As Integer
Public Sub Greet()
Console.WriteLine("Hello")
End Sub
Public Sub SetAge(ByVal n As Integer)
age = n
End Sub
End Class
End Namespace