OVH Cloud OVH Cloud

colonnes listbox

1 réponse
Avatar
José
Bonjour,
J'importe des données d'une base Access et je voudrais qu'elles apparaissent
dans une ListBox de 2 colonnes.
Pour l'instant j'obtiens le résultat dans 1 seule colonne.
J'ai pourtant mis la propriété ColumnCount de ma listbox à 2. Rien n'y fait
!
Quelqu'un aurait-il une idée ?
D'avance merci.
José

Voici le code que j'utilise.

Do While Not adorecordset.EOF()
UsSupprEleve.ListBox1.AddItem adorecordset!Numero
UsSupprEleve.ListBox1.AddItem adorecordset!Nom
adorecordset.MoveNext
Loop

1 réponse

Avatar
anonymousA
bonjour,

utilises additem pour rentrer une nouvelle donneé puis listbox.list(i,1)
pour rentrer la donnée de la colonne 1 de adorecordset en position
colonne 0 du listbox. L'exemple suivant ( pour une autre configuration,
j'en conviens) peut te donner une idée. En l'occurence, ici il
s'agissait de créer un nouvel enregistrement (Me.ComboBox1.AddItem)dans
un combobox puis de lui passer en colonne 0 la valeur de .Cells(200 + i,
5) puis de mettre en colonne 1 du nouvel enregistrement la valeur de
.Cells(200 + i, 6) . Bien sur le combobox était declaré comme ayant un
columncount=2.
Je pense que tu peux appréhender le principe.

Me.ComboBox1.AddItem .Cells(200 + i, 5) 'on assigne l'incrementation par
additem
Me.ComboBox1.List(i, 1) = .Cells(200 + i, 6) 'on assigne la valeur de la
colonne 1 pour la ligne I

A+

Bonjour,
J'importe des données d'une base Access et je voudrais qu'elles apparaissent
dans une ListBox de 2 colonnes.
Pour l'instant j'obtiens le résultat dans 1 seule colonne.
J'ai pourtant mis la propriété ColumnCount de ma listbox à 2. Rien n'y fait
!
Quelqu'un aurait-il une idée ?
D'avance merci.
José

Voici le code que j'utilise.

Do While Not adorecordset.EOF()
UsSupprEleve.ListBox1.AddItem adorecordset!Numero
UsSupprEleve.ListBox1.AddItem adorecordset!Nom
adorecordset.MoveNext
Loop