Preventing Form Close

[danielhitch]

Hi.

I have tried several ways to prevent a form of mine from closing.

My problem lies in the fact that I have got a particularly fragile ActiveX control that crashes if the form is closed using either the Application Close, Menu Close, or Tab close - It does not happen if I create a macro linked to a button that closes the form.

First of all, I tried creating an AutoExec but, this still crashes the control. So I have put together a bit of code that almost works, but doesn't. I need you guys to tell me how to make it work.

Here is my code:

Private Sub Form_Close()
If Close_Basic_Accident_Plot_Click Then
Cancel = False
Else
MsgBox "Please Use The Exit Button At The Bottom Left Of The Screen", vbOKOnly + vbExclamation, "Error"
Cancel = True
End If
End Sub

I have also tried the code on the form unload too with no success.

As far as I can see, the code kicks in after the close / unload command happens, therefore my click arguement in the If statement doesnt work.

What I need to happen is that the cancel command kicks in on every type of close appart from when the Close_Basic_Accident_Plot button is clicked.

Any ideas?

Thanks.

Dan.

 

[apr pillai]

You may create Custom Menus and Toolbars for your Application and disable default menus/toolbars through Tools-->Startup options. The Form control buttons (minimize, maximize,close buttons) can be removed through the Form's property settings. This will force the user to click on the Command Button to close the Form.

If you need help with designing menus and toolbars, visit the following links:

Custom Menus and Toolbars
Custom Menus and Toolbars-2

 

[swGeof]

have you tried creating a macro on the Onclose event that actually hides the form when closed instead of actually closing it?

It sounds kind of wierd, but on the On close event in the macro you choose open form, form name, and then last choice is Hidden instead of Normal.