Question

VB 删除list中的内容

Private Sub Command1_Click()
List1.RemoveItem List1.listindex
End Sub
为什么执行不了？正确应该怎样

Answer 1

因为删除的时候改变了List1.ListCount.修改一下For语句即可： For a = List1.ListCount - 1 To 0 Step -1 另外也不需要Exit For，我帮你改了下代码

Answer 2

可以执行啊，有没有点中LIST里面的项

追问

选择了 List1.RemoveItem List1.text 可以删除list 里的内容吗

追答

是List1.RemoveItem List1.listindex

Answer 3

listindex 意思返回是当前选择项 list1列表你有选择吗？
你应该多了解一下list控件

追问

选择了呢 List1.RemoveItem List1.text 可以删除list 里的内容吗

追答

不可以
list1.text 返回的是你选中的list列表内容
删除 用list1.listcount 或 list1.listindex
list1.listindex 删除当前选择项
list1.listcount 要使用循环 删除全部
如 for a =list1.listcount -1 to 0 step -1 '意思从后往前删 要不然会出错
List1.RemoveItem（a）
next a