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.