سوال مهم لیست باکس vb6

[site-111]

با سلام

یک لیست باکس در فرم دارم در آن یک لیست را لود کردم100 آیتم یا بیشتر یا کمتر لود میکنم این گزینه متغیر هست و میخوام چند آیتم از اونها پاک بشوند و جاشون بدهند به آیتمهای دیگر.....
نمونه لیست اینجور ردیف شده اند:

bbbb+cccc+rrrrr+ppppp
bbbb+cccc+rrrrr+ppppp
bbbb+cccc+rrrrr+ppppp
bbbb+cccc+rrrrr+barnamenevis
bbbb+cccc+rrrrr+barnamenevis
bbbb+cccc+rrrrr+barnamenevis
bbbb+cccc+rrrrr+ppppp
bbbb+cccc+rrrrr+barnamenevis
bbbb+cccc+rrrrr+ppppp
bbbb+cccc+rrrrr+ppppp

میخوام اون آیتمهایی که توش barnamenevis هست پاک شوند

دوستان من خیلی گیرش هستم خیلی فوری هست فوری نیاز دارم :گریه:.... ممنون

[ASedJavad]

سلام

For i=List1.ListCount - 1 To 0 step -1
If List1.List(i) Like "*barnamenevis*" Then List1.RemoveItem i
Next i