Evitare chiusura di un form

[ladyBlu]

scrivi così:

Private Sub Form_Unload(Cancel As Integer)
    Cancel = 1
End Sub

in questo modo il form non viene chiuso.