Per inserire i dati

codice:
Dim item As ListItem
    
Set item = List.ListItems.Add(, , "Pippo")
item.SubItems(1) = "Pluto"
item.SubItems(2) = "Paperino"
Per modificare la prima riga

codice:
List.ListItems(1).Text = "kkk"