Instrucción correcta MgsBox
Publicado por Jaime (6 intervenciones) el 13/02/2020 19:49:17
Tengo un formulario de consulta donde al abrir pretendo ver o modificar la información del mismo, solo que no se que instrucción poner al darle "No" al MsgBox, para que no me guarde los cambios realizados, esto es lo que tengo al momento, agradezco su ayuda, saludos
1
2
3
4
5
6
7
8
9
10
Private Sub Comando31_Click()
On Error Resume Next
Dim Guardar As Integer
Guardar = MsgBox("Desea guardar los cambios?", vbQuestion + vbYesNo + vbDefaultButton1, "VYSEEC")
If Guardar = vbYes Then
DoCmd.Close
Else
?
End If
End Sub
Valora esta pregunta


0