metalman
-
13 août 2001 à 17:24
spaa05
Messages postés148Date d'inscriptionmardi 14 novembre 2000StatutMembreDernière intervention26 juillet 2005
-
22 mai 2005 à 04:35
Existe-t-il un moyen pour créer plusieurs colonnes dans une listbox? Sinon existe-t-il une autre méthode?
akhiro
Messages postés15Date d'inscriptionlundi 11 février 2002StatutMembreDernière intervention22 juin 2002 9 juil. 2002 à 20:12
Salut
Tu dois changer la propriété count de l'objet column
donc : column.count= tonnombredecolonnesvisible
un petit exemple d'un de mes projet :
sql2 = "select * from telephone where numfiche=" & menu.Label2
Set rs2 = db.OpenRecordset(sql2, dbOpenDynaset)
If rs2.EOF Then
Else
i = 0
rs2.MoveFirst
list1.ColumnCount = 3
Do While rs2.EOF = False
list1.AddItem rs2!tel
list1.Column(1, i) = "Tel"
list1.Column(2, i) = rs2!typtel
list1.Column(3, i) = rs2!numtel
rs2.MoveNext
i = i + 1
Loop
End If
rs2.Close
ATTENTION dans cet exemple j'utilise en fait 4 colonnes, masi seules les 3 premières sont affichées, la 4ème reste cachée et me sert uniquement pour l'affichage d'une donnée de ma table téléphone, en l'occurence numtel corespondant au N° d'occurence de la table télephonne.
Voila, jespère que j'ai pu t'aider :-)
PS : J'utilise l'objet Listbox des composants Microsoft Forms 2.0 object Library
akhiro
Messages postés15Date d'inscriptionlundi 11 février 2002StatutMembreDernière intervention22 juin 2002 9 juil. 2002 à 20:23
Oups j'ai fait une petite boulette :-(
Tu dois changer la valeur de la propriété columnCount, et non la propriété Count de l'objet Column..
Donc listbox1.ColumnCount = 3
et non listbox1.Column.Count = 3
MAis bon, je pense que tu aurait compris avec l'exemple...
AKHIRO