Tarea 2 class docente

Public Class docente
Inherits Persona

Private m_NoEmpleado As String
Private m_Sueldo As Double
Private m_Materias(12) As String

Public Property NoEmpleado() As String
Get
Return m_NoEmpleado
End Get
Set(ByVal Value As String)
m_NoEmpleado = Value
End Set
End Property


Public Property Sueldo() As Double
Get
Return m_Sueldo
End Get
Set(ByVal Value As Double)
m_Sueldo = Value
End Set
End Property

Public Property Materias(ByVal indice As Integer) As String
Get
Return m_Materias(CInt(indice))
End Get
Set(ByVal Value As String)
m_Materias(indice) = Value
End Set
End Property



End Class