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

نسخة كاملة : التحقق من و جود item فى الlistbox
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
التحقق من و جود item فى الlistbox اخر  اريد ان يتم التحقق ما بين الاثنان listbox اذا كان نفس ال item موجوده فى الاثنان اذا كان هناك item ليسه موجوده فى احد ال listbox يتم ازالتها من الاخرى

كود للتوضيح

كود :
       For Each item In ListBox2.Items
           If ListBox1.Items.Contains(item) Then
               MsgBox(0)
           Else
               ListBox1.Items.RemoveAt(item)
                          End If
       Next
النصوص المشتركه في الاثنتين فقط 

PHP كود :
For ListBox1.Items.Count 1 To 0 Step -1
            If ListBox2
.FindString(ListBox1.Items(i)) = -1 Then ListBox1.Items.RemoveAt(i)
 
       Next
        For i 
ListBox2.Items.Count 1 To 0 Step -1
            If ListBox1
.FindString(ListBox2.Items(i)) = -1 Then ListBox2.Items.RemoveAt(i)
 
       Next 
اذا كنت تريد ازالة التكرار من  ListBox استعمل هذا
PHP كود :
Dim lst As New List(Of String)
 
       lst.AddRange(ListBox1.Items.Cast(Of String).ToArray)
 
       ListBox1.Items.Clear()
 
       ListBox1.Items.AddRange(lst.Distinct.ToArray
(27-11-15, 01:00 AM)HASAN6.0 كتب : [ -> ]النصوص المشتركه في الاثنتين فقط 

PHP كود :
For ListBox1.Items.Count 1 To 0 Step -1
            If ListBox2
.FindString(ListBox1.Items(i)) = -1 Then ListBox1.Items.RemoveAt(i)
 
       Next
        For i 
ListBox2.Items.Count 1 To 0 Step -1
            If ListBox1
.FindString(ListBox2.Items(i)) = -1 Then ListBox2.Items.RemoveAt(i)
 
       Next 
اذا كنت تريد ازالة التكرار من  ListBox استعمل هذا
PHP كود :
Dim lst As New List(Of String)
 
       lst.AddRange(ListBox1.Items.Cast(Of String).ToArray)
 
       ListBox1.Items.Clear()
 
       ListBox1.Items.AddRange(lst.Distinct.ToArray

جزاك الله خير