Wakala

Colegio De Educación Profesional Técnica Del Estado De Sinaloa

Programación SGBD

Prácticas 15-26

María Esther Camacho Armenta

Cordero Elenes Juan Manuel

Grupo 502

Práctica 15:Manejo de propiedades de los componentes en el desarrollo de aplicaciones para demostrar la interactividad de los eventos

Public Class Practica15cordero

Private Sub aceptar_Click(ByVal senderAs System.Object, ByVal e As System.EventArgs) Handles aceptar.Click
saludo.Text = "¡Hola Mundo!"
End Sub
End Class

Práctica 16: Suma De Valores Numéricos

Public Classpractica16cordero
Dim suma As Double
Private Sub sumar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles sumar.Click
suma = suma + TextBox1.Textlabelresultado.Text = suma
End Sub
End Class

Práctica 17: Uso de operadores aritméticos

Public Class pratica17cordero

Private Sub aceptar_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles aceptar.Click
salariobruto.Text = horastrabajadas.Text * pagoporhora.Text
descuento.Text = 0.2 * salariobruto.Text
salarioneto.Text =salariobruto.Text - descuento.Text
End Sub

Private Sub limpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles limpiar.Click
nombreyapellidos.Text = ""horastrabajadas.Text = ""
pagoporhora.Text = ""
salariobruto.Text = ""
descuento.Text = ""
salarioneto.Text = ""
nombreyapellidos.Focus()
End SubPrivate Sub salir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles salir.Click
Me.Close()
End Sub
End Class

Práctica 18: Uso de operadores para el manejode fechas

Public Class Practica18cord

Private Sub aceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles aceptar.Click
edad.Text = Year(Date.Today) -...