Originariamente inviato da Rosy23
ad esempio cosa apparentemente banale se io volessi creare solo una colonna con n righe che aggiorno con il metodo add come faccio?
Prova così:
codice:
Private Sub Form_Load()
LV.View = lvwReport
LV.ColumnHeaders.Add
LV.ColumnHeaders.Item(1).Width = 0
LV.ColumnHeaders.Add , , "Colonna 1"
End Sub
Private Sub Command1_Click()
Dim Cont1 As Integer
LV.ListItems.Clear
For Cont1 = 1 To 6
LV.ListItems.Add
LV.ListItems.Item(Cont1).SubItems(1) = CStr(Cont1)
Next Cont1
End Sub