حذف گزینه از ListBox

[alizanganeh]

سلام
میخوام یک گزینه ی خاص رو از توی لیست باکس حذف کنم
مثلا دارم جستجو میکن توش و میخوام بگم مقدار فلان متغیر اگر توش بود حذفش کن
این دستور حذف چیه؟
listbox.clear که کلشو پاک میکنه
listbox.removeitem name زدم نشد
name= یک متغیر
چه کنم؟

[Veteran]

یک مثال ساده
Private Sub Command1_Click()
Dim Str As String
Str = "Item: 3"
For i = 0 To List1.ListCount - 1
If List1.List(i) = Str Then List1.RemoveItem i
Next
End Sub
Private Sub Form_Load()
For i = 1 To 10
List1.AddItem "Item: " & i
Next
End Sub

[SlowCode]

به جاي name بايد يه ايندكس بنويسي مثلا براي حذف دومين مورد بايد به جاي name عدد 1 رو وارد كني.
كد زير رو بررسي كن:
For i = 0 To List1.ListCount
If InStr(1, List1.List(i), "ali") <> 0 Then List1.RemoveItem i
Next