Ajout d'item dans une listview

Résolu
talking Messages postés 343 Date d'inscription dimanche 30 novembre 2003 Statut Membre Dernière intervention 19 août 2006 - 18 août 2005 à 12:13
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 18 août 2005 à 13:39
Voilà bonjour tout le monde. Donc j'ai un petit probléme dont je n'ai pas la trouvé la réponse sur ce site. J'utilise le controle listview (SP2) mais je n'arrive pas à ajouter du text. Donc admettons que j'ai 2 colones : Test1 et Test2 et que ma listview s'appelle ListView1
Comment faire pour admettons ajouter Premier Test et Deuxiéme Test. J'ai essayé avec un subitems masi sans résultat

Merci d'avance

5 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
18 août 2005 à 12:44
jamais utilisé ça:

pourquoi faut-il mettre la library devant ????



Dim Ligne As ComctlLib.ListItem


'ou comme ça

Set Ligne = LV.ListItems.Add

Ligne.Text = "test1"

Ligne.SubItems(1) = "test2"


Daniel
3
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
18 août 2005 à 12:24
Dim Ligne As ListItem

Set Ligne = ListView1.ListItems.Add(, , "test1")

Ligne.SubItems(1) = "test2"


Daniel
0
talking Messages postés 343 Date d'inscription dimanche 30 novembre 2003 Statut Membre Dernière intervention 19 août 2006 1
18 août 2005 à 12:30
Merci de ta réponse. J'ai testé avec une listview (SP4) ça marche impécable. Mais par contre quand je mes celle du SP2, ça me dit type incompatible.
PS : j'utilise la listview du SP2 pour pouvoir obtenir un look Xp avec un manifest
0
talking Messages postés 343 Date d'inscription dimanche 30 novembre 2003 Statut Membre Dernière intervention 19 août 2006 1
18 août 2005 à 12:47
C'est impécable merci
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
18 août 2005 à 13:39
Bonjour,

Tu peux faire ceci aussi.



Private Sub Form_Load()

ListView1.View = lvwReport

Dim itmX

ListView1.ColumnHeaders.Add , "Test1", "Test1"

ListView1.ColumnHeaders.Add , "Test2", "Test2"

Set itmX = ListView1.ListItems.Add(1, "Données1", "Données1")

itmX.SubItems(ListView1.ColumnHeaders("Test2"). _

SubItemIndex) = "Données2"

End Sub



jpleroisse
0