Confirmation de fermeture d'un form [Visual Basic 6.0] [Résolu]

Messages postés
40
Date d'inscription
lundi 17 janvier 2005
Statut
Membre
Dernière intervention
10 novembre 2006
- - Dernière réponse : cs_casy
Messages postés
7745
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
- 21 avril 2006 à 20:54
Si je veux faire une confirmation de fermeture, quand je click sur le X, il me demande oui et non, si je clique sur Non je veux pas quil se ferme... kk1 a un idée ?

Merci d'avance...
Afficher la suite 

9 réponses

Meilleure réponse
Messages postés
7745
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
43
3
Merci
Oupss, pardon, j'avais pas fait gaffe :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
dim response as integer
'Confirmation
response = MsgBox ("Voulez-vous vraiment quitter le chat ?"), vbYesNo, "Êtes-vous sûr ?"
If response = vbNo Then
Cancel = True
End If

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 139 internautes nous ont dit merci ce mois-ci

Messages postés
86
Date d'inscription
dimanche 1 mai 2005
Statut
Membre
Dernière intervention
18 juillet 2009
0
Merci
Vb gère l'évennement close d'une form.
A l'intérieur tu mets une MsgBox à deux options. Si on répond non, exit sub sinon on laisse l'app se fermer
Messages postés
86
Date d'inscription
dimanche 1 mai 2005
Statut
Membre
Dernière intervention
18 juillet 2009
0
Merci
regarde les events de la form
Messages postés
7745
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
43
0
Merci
Possible, il peut exister quelques astuces, tout dépend comment tu gere la fermeture de ta form.

Met nous ton bout de code qui gere le click sur le X et la demande de confirmation.

Pour l'instant, tel que tu le présente on est un peut dans le flou pour t'aider.

Messages postés
40
Date d'inscription
lundi 17 janvier 2005
Statut
Membre
Dernière intervention
10 novembre 2006
0
Merci
J'ai mis sa dans mon programme sauf ki quit pareil...

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
'Confirmation
MsgBox ("Voulez-vous vraiment quitter le chat ?"), vbYesNo, "Êtes-vous sûr ?"
If response = vbYes Then
Else
Exit Sub
End If
Messages postés
7745
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
43
0
Merci
Bonne piste

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
'Confirmation
MsgBox ("Voulez-vous vraiment quitter le chat ?"), vbYesNo, "Êtes-vous sûr ?"
If response = vbYes Then
exit sub
Else
Cancel = True
Exit Sub
End If

Messages postés
7745
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
43
0
Merci
Et tu peux même l'amélioré en :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
'Confirmation
MsgBox ("Voulez-vous vraiment quitter le chat ?"), vbYesNo, "Êtes-vous sûr ?"
If response = vbNo Then
Cancel = True
End If

ça fait plus propre

Messages postés
86
Date d'inscription
dimanche 1 mai 2005
Statut
Membre
Dernière intervention
18 juillet 2009
0
Merci
et en VB .NET
Public Class Form1








Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim a As Integer = MessageBox.Show("Are you sure?", "Confirmation.", MessageBoxButtons.OKCancel, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly, False)
If a = 2 Then
e.Cancel = True
End If
End Sub
End Class
Messages postés
40
Date d'inscription
lundi 17 janvier 2005
Statut
Membre
Dernière intervention
10 novembre 2006
0
Merci
ma variable vbyes ou vbno = 6 pis response est empty... c koua la ?

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.