Question

VB listbox删除指定内容

VB的listbox有很多数据，比如
狗
马
猪
牛
羊
……
这些数据的排列显示顺序每次都不一定的，如果我想指定的删除某一项，比如猪
该如何做呢？
谢谢高人
请给代码！

Answer 1

private sub list1_Dblclick()
if list1.listindex >-1 then list1.removeitem list1.listindex
end sub

双击删除选中的项目

Answer 2

Option Explicit

Private Sub Command1_Click()
Dim i
For i = List1.ListCount - 1 To 0 Step -1
If List1.List(i) = "猪" Then List1.RemoveItem i
Next
End Sub