+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111)
+---- قسم : مكتبة أكواد .net (http://vb4arb.com/vb/forumdisplay.php?fid=117)
+---- الموضوع : الحذف من ArrayList (/showthread.php?tid=6119)
الحذف من ArrayList - RaggiTech - 17-10-12
كاتب الموضوع : AhmedEssawy
كود :
Dim count As Integer = myArrayList.Count
Dim i As Integer = 0
Do While (i < count)
Dim item As myArrayListItem = CType(myArrayList(i),myArrayListItem)
If (myArrayListItem.MyPropery > someValue) Then
myArrayList.RemoveAt(i)
count = (count - 1)
Else
i = (i + 1)
End If
Loop