CERRAR FORMULARIO
Publicado por Juanjo (43 intervenciones) el 28/12/2008 21:13:32
Hola tengo el siguiente procedimiento en un boton de un formulario:
Private Sub Comando2_Click()
Dim pwd As Integer
Dim op As Variant
pwd = "12345"
op = Me.Texto2.Value
If op = pwd Then
DoCmd.OpenForm "cambios por conceder (buena)"
Else
MsgBox "Contraseña incorrecta, el programa se cerrara", vbCritical
DoCmd.Quit
End If
End Sub
Queria saber para que al presionar este boton me envia al form que le digo (hasta aqui lo tqngo todo) pero mi pregunta es que tengo que poner en este evento para que tambien me cierre el mismo form. Muchas gracias.
Private Sub Comando2_Click()
Dim pwd As Integer
Dim op As Variant
pwd = "12345"
op = Me.Texto2.Value
If op = pwd Then
DoCmd.OpenForm "cambios por conceder (buena)"
Else
MsgBox "Contraseña incorrecta, el programa se cerrara", vbCritical
DoCmd.Quit
End If
End Sub
Queria saber para que al presionar este boton me envia al form que le digo (hasta aqui lo tqngo todo) pero mi pregunta es que tengo que poner en este evento para que tambien me cierre el mismo form. Muchas gracias.
Valora esta pregunta


0