Bouton pour quitter une appli avec confirmation

Bonsoir,

J'ai une appli pour laquelle j'aimerais que mon bouton quitter soit suivi par l'apparition d'une msgbox disant "quitter vraiment ?" avec 2 bouttons: quitter et Annuler.
Pour quitter ==> End
Si on annule la textbox se ferme et le prog revient ou il etait.

Mon prob : impossible d'avoir les 2 boutons "Quitter" et "Annuler" sur ma textbox.

Que dois je faire ?

F1 + queryunload

désolé pour la question mais j'ai pas msdn ou je bosse, pas plus que l'internet. Je poste d'une autre station :roll:

Bonjour

Citation:

---

Envoyé par Attila54

...
Mon prob : impossible d'avoir les 2 boutons "Quitter" et "Annuler" sur ma textbox.
...

---

Pour la liste de boutons il faut

Citation:

---

vbOKCancel

---

A+, Hervé

salut

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Form_Unload(Cancel As Integer)   If MsgBox("Voulez vous vraiment quitter", vbInformation + vbYesNo, "info") = vbYes Then End Else Cancel = True End If   End Sub

---

Citation:

---

Envoyé par real_achilles

salut

Code:

---

Private Sub Form_Unload(Cancel As Integer).../...

---

---

A mon avis, QueryUnload est péréférable car il permet de récupérer UnloadMode et donc de gérer en conséquence.

Citation:

---

Valeurs de UnloadMode
vbFormControlMenu 0 L'utilisateur a choisi dans le menu Système de la feuille la commande Fermeture.
vbFormCode 1 L'instruction Unload est invoquée à partir du code.
vbAppWindows 2 La session Microsoft Windows en cours prend fin.
vbAppTaskManager 3 Le Gestionnaire de tâches de Microsoft Windows ferme l'application.
vbFormMDIForm 4 Une feuille MDI fille se ferme en raison de la fermeture de la feuille MDI.
vbFormOwner 5 Une feuille se ferme en raison de la fermeture de son propriétaire.

---

bonsoir,

j'ai testé les deux soluces qui visiblement fonctionnent parfaitement.
Merci a tous pour vos conseils et pour l'aide :)