تقييم الموضوع :
  • 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
لم يرد احد على موضوعي
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] حذف المكرر من ليست فيو الماجيك مسعد 11 222 أمس, 01:46 AM
آخر رد: rmnr
  تحديث قائمة checked listbox alfauori 0 33 06-11-18, 07:40 AM
آخر رد: alfauori
  [VB.NET] مشكلة في استخراج روابط هذه الصفحة بال HtmlAgilityPack mervandzz 2 98 13-10-18, 03:53 PM
آخر رد: mervandzz
  [VB.NET] استخراج regex mervandzz 2 160 08-10-18, 04:20 PM
آخر رد: عبدالله الدوسري
  HScrollBar1 و listbox dasktop 0 82 07-10-18, 06:13 PM
آخر رد: dasktop
  [VB.NET] كود حفظ محتويات listbox Aminsoft 3 148 07-10-18, 08:43 AM
آخر رد: elgokr
Smile [VB.NET] مشكلتي مع البحث في listbox rizakflash8 9 225 24-09-18, 02:13 PM
آخر رد: elgokr
  [VB.NET] استخراج نسسبة الارباح حسب اسم المندوب فراس الغزي 16 488 12-09-18, 08:47 PM
آخر رد: elgokr
  [سؤال] كيفيه عمل split لملف من نوع تيكست وتصديره داخل LISTBOX dametucorazon 5 128 02-09-18, 10:24 AM
آخر رد: elgokr
  طريقة حساب عدد الاسماء الموجودة في listbox ahmedmansour 1 113 30-07-18, 11:33 PM
آخر رد: elgokr

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


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