Casilla verificación
Publicado por Marcos (68 intervenciones) el 12/12/2007 04:38:56
Hola que tal todos.
En un formulario, tengo una casilla de verificación llamada Proceso, la cual al hacer click sobre ella me aparece un mensaje con un SI y un NO.
Necesito que al presionar NO (en el mensaje) me deje la casilla de verificación en blanco. (sin tiket o sin marca) y al presionar SI la casilla de verificación con la marca que indica que acepté la operación.
Lo probé con este código en el evento al acer click de la casilla, pero me resuelve la primera parte del problema, pero no la segunda. Es decir, siempre me deja la casilla de verificación en blanco.
Alguien tiene alguna solución ??, le he dado vueltas y no me resulta.
Gracias.
Private Sub Proceso_Click()
RetValue = MsgBox("ESTA SEGURO DE CERRAR ??, NO PODRA INGRESAR MAS DATOS EN ESTE DIA...", vbYesNo)
If vbNo = 7 Then
Me!Proceso.Value = False
Else
If vbYes = 6 Then
Me!Proceso.Value = True
End If
End If
End Sub
En un formulario, tengo una casilla de verificación llamada Proceso, la cual al hacer click sobre ella me aparece un mensaje con un SI y un NO.
Necesito que al presionar NO (en el mensaje) me deje la casilla de verificación en blanco. (sin tiket o sin marca) y al presionar SI la casilla de verificación con la marca que indica que acepté la operación.
Lo probé con este código en el evento al acer click de la casilla, pero me resuelve la primera parte del problema, pero no la segunda. Es decir, siempre me deja la casilla de verificación en blanco.
Alguien tiene alguna solución ??, le he dado vueltas y no me resulta.
Gracias.
Private Sub Proceso_Click()
RetValue = MsgBox("ESTA SEGURO DE CERRAR ??, NO PODRA INGRESAR MAS DATOS EN ESTE DIA...", vbYesNo)
If vbNo = 7 Then
Me!Proceso.Value = False
Else
If vbYes = 6 Then
Me!Proceso.Value = True
End If
End If
End Sub
Valora esta pregunta
0