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

themik 40 Messages postés lundi 17 janvier 2005Date d'inscription 10 novembre 2006 Dernière intervention - 21 avril 2006 à 20:21 - Dernière réponse : cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention
- 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
cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention - 21 avril 2006 à 20:54
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

Merci cs_casy 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 102 internautes ce mois-ci

Sim 2005 86 Messages postés dimanche 1 mai 2005Date d'inscription 18 juillet 2009 Dernière intervention - 21 avril 2006 à 20:33
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
Sim 2005 86 Messages postés dimanche 1 mai 2005Date d'inscription 18 juillet 2009 Dernière intervention - 21 avril 2006 à 20:34
0
Merci
regarde les events de la form
cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention - 21 avril 2006 à 20:36
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.

themik 40 Messages postés lundi 17 janvier 2005Date d'inscription 10 novembre 2006 Dernière intervention - 21 avril 2006 à 20:36
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
cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention - 21 avril 2006 à 20:40
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

cs_casy 7745 Messages postés mercredi 1 septembre 2004Date d'inscription 24 septembre 2014 Dernière intervention - 21 avril 2006 à 20:45
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

Sim 2005 86 Messages postés dimanche 1 mai 2005Date d'inscription 18 juillet 2009 Dernière intervention - 21 avril 2006 à 20:47
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
themik 40 Messages postés lundi 17 janvier 2005Date d'inscription 10 novembre 2006 Dernière intervention - 21 avril 2006 à 20:51
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.