Discussion :

[dv-2008]

bjr voila mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        MessageBox.Show("Are you sure to exit?", "Exit", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If MsgBoxResult.Yes Then
            e.Cancel = False
        ElseIf MsgBoxResult.No Then
            e.Cancel = True
        End If
    End Sub

quand je clique sur oui ou non oon m'affiche toujours le messagebox et la form ne se ferme pas
j'ai encore un boutton quitter sur ma form

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CmdQuitter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdQuitter.Click
        End
    End Sub

se que je veu c'est que quand je ferme la form avc le button quitter ou n'improte qu'elle autre maniére le messagebox doit s'afficher
et merci d'avance

[Skalp]

Tu dois récupérer le résultat de ta question et évaluer ce résultat :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim dr As DialogResult = MessageBox.Show("Are you sure to exit?", "Exit", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If dr = Windows.Forms.DialogResult.No Then
    e.Cancel = True
End If

Ensuite sur ton bouton quitter, tu ajoutes juste :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CmdQuitter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdQuitter.Click
        Me.Close()
End Sub

Cette méthode déclenche l'évènement FormClosing.

[dv-2008]

Merci sa marche super bien maintenant