Exit Button Msg Box Command Help

[davin2929]

Hello all. I need assistance when I click a command button (exit) on a form
I would like a message box to come up and ask "are you sure you want to exit access" Yes/No. if yes exit access if no go back to the form. i've done a search in the message board but i can't find something this simple. any help would be great. thanks.

 

[Norie]

Perhaps something like this.

Private Sub Command1_Click()
Dim AskQuit

    AskQuit = MsgBox("Are you sure you want to exit access?", vbYesNo, "Quit")
    
    If AskQuit = vbYes Then
        Application.Quit
    End If
    
End Sub

 

[davin2929]

that worked but it closed access without asking if i wanted to save anything i had open. i want it to ask if i want to save any changes. any suggestions.

 

[tails]

access normalls saves automatically, so you dont actually need to save when you exit, about the only thing that you need to save when you exit is when you either make changes to a table (the design and layout) and the same with forms, queries, reports, etc. When you enter data, it saves automatically.

 

[Jaafar Tribak]

access normalls saves automatically, so you dont actually need to save when you exit, about the only thing that you need to save when you exit is when you either make changes to a table (the design and layout) and the same with forms, queries, reports, etc. When you enter data, it saves automatically.

This strange saving behaviour is apparently peculiar to Access. Does anybody know what the logic or reason for this is !!??

Jaafar.