En el siguiente ejercicio realizaremos la sobrecarga del constructor para la clase clsEmpleado, para ello se deben seguir los siguientes pasos:
Abra la clase clsEmpleado desde el explorador de soluciones.
Agregue las siguientes líneas de código, debajo del método constructor definido con anterioridad:
Public Sub New()
dtFecha = Now
End Sub
Abrir el archive de la solución y remover las líneas de código que se han definido en los métodos que atienden los eventos clic de los botones.
Agregar, en el método que atiende el evento clic del botón button1, las siguientes líneas de código:
Dim clsFecha As New clsEmpleado(Now)
clsFecha.Nombre = Me.TextBox1.Text
clsFecha.Apellido = Me.TextBox2.Text
MessageBox.Show(clsFecha.Nombre + " " + clsFecha.Apellido + _
" activo desde " + clsFecha.Fecha.ToString())
Agregar, en el método que atiende el evento clic del botón Button2, las siguientes líneas de código:
Dim cls As New clsEmpleado()
cls.Nombre = Me.TextBox1.Text
cls.Apellido = Me.TextBox2.Text
MessageBox.Show(cls.Nombre + " " + cls.Apellido + _
" activo desde " + cls.Fecha.ToString())
Los mensajes que se desplegarán en la aplicación serán similares, entre si, pero los constructores tendrán comportamientos diferentes, los mensajes que se despliegan son:


No hay comentarios:
Publicar un comentario