منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(09-04-20, 07:13 PM)ابو ليلى كتب : [ -> ]السلام عليكم و رحمة الله و بركاته
جرب استخدام الكود :

PHP كود :

   Private Sub RemoveDuplicate(_ListBox As ListBox)
        For postion As Integer = 0 To _ListBox.Items.Count - 2
            For postion2 As Integer = _ListBox.Items.Count - 1 To postion + 1 Step -1
                If _ListBox.Items(postion).ToString = _ListBox.Items(postion2).ToString Then
                    _ListBox.Items.RemoveAt(postion2)
                End If
            Next
        Next
    End Sub 


(09-04-20, 07:49 PM)ابو روضة كتب : [ -> ]

زيادة على حل استاذ أبو ليلى تابع هذه الحلول

http://vb4arb.com/vb/showthread.php?tid=30804