Impossible de quitter directement une application!

Bonjour,

Je me rends compte que quand je donne l’ordre de quitter à mon programme...celui ci ne peut s'empêcher de continuer à exécuter les lignes qui suivent quand même!! Est-ce bien normal? ;-)

Voici un exemple simple qui permet de le vérifier:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Class MainWindow Private Sub MainWindow_Loaded(sender As Object, e As System.Windows.RoutedEventArgs) Handles Me.Loaded Dim test As Integer = 1 If test = 1 Then MsgBox("First Message Box", 48, "Attention") Me.Close() End If If test = 1 Then MsgBox("Second Message Box", 48, "Attention2") Me.Close() End If End Sub End Class

---

Vous verrez que rien n'empêche la deuxième fenêtre de s'ouvrir!
Comment faire svp, pour un arrêt "immédiat"??

Si je remplace le 'Me.Close' en 'Application.Current.Shutdown()'...il n'y a qu'une seule fenêtre qui s'affiche

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Class MainWindow Private Sub MainWindow_Loaded(sender As Object, e As System.Windows.RoutedEventArgs) Handles Me.Loaded Dim test As Integer = 1 If test = 1 Then MsgBox("First Message Box", 48, "Attention") Application.Current.Shutdown() End If If test = 1 Then MsgBox("Second Message Box", 48, "Attention2") Application.Current.Shutdown() End If End Sub End Class

---

...mais j'ai comme message "A first chance exception of type 'System.NullReferenceException' occurred in WpfApplication1.exe". Ce qui est moins "grave" car l'utilisateur final ne verra pas cette erreur du debugger...mais quand même, je voudrais savoir comment y arriver "proprement"!

D'avance merci!

me.close ne fait que fermer la fenetre, ca n'empeche en rien l'exécution du code qui suit (et c'est logique)
on eut alors utiliser exit sub pour sortir de la sub

après un shutdown je mettais exit sub aussi, mais apparemment ca ne continue pas l'exécution de la sub et donc ca serait inutile

le first chance veut simpelement dire qu'une erreur a été catchée, ca peut etre dans le framework ...

La solution, pour moi, a été de placer un 'Return' pour sortir du sub. L'application se ferme alors sans que je vois apparaitre la deuxième fenêtre (qui n'était là, dans mon exemple, que pour illustrer que le code continuait à se dérouler même après l'instruction 'Me.Close'

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Class MainWindow Private Sub MainWindow_Loaded(sender As Object, e As System.Windows.RoutedEventArgs) Handles Me.Loaded Dim test As Integer = 1 If test = 1 Then MsgBox("First Message Box", 48, "Attention") Application.Current.Shutdown() Return End If If test = 1 Then MsgBox("Second Message Box", 48, "Attention2") End If End Sub End Class

---