تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استخراج المكرر من ListBox
#1
السلام عليكم ورحمة الله وبركاته

اخواني اثابكم الله

هذا كود يقوم باستخراج الاسطر المكرره في لست بوكس ولكن بشروط معينه
أي لا يشترط في التكرار كامل السطر

كتبه احد الاعضاء في منتدى فيجوال بيسك لكل العرب السابق جزاه الله الف خير

الكود


كود :
 
Try
            Me.ListBox3.Items.Clear()
            Dim ModifiedList As New List(Of String)
            For I = Me.ListBox1.Items.Count - 1 To 0 Step -1
                Dim SplitText() As String = Me.ListBox1.Items.Item(I).split("-")
                    SplitText(5) = 0
                    SplitText(7) = 0
                    SplitText(9) = 0
                Dim NewText As String = String.Join("-", SplitText)
                If ModifiedList.IndexOf(NewText) > -1 Then
                    Me.ListBox3.Items.Add(Me.ListBox1.Items.Item(I))
                    Me.ListBox1.Items.RemoveAt(I)
                End If
                ModifiedList.Add(NewText)
            Next
        Catch ex As Exception
        End Try

هذا الكود يقوم باستخراج المكرر من لست بوكس واحده أي البحث داخل اللست نفسها
المطلوب
على نفس الشرط السابق في استخراج المكرر
ولكن المكرر من listbox1 و listbox2
أي المقارنة بينهما وبنفس شروط التكرار السابقة
الرد
تم الشكر بواسطة:
#2
الســــــــــــــــــــــلام عليكم ورحمه الله وبركـــــــــــــــــــــــــــــاته
 
تفضل اخي قمت بعمل مثال بسيط يوضح ما تريد Big Grin 
 
صور البرنامج
 
استخراج العناصر المتشابهة


 
 
 
استخراج العناصر المختلفة




والبرنامج تجده في المرفقات Big Grin  Rolleyes

كلة المرور : eng.khalidvb

والسلام عليكم ورحمه الله وبركاته


الملفات المرفقة
.rar   compare 2 listboxes and get similars.rar (الحجم : 76.68 ك ب / التحميلات : 224)
الرد
تم الشكر بواسطة: aftfm
#3
الف شكر اخي العزيز eng.khalidvb على الرد والمثال
المثال معمول بـ vb.net 2012
لا يعمل لدي لدي vb.net 2008 and 2010

لكن هل قمت بعمل التمشابه والغير متشابه بنفس الشروط إذا كان ارجوا
كتابة الكود مشكور

تم فتح المثال مشكور

لكن الكود لم يكن بالمتطلبات التي قلتها في المشاركة الاولي

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

في مشاركة سابقة في المنتدى القديم
الرد
تم الشكر بواسطة:
#5
السلام عليكم و رحمة الله و بركاته




أخ عاطف


أنت مصعب طلبك على الأعضاء، من الصعب أن نفهم الشروط من الكود الذ وضعته، لذا....
يجب عليك إعادة شرح الشروط مع اضافة إضافة مثال مشروع يحتوي على بيانات  لتجربة الحلول.


الله يوفقك



السلام عليكم و رحمة الله و بركاته
الرد
تم الشكر بواسطة: aftfm , sooriaty03
#6
هذا مثال للمطلوب والف شكر اخي العزيز ابو رائد


الملفات المرفقة
.rar   DuplicateTEXT.rar (الحجم : 64.37 ك ب / التحميلات : 188)
الرد
تم الشكر بواسطة:
#7
هل المثال واضح
أو السؤال واضح
ارجوا افادتي مشكورين
الرد
تم الشكر بواسطة:
#8
(25-09-13, 10:57 PM)aftfm كتب : هل المثال واضح
أو السؤال واضح
ارجوا افادتي مشكورين


السلام عليكم ورحمة الله وبركاته

أخي الكريم
أنت لم تحدد نوع البيانات التي تريد عمل المقارنة عليها
والمثال الذي أرفقته خاليا من البيانات
فالأفضل أن تكتب عينة من البيانات داخل أداة ListBox ليتسنى لنا فهم المطلوب

بالتوفيق
الرد
تم الشكر بواسطة: aftfm
#9
بارك الله فيك اخي sooriaty03
على التنبيه لاني ارفقت مثال آخر


هذا المثال المطلوب 
جزاك الله الف خير


الملفات المرفقة
.rar   DuplicateText1.rar (الحجم : 107.14 ك ب / التحميلات : 192)
الرد
تم الشكر بواسطة:
#10
لم يرد احد على موضوعي
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار مهم حول listbox اخواني ro0omio0o1 0 58 23-12-18, 12:30 AM
آخر رد: ro0omio0o1
Big Grin نقل العناصر الي في listbox مجهول 5 168 22-12-18, 08:03 PM
آخر رد: elgokr
  [VB.NET] سؤال حول listbox farfour 3 124 24-11-18, 06:21 PM
آخر رد: Rabeea Qbaha
  استخراج رقم من صفحة dasktop 1 98 18-11-18, 12:45 AM
آخر رد: trakktour
  [VB.NET] حذف المكرر من ليست فيو الماجيك مسعد 9 312 10-11-18, 06:10 PM
آخر رد: الماجيك مسعد
  تحديث قائمة checked listbox alfauori 0 79 06-11-18, 07:40 AM
آخر رد: alfauori
  [VB.NET] مشكلة في استخراج روابط هذه الصفحة بال HtmlAgilityPack mervandzz 2 152 13-10-18, 03:53 PM
آخر رد: mervandzz
  [VB.NET] استخراج regex mervandzz 2 211 08-10-18, 04:20 PM
آخر رد: عبدالله الدوسري
  HScrollBar1 و listbox dasktop 0 136 07-10-18, 06:13 PM
آخر رد: dasktop
  [VB.NET] كود حفظ محتويات listbox Aminsoft 3 208 07-10-18, 08:43 AM
آخر رد: elgokr

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


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