منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيفية فلترة ليست فيو vb net Multiple Column Filter listview - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كيفية فلترة ليست فيو vb net Multiple Column Filter listview (/showthread.php?tid=18908)

الصفحات: 1 2

RE: كيفية فلترة ليست فيو vb net Multiple Column Filter listview - الماجيك مسعد - 26-01-17

(25-01-17, 02:43 PM)مساعدة كتب : تفضل الكود
كود :
' Items الصف
' SubItems العمود
' الصف والعمود يبدأ بالرقم صفر
' يعني العمود الاول يكون العمود رقم صفر والعمود الثاني يكون العمود رقم واحد وهكذا في الصف

Dim hasValue As Boolean = ListView1.Items(1).SubItems(7).Text.Trim <> ""
هنا سيحتوي hasValue إما True وتعني فارغ أو False وتعني ليس فارغ


استخدمت هذا الكود لو يفعل شئ

If RadioButton5.Checked = True And CheckBox4.Checked = True Then
itms = ListView1Items.Where(Function(i) i.SubItems(num).Text.EndsWith(tgsearch.Text) And Val(i.SubItems(4).Text <> Nothing)).ToArray
frm_fb_id_filter.ListView1.Items.Clear()
frm_fb_id_filter.ListView1.Items.AddRange(itms)


هل في اخطاء فى الكود خصوصا فى هذا السطر And Val(i.SubItems(4).Text <> Nothing)).ToArray

RE: كيفية فلترة ليست فيو vb net Multiple Column Filter listview - مساعدة - 26-01-17

نعم هناك خطأ، وهو انك عملت مقارنة نص مع Nothing والمفروض تقارنه مع "" بالاضافة لوضع Val والتي تكون مع الارقام
كود :
itms = ListView1Items.Where(Function(i) i.SubItems(num).Text.EndsWith(tgsearch.Text) And i.SubItems(4).Text <> "").ToArray


RE: كيفية فلترة ليست فيو vb net Multiple Column Filter listview - الماجيك مسعد - 27-01-17

(26-01-17, 10:37 AM)مساعدة كتب : نعم هناك خطأ، وهو انك عملت مقارنة نص مع Nothing والمفروض تقارنه مع "" بالاضافة لوضع Val والتي تكون مع الارقام
كود :
itms = ListView1Items.Where(Function(i) i.SubItems(num).Text.EndsWith(tgsearch.Text) And i.SubItems(4).Text <> "").ToArray

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

+
هجرب غدا عندما يشتغل النت مرة تانية