Question

VB 删除listview选中项的 但是如果listview中没有任何项目的话 就不删除以免出错

ListView1.ListItems.Remove ListView1.SelectedItem.Index这是代码 但是当listview里面没有任何项目的时候 再执行这段代码就会出错所以我又写了一个判断语句If listview1.listitems(1).text <> "" thenListView1.ListItems.Remove ListView1.SelectedItem.Indexend if但是出错了= =求修改或别的方法

Answer 1

加一个判断 if ListView1.ListItems.Count<>0 then 'listview里的列不等于0 ListView1.ListItems.Remove ListView1.SelectedItem.Index end if

Answer 2

if not(ListView1.ListItems.Count＝0) then
ListView1.ListItems.Remove(ListView1.SelectedItem.Index)
end if

Answer 3

If ListView1.SelectedItem.Index > -1 Then ListView1.ListItems.Remove ListView1.SelectedItem.Index