hsiko309
Messages postés20Date d'inscriptionmercredi 31 août 2005StatutMembreDernière intervention 5 janvier 2007
-
7 déc. 2006 à 15:24
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 2018
-
7 déc. 2006 à 23:43
Bonjour tous le monde
j'ai un petit problème lors de la fermetur d'un Form, je veux avoir un msgbox (VBOkCancel) qui me demande la confirmation de la fermetur, le problem c'est quand je clique sur cancel, je veux que l'application ne se ferme pas , mais ma memoire m'as trahie, j'arrive pas à le faire
ci dessou le programme que j'ai fais, je ne sais pas quoi mettre là où il y a XXXXXXXXX ,
Private Sub Form_Unload(Cancel As Integer)
Dim a As Integer
a = MsgBox("Vouvlez vous vraiment fermer l'application", vbOKCancel, "Attention!!!!!")
If a = vbOK Then
Unload Me
Else
XXXXXXXXX
End If
End Sub
le cancre
Messages postés292Date d'inscriptionmercredi 25 octobre 2006StatutMembreDernière intervention27 novembre 2009 7 déc. 2006 à 15:36
Private Sub Form_Unload(Cancel As Integer)
Dim a As Integer
a = MsgBox("Vouvlez vous vraiment fermer l'application", vbOKCancel, "Attention!!!!!")
If a = vbOK Then
Unload Me
Else
Cancel = 1
End If
End Sub