DoCmd.Close not working

[TimE]

I am using the following code but it will not close the form. Any idea what may cause it not to work?

Private Sub cmdAddNewExit_Click()
On Error GoTo Err_cmdAddNewExit_Click

DoCmd.Close

Exit_cmdAddNewExit_Click:
Exit Sub

Err_cmdAddNewExit_Click:
MsgBox Err.DESCRIPTION
Resume Exit_cmdAddNewExit_Click

End Sub

 

[boblarson]

What are you trying to close? If the database, it's

DoCmd.Quit

 

[TimE]

I want the form to close.......I can't believe this, I forgot to add the On Click [Event Procedure] to the button.


Thank you for the quick response.

 

[boblarson]

that'll do it