[vb] Come la chiudo questa finestra?

[riky78]

Se ho questo codice:

Private Sub Form_Load()
Me.Show
For i = 1 To 100000
    DoEvents
    label.Caption = i
Next i
End Sub

Private Sub Form_Unload(Cancel As Integer)
MsgBox "esco"
End Sub

premendo sulla X per la chiusura della finestra entra nell'evento Unload ma poi ricomincia l'esecuzione del load...

come faccio a farlo uscire davvero????