Discussion :

[dragondumond]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[charouel]

voila tu peux essayé ce code la

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[chrismonoye]

Bonjour,
inspiré de l'exemple MDSN :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[dragondumond]

En fait j'aurai bien aimé lire les checkBox coché et non-coché !!

[Graffito]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CheckedListBox1.GetItemChecked(i)

[dragondumond]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 !!