Event Close and

[charly.csh]

Hello everyone,

Today I have a question that maybe is really easy to solve but I am stucked. I made a form and on the event for close the form I added a Message Box "Yes" or "No"


What I want to do is if the user say "Yes" the form will close otherwise choosing "No", the form will stand "open", my question is on the second option since it's actually closing anyway

Thanks for helping!!!!

On Error GoTo Err_MainMenu_Click

Dim MessageBox As Integer
MessageBox = MsgBox("¿Do you want to get-out?", vbQuestion + vbYesNo, "Management Tool")

If MessageBox = vbYes Then

MsgBox "Thanks for using Management Tool, See you!", vbInformation, "Management Tool"
Application.Quit

ElseIf MessageBox = vbNo Then

'HERE I DON'T KNOW WHAT TO ADD TO KEEP IT OPEN WITH NO CHANGES

End If

Exit_MainMenu_Click:
'    Exit Sub

Err_MainMenu_Click:
' MsgBox "Error, contact your IT manager", vbExclamation, "Management Tool"

End Sub

[Welshgasman]

From One simple google?

https://www.access-programmers.co.uk...-closed.46206/