تقييم الموضوع :
  • 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 ك ب / التحميلات : 158)
الرد }}}}
تم الشكر بواسطة: aftfm
#3
الف شكر اخي العزيز eng.khalidvb على الرد والمثال
المثال معمول بـ vb.net 2012
لا يعمل لدي لدي vb.net 2008 and 2010

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

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

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

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

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




أخ عاطف


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


الله يوفقك



السلام عليكم و رحمة الله و بركاته
 
 
@@@ سامحوني، منقطع نهائياً @@@

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


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


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

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

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


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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] طريقة تعبئة listbox من ملف text وربطه برابط على الانترنت youssef1 10 190 11-02-17, 12:56 AM
آخر رد: hassan
  Random من listbox Mohamed20 9 146 01-02-17, 01:18 AM
آخر رد: Mohamed20
  [VB.NET] total number listbox +8 3asfa~mdmra 2 75 31-01-17, 07:54 PM
آخر رد: 3asfa~mdmra
  البحث قى listbox Mohamed20 1 83 27-01-17, 07:12 AM
آخر رد: مساعدة
  [سؤال] اريد طريقة لمنع تكرار عناصر listbox riad21 2 85 25-01-17, 04:06 PM
آخر رد: riad21
  [سؤال] حماية ملف الdll من استخراج الاكواد mohamed haroon 5 369 10-01-17, 05:56 AM
آخر رد: mohamed haroon
  كيفية استخراج ربح من المبيعات عندما تكون سعر شراء المادة مختلة في كل مرة max_1978 3 185 05-01-17, 12:40 AM
آخر رد: أبو عمر
  عند الانتقال الى تكست ثاني استخراج المكرر الدريساوي 3 138 03-01-17, 11:41 PM
آخر رد: مساعدة
  [سؤال] كود ListBox naden 2 127 28-12-16, 02:09 AM
آخر رد: naden
  [VB.NET] كيف اجعل صف في listbox ملون 3asfa~mdmra 1 164 26-11-16, 01:00 PM
آخر رد: silverlight

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


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