I have a form that I need the user to print before they close.  The only way
for them to close the form is by clicking the "X" button in the top right
corner of the window.

I have to code set up as:

Private Sub Form_Close()
Dim intResponse As Integer
   
intResponse = MsgBox("Have you printed the form?", vbYesNoCancel, "Print
Form")
If intResponse = 6 Then
   DoCmd.Close
ElseIf intResponse = 7 Then
   DoCmd.CancelEvent
   DoCmd.PrintOut
   DoCmd.Close
ElseIf intResponse = 2 Then
   DoCmd.CancelEvent
End If

End Sub

But, apparently you can't print the form once the form has been initiated to
close.  I thought that canceling the even would make the form stop from
closing, but apparently I was wrong.

How can i re-code this to make it so when the user closes the form, a
message box will appear and ask if they have printed the form.  If so, then
the form closes, if not then the form will print, and if they closed the form
accidentally, the cancel button will cancel the form close event?

Thanks!