Discussion :

[megamario]

Bonjour à vous tous,

Je remplis une CheckedListBox et j'aimerai que certain des Items que j'ajoute sois déjà checker.

J'ai déjà crée quelque chose et il me semblais que cela marchait,... ce qui doit pas être le cas mais voici ce que j'ai fait:

Code :

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

1
2
3
4
5
6
7
8
 
            Me.CheckedListBoxMesures.Items.Clear()
            While (CollMesure.Count - 1) >= i
                Me.CheckedListBoxMesures.Items.Insert(i, CollMesure.Keys(i))
                Co = CollMesure(CollMesure.Keys(i))
                Me.CheckedListBoxMesures.SetItemChecked(i, Co.Selection)
                i = i + 1
            End While

CollMesures est une Hashtable avec sa Key et en value c'est un Objet contenant divers variables, et Co étant le même type d'objet contenu dans l'hashtable. Dont "Selection" qui est un booleen et doit indiquer si le nouvel Items est checker ou pas.

merci de votre aide

[cougarg]

Bonjour,

Je n'ai pas essayé, mais ton code a l'air correct, pourtant.

Sinon, si tes items sont insérés dans l'ordre, pourquoi ne pas utilisé une boucle for et la méthode add des checkListBox.

Code :

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

1
2
3
4
5
Me.CheckedListBoxMesures.Items.Clear()
For Each cle as String in CollMesure.Keys
     Co = CollMesure(cle)
     Me.CheckedListBoxMesures.Items.Add(cle, Co.Selection)
Next

[megamario]

Je vous remercie fortement,

Effectivement je sais pas pourquoi j'ai utilisé "Insert". j'ai du faire sa au debut de mon codage, ou je decouvrais le VB et .net. et j'ai pas réagi la dessus.
C'est quand même bien plus facile comme sa et en plus sa marche..


Encore merci

[Masamunai]

Bonjour,

J'essaie de faire la même chose, mais à partir d'une colonne de DataTable.

Je me heurte à un problème de TYPE, càd que la méthode AddRange() des CheckedListBox n'accepte qu'un array de String.
Je n'arrive pas non plus à convertir "à la volée" un Objet de type DataColumn en array de string...

Code :

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

1
2
        Me.Buffs1CheckedListBox.Items.AddRange(CType(Me.DataSet.Buffs.NameColumn, ListBox.ObjectCollection))
' Erreur: Option Explicit On empeche la conversion d'un objet de type  DataColumn en objet de type Lisbox.objectcollection

(NameColumn étant la colonne clé primaire automatiquement créée lors de l'importation de ma datatable)

Quelle est la bonne syntaxe svp ? (je préfererait éviter de devoir remplir une variable temp dans une boucle comme ci-dessus... du remplissage "direct" si possible)


EDIT: j'ai trouvé une syntaxe qui marche mais apparemment obligé d'utiliser une boucle...

Code :

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

1
2
3
4
5
        For Each Row As DataRow In Me.DataSet.Buffs.Rows
            Me.Buffs1CheckedListBox.Items.Add(Row.Item("Name"))
            Me.Buffs2CheckedListBox.Items.Add(Row.Item("Name"))
            ...
        Next

Buffs est le nom de la datatable dans le DataSet, laquelle fournit les données nécessaire aux checkedlistboxs Buffs1, Buffs2, etc...