Comment vérifier si un bouton à bien été cliqué ?

Bonsoir à tous,

Je voudrais savoir si quelqu'un aurait une idée :
J'ai un bouton btnOK et un bouton btnQuitter,
Le bouton btnOK sert à l'enregistrement sur une base Access 2010,
Le bouton btnQuitter peut faire deux choses :
Soit il quitte l'application directement à condition que l'enregistrement à déjà été fait,
ou bien il affiche une boîte de dialogue pour proposer l'enregistrement.

Pour ce faire il faudrait déjà qu'il sache s'il y a eu un enregistrement !!!
Voici le code pour vous donnez une idée :

Code:

---

1 2 3 4 5

If btnOK.Click Then 'bouton ok Then Me.Close() 'fermer l'application Else bdAvertissement.Show() 'afficher un avertissement End If

---

bdAvertissement est ma boîte de dialogue qui ne doit s'affiche que s'il n'a pas eu d'enregistrement, autrement dit, si le bouton ok a été cliqué alors l'enregistrement a déjà été fait donc l'application peut se fermer sans Avertissement.

Quelqu'un pourait-il m'aider s'il vous plais ???
Merci d'avance

Bonjour,

Il faut définir au niveau de la form une variable Private du genre HasBeenSaved as Boolean et passer cette variable à True dans le click du bouton OK.
Il ne reste qu'à tester cette variable dans le bouton Quitter et le tour est joué.

Citation:

---

Envoyé par ebastien

Bonjour,

Il faut définir au niveau de la form une variable Private du genre HasBeenSaved as Boolean et passer cette variable à True dans le click du bouton OK.
Il ne reste qu'à tester cette variable dans le bouton Quitter et le tour est joué.

---

Pour illustrer la judicieuse proposition d'ebastien :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private btnOKClicked As Boolean = False   Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click   btnOKClicked = True   End Sub   Private Sub BtnQuitter_Click(sender As Object, e As EventArgs) Handles BtnQuitter.Click   If btnOKClicked Then Me.Close() Else bdAvertissement.Show() 'afficher un avertissement End If   End Sub

---

Bonjour
on peut fermer l'application en cliquant sur le X aussi

Code:

---

1 2 3 4 5 6 7

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing If not btnOKClicked Then e.cancel = true bdAvertissement.Show() 'afficher un avertissement End If   End sub

---

Merci à tous grâce à vous cela s'est résolu très rapidement...
Voici le code final :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Private btnOKClicked As Boolean = False   Private Sub btnOK_Click(sender As System.Object, e As System.EventArgs) Handles btnOK.Click Call nbActes() Call enregistrement() btnOKClicked = True End Sub   Private Sub btnQuitter_Click(sender As System.Object, e As System.EventArgs) Handles btnQuitter.Click If btnOKClicked Then 'boutton ok Then End Else bdAvertissement.Show() End If 'http://www.developpez.net/forums/d1417966/dotnet/langages/vb-net/verifier-bouton-bien-ete-clique/#post7704117 End Sub

---

Citation:

---

Envoyé par shayw

Bonjour
on peut fermer l'application en cliquant sur le X aussi

Code:

---

1 2 3 4 5 6 7

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing If not btnOKClicked Then e.cancel = true bdAvertissement.Show() 'afficher un avertissement End If   End sub

---

---

Que veux-tu dire par "On peut fermer cette application en cliquant sur X" ?

Citation:

---

Envoyé par nadong

Que veux-tu dire par "On peut fermer cette application en cliquant sur X" ?

---

shayw voudrait dire par là, la croix rouge (en haut à droite) permettant de fermer un formulaire. Si tu ne gères pas l'event FormClosing, tu auras le warning que lorsque le user aura cliqué sur ton bouton btnQuitter. Mais à supposer que le user quitte le formulaire en cliquant sur la croix rouge, et bien même si ta variable btnOKClicked est égale à True, tu peux dira adieu à ton warning form :P