lm007npg
Messages postés11Date d'inscriptionsamedi 3 août 2002StatutMembreDernière intervention23 mai 2005
-
21 août 2004 à 21:39
Ze_Dam
Messages postés340Date d'inscriptionlundi 8 mars 2004StatutMembreDernière intervention 7 juillet 2005
-
21 août 2004 à 22:10
Bonjour à tous,
Je débute avec les listview.
J'ai créé un list view avec 3 colonnes.
(index de 1 à 3)
Dans la prog d'un bouton, je mets :
Dim xItem As ListItem
Set xItem = ListView1.ListItems.Add(1, , "colonne1")
Set xItem = ListView1.ListItems.Add(2, , "colonne2")
Set xItem = ListView1.ListItems.Add(3, , "colonne3")
Mais il me met ces élément l'un en dessous de l'autre et non l'un a coté de l'autre (dans leur colonne respective).
Ze_Dam
Messages postés340Date d'inscriptionlundi 8 mars 2004StatutMembreDernière intervention 7 juillet 2005 21 août 2004 à 22:08
la propriété View doit être sur 3 - report ensuite le code :
Dim ObjListe As ListItem
With ListView
.ColumnHeaders.Clear
.ListItems.Clear
'''''''''les colonnes"""""""
.ColumnHeaders.Add , , "Type d'info", LargeurEnPixel
.ColumnHeaders.Add , , "Prénom", LargeurEnPixel
.ColumnHeaders.Add , , "Nom", LargeurEnPixel
'''''''''la on va faire la ligne 1 de la colonne 1
Set ObjListe = ListItem.ListItems.Add(, , Je m'appelle)
''''''''la ligne 1 de la colonne 2
ObjListe.SubItems(1) = "Damien"
""""la ligne 1 de la clonne 3
ObjListe.SubItems(2) = "GERARD"