哪错了?????
Private Sub Form_Load()For i = 1 To 10
ListView1.Refresh
ListView1.ListItems.Add
ListView1.ListItems(i).Text = "f"
ListView1.ListItems(i).SubItems(1) = "b"
ListView1.ListItems(i).SubItems(2) = "c"
ListView1.ListItems(i).SubItems(3) = "c"
ListView1.ListItems(i).SubItems(4) = "d"
Next i
End Sub