How use code when using the X to close a form ? (solved)

[choas]

Hi, I need to be able to put some code when the user close a windows with the "X" cause otherwise the form behind isn't enabled back and programme is freezed. When the user close the windows using my button i just have to put :

frmMain.enabled = True

But if he use the X how can I do ?

[BrianS]

Use the Terminate or Unload Event. Unload fires first, then Terminate.

Example

Private Sub Form_Terminate()
MsgBox "Bye Terminate"
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
MsgBox "Bye Unload"
End Sub

[MartinLiss]

You might want to consider using the QueryUnload event.

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
 
    Select Case UnloadMode
        Case vbFormControlMenu
            strMess = "The user chose the Close command (the "X") from the Control menu on the form."
        Case vbFormCode
            strMess = "The Unload statement is invoked from code."
        Case vbAppWindows
            strMess = "The current Microsoft Windows operating environment session is ending."
        Case vbAppTaskManager
            strMess = "The Microsoft Windows Task Manager is closing the application."
        Case vbFormMDIForm
            strMess = "An MDI child form is closing because the MDI form is closing."
        Case vbFormOwner
            strMess = "A form is closing because its owner is closing."
    End Select
 
End Sub

[choas]

Thanks, the unload query work fine, but it seem terminate and unload event don't.

Anyway thanks to both of you. I gonna put this topic as solved