Gjøre en sjekk når programmet avsluttes fra X

[Laffen96]

Hei!

 

Jeg skulle ha gjort en sjekk når programmet avsluttes, spesiellt fra X i øvre høyre hjørne.

 

Poenget er at dersom en label har en verdi skal jeg sende en msgbox når programmet avsluttes. Det kan bare avsluttes fra krysset.

 

Håper det var mulig å forstå

 

Takk for hjelpen!

[Jonas]

Man bruker Unload-hendelsen, slik:

Private Sub Form_Unload(Unload As Integer)
   If MsgBox("Vil du avslutte?", vbInformation + vbYesNo, "Avslutt") = vbNo Then
       Unload = 1
   End If
End Sub