Question

各位VB达人.我请教个问题, 在listview1中删除了一个选中的项以后

右键删除
For ii = 1 To Main.ListView1.ListItems.count
If Main.ListView1.ListItems(ii).Selected Then
ListView1.ListItems.Remove (ii)
End If
Next ii

为什么我选中第二项后会这样提示还是我删除的那项呢
同样是右键
For ii = 1 To Main.ListView1.ListItems.count
If Main.ListView1.ListItems(ii).Selected Then
MsgBox Main.ListView1.SelectedItem(ii).Index
End If

急死我了.哪位好心人给解释下啊. 谢谢了.
最后少了一个next ii 是我忘记打在上面的. 不过问题还是存在的.

Answer 1

你删除了一行，那么下一行不就成为首行了，提示框 item 的index 保持不变是对的，另外我不知道你是用控件事件写的，还是自定义函数写的，可能有区别

Answer 2

For ii = Main.ListView1.ListItems.count To 1 step -1
从下往上进行!