Fecha: Junio 6 de 2013
Asignatura: Tecnología e Informática.
Formación en Valor: Imitación al Modelo Mariano.
Núcleo Integrador: OptionButton
Objetivo: Programar los botones de opciones.
Se controla con la propiedad Value, la cual indica si esta o no seleccionado el OPTIONBUTTON.
Tiene dos posibles valores:
TRUE No esta seleccionado.
FALSE Esta Seleccionado.
Ejemplo:
Diseñe el siguiente formulario:
Copien el siguiente código en la ventana de código y ejecuten el programa:
Private Sub Command1_Click()
If Option1.Value = True Then
Text3 = Val(Text2) * 10 / 100
End If
If Option2.Value = True Then
Text3 = Val(Text2) * 20 / 100
End If
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text1.SetFocus
End Sub
No hay comentarios:
Publicar un comentario