Checkbox
Me gustaría crear un proyecto que tiene los siguientes componentes
-1 commandbutton
-2 checkbox
-Primera imagen visible=false
-Segunda imagen visible=false
Lo que quiero es que cuando seleccione un checkbox y luego pulse el commandbutton me aparezca la primera imagen y cuando seleccione el otro checkbox y pulse el commandbuttonme aparezca la Segunda imagen.
Gracias por las respuestas
-1 commandbutton
-2 checkbox
-Primera imagen visible=false
-Segunda imagen visible=false
Lo que quiero es que cuando seleccione un checkbox y luego pulse el commandbutton me aparezca la primera imagen y cuando seleccione el otro checkbox y pulse el commandbuttonme aparezca la Segunda imagen.
Gracias por las respuestas
1 respuesta
Respuesta de ifrancoz
1
Lo puede hacer de la siguiente forma :
Private Sub Check1_Click()
Check2.Value = 0
End Sub
Private Sub Check2_Click()
Check1.Value = 0
End Sub
Private Sub Command1_Click()
If Check1 = 1 Then
Image1.Visible = True
Else
If Check2.Value = 0 Then
Image2.Visible = True
End If
End If
End Sub
Private Sub Form_Load()
Check1.Value = 0
Check2.Value = 0
End Sub
Suerte !
Private Sub Check1_Click()
Check2.Value = 0
End Sub
Private Sub Check2_Click()
Check1.Value = 0
End Sub
Private Sub Command1_Click()
If Check1 = 1 Then
Image1.Visible = True
Else
If Check2.Value = 0 Then
Image2.Visible = True
End If
End If
End Sub
Private Sub Form_Load()
Check1.Value = 0
Check2.Value = 0
End Sub
Suerte !
