Fecha: Mayo 27 de 2013
Asignatura: Tecnología e Informática.
Formación en Valor: Imitación al Modelo Mariano.
Núcleo Integrador: CheckBox
Objetivo: Programar las casillas de verificación.
Se controla con la propiedad Value, la cual indica si esta o no seleccionado el CHECKBOX.
Tiene dos posibles valores:
0 No esta seleccionado.
1 Esta Seleccionado.
Ejemplo:
Diseñe el siguiente formulario:
Para cambiar el texto que muestra el CHECKBOX, debe utilizar la propiedad CAPTION del CHECKBOX.
Copie el siguiente código, en la ventana de código del Visual Basic.
Private Sub Check1_Click()
If Check1.Value = 0 Then
Check1.Caption = "No Tiene IVA"
ElseIf Check1.Value = 1 Then
Check1.Caption = "Tiene IVA"
End If
End Sub
Private Sub Command1_Click()
If Check1.Value = 0 Then
Text3 = 0
ElseIf Check1.Value = 1 Then
Text3 = Val(Text2) * 16 / 100
End If
Text4 = Val(Text2) + Val(Text3)
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text1.SetFocus
End Sub
Ejecute el programa e ingrese:
- El Nombre del Articulo.
- Valor Venta.
- Active si tiene o No IVA el articulo.
- Clic en el botón Calcular.
TALLER: Desarrolle un programa que calcule si un empleado tiene o no COMISIÓN.
El programa debe CAPTURAR.
- El Nombre del Empleado.
- Salario Basico.
- Active si tiene o No COMISIÓN, (SI TIENE ES DEL 15% DEL SALARIO BASE.)
- El botón Calcular, debe realizar las operaciones matemáticas.
No hay comentarios:
Publicar un comentario