Fai una prova: apri un nuovo progetto di VB e inserisci un form sul quale disegni una ListView. Nell'evento Form_Load scrivi questo codice:
codice:Private Sub Form_Load() Dim itm As ListItem Dim sItm As ListSubItem ListView1.View = lvwReport Call ListView1.ColumnHeaders.Add(Text:="Prima colonna") Call ListView1.ColumnHeaders.Add(Text:="Seconda colonna") Set itm = ListView1.ListItems.Add(Key:="C1", Text:="Uno") Set sItm = itm.ListSubItems.Add(Key:="C11", Text:="Colonna") End Sub