Prevent closing of a form

How can i avoid closing a form if by mistake cross is开发者_如何学Go clicked

---

Handle this in the Form's QueryUnload event. There's an UnloadMode parameter and a Cancel Parameter:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

    If UnloadMode = vbFormControlMenu Then Cancel = True

End Sub

For more info on the QueryUnload event, see the MSDN VB6 Language Reference or check out this article.