Programmer un bouton pour quitter mon application. [Résolu]

Messages postés
4
Date d'inscription
jeudi 7 février 2008
Statut
Membre
Dernière intervention
8 février 2008
- - Dernière réponse : spgj
Messages postés
4
Date d'inscription
jeudi 7 février 2008
Statut
Membre
Dernière intervention
8 février 2008
- 8 févr. 2008 à 11:30
Bonjour,

Etant débutant en VB et malgré de nombreuse recherches sur Internet et de nombreux essais infructueux, je n'arrive pas à programmer un bouton pour quitter mon application avec demande de validation !
Voici ce que j'ai commencé à écrire :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim ReponseQuitter As Integer
        MessageBox.Show("Voulez vous vraiment quitter ?", "Quitter ""Calcul FC Max.""", _
                    MessageBoxButtons.YesNo, MessageBoxIcon.Question)

        ' Comment faire pour quitter l'application si ReponseQuitter = DialogResult.Yes
        ' Comment faire pour revenir à l'application si ReponseQuitter = DialogResult.No

    End Sub

Merci d'avance.

SPGJ
Afficher la suite 

8 réponses

Meilleure réponse
Messages postés
14594
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
16 novembre 2019
137
3
Merci
Bonjour

Tu as oublier d'assigner ReponseQuitter :
ReponseQuitter=Messagebox.......

Dans Word, j'Excel. (juste pour la citation)
VB (6, .NET1&2), C++, C#.Net1

Dire « Merci » 3

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

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

Commenter la réponse de NHenry
Messages postés
918
Date d'inscription
vendredi 3 août 2007
Statut
Membre
Dernière intervention
27 octobre 2008
9
1
Merci
En VB2005 on fera plutôt un truc du genre ...

Dim Rep As DialogResult

Rep = MessageBox.Show( ......)

If Rep = DialogResult.Yes Then
' Procédue de fin de ton programme
' Mais surtout pas de End !!!
End If

Kakenette < Désolé, hein ! Mais je suis allergique au End et au code VB6 dasn un projet VB.NET.
Commenter la réponse de Kristof_Koder
Messages postés
14594
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
16 novembre 2019
137
1
Merci
Bonjour

Tu ferme tous tes formulaires :
Me.Close().

Dans Word, j'Excel. (juste pour la citation)
VB (6, .NET1&2), C++, C#.Net1
Commenter la réponse de NHenry
Messages postés
218
Date d'inscription
dimanche 1 mai 2005
Statut
Membre
Dernière intervention
15 novembre 2009
1
0
Merci
If MsgBox("Voulez-vous quitter?", vbInformation + vbYesNo, "Titre") = vbYes Then

    Rem ICI TA PROCEDURE POUR TERMINER
    End ' Je met END pour quitter

End If

kakenette
Commenter la réponse de kakenette
Messages postés
4
Date d'inscription
jeudi 7 février 2008
Statut
Membre
Dernière intervention
8 février 2008
0
Merci
Ok, merci à vous.

Désolé si j'ai oublié de préciser que je suis en VB.NET (2005).
Par contre, pour éviter "End", quelle est le code le plus approprié en VB.NET ?

SPGJ
Commenter la réponse de spgj
Messages postés
4
Date d'inscription
jeudi 7 février 2008
Statut
Membre
Dernière intervention
8 février 2008
0
Merci
ok, j'ai tout compris... sauf que si je clic sur le bouton "Oui" ça ne fermer que la fenêtre du message, pas l'application !
donc, j'ai pas tout compris !!!

il y à forcement quelque chose que je ne fais pas comme il faut, si je fais juste ça, ça fonctionne :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Me.Close()

    End Sub
Mais je cherche à avoir une confirmation avant de quitter.
Voici mon code :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim ReponseQuitter As DialogResult
        MessageBox.Show("Voulez vous vraiment quitter ?", "Quitter ""Calcul FC Max.""", _
        MessageBoxButtons.OKCancel, MessageBoxIcon.Question)

        If ReponseQuitter = DialogResult.Yes Then
            Me.Close()
        End If

    End Sub

Si quelqu'un peu encore m'aider un petit peu.

SPGJ
Commenter la réponse de spgj
Messages postés
4
Date d'inscription
jeudi 7 février 2008
Statut
Membre
Dernière intervention
8 février 2008
0
Merci
Merci à tous, ça fonctionne parfaitement... erreur de débutant (étourderie).

SPGJ
Commenter la réponse de spgj
Messages postés
918
Date d'inscription
vendredi 3 août 2007
Statut
Membre
Dernière intervention
27 octobre 2008
9
-2
Merci
Il n'y a pas de code standard, mais pour fermer une appli proprement, il faut toujours :
1- arrêter tous les timers
2- décharger tous les objets instanciés
3- fermer tous les fichiers ouverts
4- fermer toutes les connexion à des sources de données
5- décharger toutes les formes
Commenter la réponse de Kristof_Koder