Lukning af VB Program

hej.

Private Sub Form_Unload(Cancel As Integer)
  End
End Sub

mvh  Jørn

Det tyder på at du har mere end en form åben ad gangen.

Jeg formoder at du har noget yderligere kode i kommandoknappen, der lukker alt pænt ned, så det du skal gøre er at flytte denne kode ud i en ny sub, f.eks.

Sub LukAltNed
    ' Her indsætter du koden
End Sub

Kommandoknappen rettes så til:

Sub Command1_Click (eller hvad den nu hedder)
    LukAltNed
End Sub

Og endelig skal du så sikre at denne også bliver kaldt når der lukkes på krydset:

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

- her kan du også bruge Form_Unload i stedet, men min erfaring siger at denne er bedre.

Hilsen

Claus PH

Takkker......

Point til begge!