تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استخراج الاسطر المتشابهة
#1
Exclamation 
     السلام عليكم ورحمة الله وبركاته



اريد من اخوتي الكرام  كود لاستخراج الاسطر المتشابهة  في listbox1 ووضعا فيlistbox2 مثلا

   

                                             اكون شاكر لكم على مساعدتي  Shy
الرد
تم الشكر بواسطة: egypt 2020
#2
السلام عليكم اخي الكريم
تفضل هذا الكود سيقوم بفحص الليست بوكس الاولى وكل عنصر مكرر سيضعه في الليست بوكس الثانية
كود :
  For i As Integer = 0 To ListBox1.Items.Count - 1
           For j As Integer = ListBox1.Items.Count - 1 To (i + 1) Step -1
               If ListBox1.Items(j) = ListBox1.Items(i) Then
                   ListBox2.Items.Add(ListBox1.Items(j).ToString)
               End If
           Next
       Next
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة: ابو روضة , egypt 2020 , mervandzz
#3
(01-02-20, 06:03 PM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
تفضل هذا الكود سيقوم بفحص الليست بوكس الاولى وكل عنصر مكرر سيضعه في الليست بوكس الثانية
كود :
  For i As Integer = 0 To ListBox1.Items.Count - 1
           For j As Integer = ListBox1.Items.Count - 1 To (i + 1) Step -1
               If ListBox1.Items(j) = ListBox1.Items(i) Then
                   ListBox2.Items.Add(ListBox1.Items(j).ToString)
               End If
           Next
       Next


مشكور  يااخي على المساعدة و النصيحة  Blush
الرد
تم الشكر بواسطة: ابراهيم ايبو
#4
الحمد لله والشكر لله
ولك اخي الكريم
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة: egypt 2020 , egypt 2020



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم