Est-il possible de travailler avec des index dans les checkboxes ?

Bonjour tout le monde,

J'essaie de comprendre le fonctionnement des checkboxes.

J'ai ce code :

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Check1_Click(Index As Integer) MsgBox ("le nombre de boules est de " & NbDeBoulesMax) NbDeBoulesMax = NbDeBoulesMax - 1 If checkGout.Item(Index) = 1 Then If NbDeBoulesMax = 0 Then MsgBox ("vous ne pouvez pas choisir plus de " & NbDeBoulesMax & "boule(s)") End If End If End Sub

---

Les propriétés d'un checkbox sont :

Citation:

---

Count
Item
Lbound
Ubound

---

Je me demandais si il était possible d'indiquer quel checkbox a été sélectionnée ou au contraire désélectionnée et ce, via un numéro d'index ?

J'ai essayé ceci :

Code:

---

If checkGout.Item(Index) = 1 Then

---

Qui ne m'aide pas beaucoup.

Auriez-vous une idée ?

Merci d'avance.

beegees

Salut,

Si je comprends, tu as plusieurs checkbox de même nom avec des index ?

Tu parcours la collection des checkbox :

Code:

---

1 2 3 4 5 6 7 8

For i = 0 to uBound(checkGout) -1 If checkGout.Item(i).Value = 1 then MsgBox "Coché" else MsgBox "Décoché" end if Next i

---

Bonjour,

Et je pourrai ajouter au commentaire judicieux de pc75 de faire attention d'assigner ta variable 'index' en début de form pour que sa valeur soit reconnue dans les autres sub

A+

Code:

---

1 2 3 4 5 6 7 8

'For i = 0 to uBound(checkGout) -1 <=== provoque une erreur For i = 0 To checkGout.Count - 1 If checkGout.Item(i).Value = 1 Then MsgBox "Coché" Else MsgBox "Décoché" End If Next i

---

A savoir que

Code:

---

If checkGout(i).Value = 1 Then

---

rend le même service, sans avoir a spécifier .Item ;)

Salut à tous,

Un tout GRAND merci pour vos réponse.

Mon problème est maintenant résolu.

Je n'avais pas compris que l'on pouvait utiliser check.item(i).value.

Je le sais maintenant pour la prochaine fois.

Encore un tout grand merci à vous.

beegees