[VB.Net] Comment gérer la fermeture d'une fenêtre ?

Bonjour,

J'ai une fenêtre qui se ferme de 2 façon différents :
- par la croix en haut a droite
- par un boutons QUITTER que je crée
une fois appuyé dessus, un message aparait "Etes-vous sûr de vouloir quitter ?" et l'utilisateur a le choix entre Oui et NON

Mon problème est que je n'arrive pas a les gérer ensemble

quand j'appuie sur le NON du message "Etes-vous sûr de vouloir quitter ?" dans le bouton QUITTER il me ferme ma fenêtre et la fenêtre du message car la fonction continue et pareil quand j'appuie sur le NON de la croix
en résumé: je n'arrive pas à anuler

voici le code pour le bouton QUITTER
Code:

1 2 3 Private Sub quitter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click me.close() End Sub
et pour la croix en haut a droite
Code:

1 2 3 4 5 6 7 8 9 10 Private Sub Form1_FormClosed(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed Dim test As String test = MsgBox("Etes-vous sûr de vouloir quitter ?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Fermeture de la fenêtre") If test = 6 Then exit sub Else Me.Enabled = True End If End Sub

Salut,
la première chose c'est que tu n'utilises pas le bon évènement, tu utilises .Closed au lieu de .Closing donc ta forme est déjà fermée quand tu pose la question à l'utilisateur.

Code:

1
2
3
4
5
6
7
8
9
10
11
    Private Sub frmMain_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
       Try
            Dim rep As DialogResult = MessageBox.Show("Etes-vous certain de vouloir quitter l'application ?", "Confirmation d'arrêt...", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
            If rep = DialogResult.Yes Then
                ...
            Else
                e.Cancel = True
            End If
        Catch
        End Try
    End Sub

Merci