Lire les éléments d'une CheckedListBox

Version imprimable

06/06/2013, 16h25
dragondumond

Lire les éléments d'une CheckedListBox
Bonjour,

Alors pour expliquer vite fait mon besoin je vais tous de meme prendre le temps de détailler ce que je fais, j'ai une Form composé d'une CheckedListBox qui est remplie directement lors de son chargement par un certain nombre de checkbox. cette étape marche très bien mais au moment de fermer ma Form j'ai besoin de lire l'état, le nom et l'index de mes checkbox qui se trouve dans ma CLB. J'ai commencer le programme mais j'arrive pas a retirer les information qui m’intéresse !!
Code:

1 2 3 4 5 For i = 0 To CheckedListBox1.Items.Count - 1 . . . Next

voila tu peux essayé ce code la

Code:

1
2
3
4
5
6
7
8
9
If CheckedListBox1.CheckedItems.Count <> 0 Then
   ' If so, loop through all checked items and print results.
   Dim x As Integer
   Dim s As String = ""
   For x = 0 To CheckedListBox1.CheckedItems.Count - 1
      s = s & "Checked Item " & (x + 1).ToString & " = " & CheckedListBox1.CheckedItems(x).ToString & ControlChars.CrLf
   Next x
   MessageBox.Show(s)
End If

Bonjour,
inspiré de l'exemple MDSN :

Code:

1
2
3
4
5
6
7
        For Each itemCheck In CheckedListBox1.Items
 
            ' Use the IndexOf method to get the index of an item.
            MessageBox.Show("Title : " & itemCheck.ToString() & Environment.NewLine & _
                            "Index : " & CheckedListBox1.Items.IndexOf(itemCheck).ToString & Environment.NewLine & _
                            "State : " & CheckedListBox1.GetItemCheckState(CheckedListBox1.Items.IndexOf(itemCheck)).ToString() & ".")
        Next

06/06/2013, 17h33
dragondumond

En fait j'aurai bien aimé lire les checkBox coché et non-coché !!
06/06/2013, 21h27
Graffito

Code:

CheckedListBox1.GetItemChecked(i)

Enfin de compte le post de chrismonoye était exactement ce que j'avais besoin, je le recommande pour ceux qui avais le même souci que moi !!

Je poste tous de même mon code :

Code:

1
2
3
4
5
6
7
8
9
10
11
    Private Sub CopierEtatCheckBoxDansDico()
        For Each itemCheck In CheckedListBox1.Items
            If CheckedListBox1.GetItemCheckState(CheckedListBox1.Items.IndexOf(itemCheck)).ToString() = "Checked" Then
                DicoColonne.Item(itemCheck.ToString()).Etat = True
                DicoColonne.Item(itemCheck.ToString()).Index = CheckedListBox1.Items.IndexOf(itemCheck).ToString
            Else
                DicoColonne.Item(itemCheck.ToString()).Etat = False
                DicoColonne.Item(itemCheck.ToString()).Index = CheckedListBox1.Items.IndexOf(itemCheck).ToString
            End If
        Next
    End Sub

Comme le nom de la procédure l'indique, je copie l'état et l'index des checkbox dans un Dico !!