Recuperer le nom d'une checkbox coché

Salut.

Tout est dans le titre.
J'ai plusieur checkbox et j'aimerai récupérer le nom de la checkbox coché, puis l'événement décoché).

Voila le code que j'ai mais il me liste toute les checkboxs alors que je veux juste celle qui viens de changer d'etat.

Code:

---

1 2 3 4 5 6 7 8

Dim ensemble_checkbox As New CheckBox For Each ensemble_checkbox In GroupBox_checkbox.Controls If (ensemble_checkbox.CheckState = 1) Then MsgBox("check") Else MsgBox("non check") End If Next ensemble_checkbox

---

ca sent le code de nimp

il y a un evenement checkchanged, autant faire le traitement dedans

sinon ensemble_checkbox.name ...

Je dirais même mieux

Code:

---

MsgBox(Me.ActiveControl.Name.ToString)

---

Merci à toi pour ta réponse. ;)

ah non
activecontrol est le control actif, selon ou ton traitement se trouve, ca ne sera peut etre meme pas un checkbox

de plus, name est string, alors pourquoi faire tostring dessus ?? 8O

Alors j'ai du mal formuler ma question car activeControl correspond à mes besoin.

Dès que je coche une checkbox, ça me donne son nom.
Alors je test avec le checkstates pour voir si la case est coché ou décoché et c'est bon...

C'est vrai pour le Tostring :oops:, à force de faire des test, j'ai du le laisser.

le code que tu nous as mis, il est dans quelle sub ?
car s'il est dans un évènement, sender représente l'objet qui envoie l'évènement


et sinon Dim ensemble_checkbox As New CheckBox
il ne faut pas de new, sinon tu créé un checkbox pour rien !

Citation:

---

Envoyé par sperot51

le code que tu nous as mis, il est dans quelle sub ?

---

Code:

---

Private Sub group_chechbox(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox_ca.CheckedChanged, CheckBox_ms.CheckedChanged

---

Citation:

---

Envoyé par sperot51

et sinon Dim ensemble_checkbox As New CheckBox
il ne faut pas de new, sinon tu créé un checkbox pour rien !

---

Sinon j'ai l'avertissement

Citation:

---

Avertissement 1 Variable locale inutilisée*: 'ensemble_checkbox'. D:\Gestion\Form_stat.vb 152 13 Gestion

---

Citation:

---

Envoyé par afrodje

Code:

---

Private Sub group_chechbox(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox_ca.CheckedChanged, CheckBox_ms.CheckedChanged

---

---

c'est bien ce que je dis, c'est un évenement, donc sender représente le checkbox qui vient de changer d'état (à caster)

Citation:

---

Envoyé par afrodje

Sinon j'ai l'avertissement

---

au lieu de faire nimp il faut essayer de comprendre les choses

Code:

---

Dim ensemble_checkbox As CheckBox = Nothing

---

et tu n'auras plus l'avertissement

Merci