在listview中删除选中行的有关问题

在listview中删除选中行的问题
第一：用以下代码实现，但是不能删除第一行的数据

VB code


Private Sub Cmd_Del_Click()

On Error Resume Next
MsgBox lvSet.SelectedItem.Index

If lvSet.SelectedItem.Index <> 1 Then
    lvSet.ListItems.Remove (lvSet.SelectedItem.Index)
End If
End Sub

第二：用以下代码实现，发现第一次选都没选就发现lvSet.SelectedItem.Selected是true；第二次选就为false了。求解释

VB code


Private Sub Cmd_Del_Click()

On Error Resume Next
'lvSet.SelectedItem.Selected = False

MsgBox lvSet.SelectedItem.Selected


If lvSet.SelectedItem.Selected = True Then
    lvSet.ListItems.Remove (lvSet.SelectedItem.Index)
End If
End Sub

谢谢大侠

------解决方案--------------------
第一个方法是对的。不过删除以后应该设置一个现存的条目为选中，否则没有办法连续删除，除非用户再选中一次。

在listview中删除选中行的有关问题

相关推荐