تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حذف عناصر من List بناء على جمل انا احددها!
#1
السلام عليكم ورحمة الله وبركاته

عندي استفسار وهو عندي 2 ليست
Dim Result as new List(Of String)
Dim BlackList as new List(Of String)

القائمة  الاولى  Result داخلها عناصر اسماء دول Saudi,UAE,Egypt,Kuwait,Jordan,Iraq,Yemen
القائمة الثانية  BlackList  داخلها عناصر udi,men,wait

ما اريده هو البحث داخل هذه القائمة Result اذا كان اي عنصر من عناصرها يحتوي على هذه الجمل udi,men,wait
الموجودة داخل Blacklist يقوم بحذفه من Result

حاولت بأكثر من طريقة لكن جميع محاولاتي فشلت

هذه احدى محاولاتي لكن للأسف يبدو ان الكود مكتوب بشكل خاطيء!

 
كود :
     For i As Integer = 0 To Result.Count - 1
           For r As Integer = 0 To BlackList.Count - 1
               If result.Contains(BlackList(r)) Then
                   Result.RemoveAt(i)
               Else

               End If
           Next
       Next

اعتذر اذا كان السؤال لا يعبر عن محتوى الموضوع بشكل دقيق
اثنان لا يتعلمان المتكبر والخجول
Heart اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً‏ Heart
الرد
تم الشكر بواسطة:
#2
For r = 0 To BlackList.Count - 1
For i = Result.Count - 1 To 0 Step -1
If Result( i ).Contains(BlackList( r )) Then
Result.RemoveAt( i )
End If
Next
Next
الرد
تم الشكر بواسطة:
#3
كود :
       Dim arabCountryList As New List(Of String) From {"Egypt", "Saudi Arabia", "Yemen", "Jordan", "Korea"}
       Dim BlackCountryList As New List(Of String) From {"Korea", "Japan"}
       Dim difference As IEnumerable(Of String) = arabCountryList.Except(BlackCountryList)

       ' example to see the non black liste contries
       For Each name As String In difference
           Me.ListBox1.Items.Add(name)
       Next
الرد
تم الشكر بواسطة:
#4
Array.ForEach(Result.ToArray, Sub( r ) Array.ForEach(BlackList.ToArray, Sub( b ) If r.Contains( b ) Then Result.Remove( r )))
الرد
تم الشكر بواسطة:
#5
شكرا لكم اخواني
اثنان لا يتعلمان المتكبر والخجول
Heart اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً‏ Heart
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  Word List Gen yunis 4 259 14-02-19, 06:29 PM
آخر رد: princelovelorn
  كود لحفظ بيانات من list view تناسيم 3 381 04-10-18, 10:08 AM
آخر رد: ابراهيم ايبو
  كيف يُمكن عرض خيارات داخل combobox بناء على ظهور شهر مُعين وسنة مُعين بأداةDatetimepi Hazem1 5 462 15-09-18, 02:36 AM
آخر رد: Hazem1
  اذا احد ما له خبرة مع الـ List viv 9 552 24-05-18, 09:09 PM
آخر رد: viv
  [VB.NET] ماهوالخطاء ..خطأ في بناء جملة INSERT INTO. moahmmed 4 554 18-04-18, 12:00 AM
آخر رد: moahmmed
Photo [VB.NET] لمساعدة في التنبية بالمعاملات المتاخرة بناء على عدد الايام المطلوبة لانجاز المعاملة ا SAEEDQATHI 2 418 16-04-18, 02:01 PM
آخر رد: حريف برمجة
  [Acces2007] خطا في بناء جملة insert into Abdulaziz Hazazi 2 769 20-02-18, 02:23 AM
آخر رد: karimx
  حساب مجموع عدد عناصر المصفوفة iFanfan 3 441 11-02-18, 02:38 AM
آخر رد: وعد مولود
  هل من الممكن بناء dataset تتغير وتطبيق التغيرات على ال reportviwer sirnon 0 255 05-02-18, 01:34 AM
آخر رد: sirnon
  كيف امنع الاداة combobox من كتابة اية عناصر غير المضافه بها nooralcown 2 397 24-01-18, 10:48 PM
آخر رد: nooralcown

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


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