récupere les éléments cochés dans un CheckBoxList

salut tt le monde,

voilà mon code :

Code:

---

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

Private Sub valider_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles valider.Click Dim i As Integer Dim rep(3) As String For i = 0 To CheckReponses.Items.Count - 1 If (CheckReponses.SelectedIndex = i) Then Rep(i) = CheckReponses.SelectedValue End If Next For Each o As String In Rep LblTest.Text = LblTest.Text + o Next   End Sub

---

mon pb c'est que le label LblTest ne contient que le 1er élément coché. :cry:

Merci pour votre aide.

SelectedIndex te retourne que l'index du 1er item sélectionné

Merci pou l'info
j'ai changé la boucle mais il y a tjs un pb

Code:

---

1 2 3 4 5 6 7 8 9 10

For i = 0 To CheckReponses.Items.Count - 1 If (CheckReponses.Items.Item(i).Selected = True) Then Rep(i) = CheckReponses.SelectedValue End If Next   For Each o As String In Rep LblTest.Text = LblTest.Text + " " + o Next

---

LblTest contient seulement le 1er élément coché autant de fois que le nombre d'éléments cochés !

SVP proposez moi une solution

Bah oui, même réponse que précédemment

vous m'avez dit que SelectedIndex ne retoune que le 1er élément coché sauf qu'après j'ai utilisé Iems.Item(index).Selected .

autre question : est ce que ce traitement doit se faire dans un évènement spécifique à CheckBoxList ??

Citation:

---

Envoyé par I.Z.M.M

vous m'avez dit que SelectedIndex ne retoune que le 1er élément coché sauf qu'après j'ai utilisé Iems.Item(index).Selected .

---

Code:

---

1 2 3 4

If (CheckReponses.Items.Item(i).Selected = True) Then Rep(i) = CheckReponses.SelectedValue End If

---

Enfin c résolu !
:yaisse2::yaisse2::yaisse2:
voilà le nouveau code:

Code:

---

1 2 3 4 5 6

For Each o As ListItem In CheckReponses.Items If (o.Selected = True) Then LblTest.Text = LblTest.Text + " " + o.Text End If Next

---