listview1中有3条记录,其中第2行的第8列的值为0,执行下列语句,就提示索引超出边界 次时i=3cout= ListView1.ListItems.Count
For i= 1 To cout
If listview1.listitems(i).listsubitems(8).text=0 Then
ListView1.ListItems.Remove i
End If
cout=ListView1.ListItems.Count
Next
For i= 1 To cout
If listview1.listitems(i).listsubitems(8).text=0 Then
ListView1.ListItems.Remove i
End If
cout=ListView1.ListItems.Count
Next
For i=0 To cout-1
If listview1.listitems(i).listsubitems(8).text=0 Then
ListView1.ListItems.Remove i
End If
cout=ListView1.ListItems.Count
Next