Tarea 2 class administrativo

Public Class Administrativo
Inherits Persona

Private m_NoEmpleado As String
Private m_sueldo As Double
Private m_puesto 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 puesto() As String
Get
Return m_puesto
End Get
Set(ByVal Value As String)
m_puesto = Value
End Set
End Property
End Class