Since the close event does not have a cancel parameter, you will need to move your code to the unload event for the form.
Private Sub Form_Unload(Cancel As Integer)
In your code when the user does not wnat ot exit then use the following
Cancel = True
Boyd
"Hi Tech Coach"
Access Based Accounting/Business Solutions developer.
http://www.officeprogramming.com