Discussion :

[Teddy7]

Bonjour,

Lorsque je clic sur la croix rouge en haut à droite d'une fenêtre, je me débranche sur une autre form sur laquelle je demande confirmation de quitter. Si "oui", pas de problème tout se ferme (les 2 fenêtres donc), mais si "non", je ne sais pas comment gérer ce paramètre et revenir sur la première form (donc finalement ne pas la fermer) tout en fermant la deuxième !?
voici mon début de code (pas très abouti )
Sur la formA

Code :

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

1
2
3
4
5
6
7
 
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  Select Case UnloadMode  
      Case Is = vbFormControlMenu 
              frmMess01.Show 1
      End Select
End Sub

et sur la forme frmMess01

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub cmdNon_Click()
    revenir = 0
    sortir
End Sub
...
Private Sub sortir() 
If revenir = 0 Then
    Unload Me
End If
End Sub

mais il me manque certainement qlqchose

[SfJ5Rpw8]

il faut "mettre" cancel à 1.. pour abandonner la sortie ...

bizarre ton utilisation d'un select case avec une seule condition pourquoi pas un if ?

[Delbeke]

D'après ce que je vois dans ta frmMess01, tu utilises la variable revenir pour savoir si tu dois quitter ou pas l'application.
Mais je ne vois pas comment la variable revenir peut avoir la valeur 1 (ne pas quitter)

Ne srait il pas plus simple d'utiliser un simple messagebox dans ton QuerryUnload ?

Code :

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

1
2
3
4
5
6
7
8
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  Select Case UnloadMode  
      Case Is = vbFormControlMenu 
              If MsgBox("Vous allez quitter le programme. Confirmez vous votre demande",VbYesNo + VbQuestion) = VbNo then
                  Cancel = True
             End If
      End Select
End Sub

[Teddy7]

Merci Bbil, je ne connaissais pas 'cancel', ok ca marche impec. Mille mercis

Delbeke, en faite j'alimente la variable 'revenir' selon que l'utilisateur à demander ou pas (2 boutons), et j'utilise une form car l'utilisateur peut choisir de 'ne plus afficher ce message'. Sinon, oui ta solution est bc plus simple !

Merci de votre aide