Discussion :

[storm_2000]

Bonjour, j'aimerais savoir comment rajouter des item et subItems à un listView une fois le programme lancé ? merci ?

Pour le moment je voulais utiliser ca :

Code :

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

1
2
3
4
 
    Set itmX = lstStock.ListItems.Add()
    itmX.Text = DateOP
    itmX.SubItems(1) = "dsqdsd"

mais ca ne marche pas.

[SilkyRoad]

bonjour

tu peux essayer ce type de syntaxe

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Command1_Click()
    Dim i As Integer
 
    i = ListView1.ListItems.Count + 1
 
    With ListView1
        .ListItems.Add , , "Nouvelle donnée"
        'Remplissage de la 2eme colonne
        .ListItems(i).ListSubItems.Add , , "Ville x"
         'Remplissage de la 3eme colonne
        .ListItems(i).ListSubItems.Add , , 99
    End With
End Sub

michel

[storm_2000]

désolé mais ca ne marche pas.
Si cela peut aider, j'ai exporter La Common Control 5.0