منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كود البحث باليست بوكس بشرط - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كود البحث باليست بوكس بشرط (/showthread.php?tid=9828)

كود البحث باليست بوكس بشرط - mazen - 29-07-13

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

اريد اعادة توزيع اسماء الملفات باليست بوكس بالتيكيست بوكس بشرط
التيكيست الاول ياخذ الملفات التي يوجد بداخلها كلمة mo
التيكيست الثاني ياخذ الملفات التي يوجد بداخلها كلمة xn
التيكيست الثالث ياخذ الملفات التي يوجد بداخلها كلمة er
التيكيست الرابع ياخذ الملفات التي يوجد بداخلها كلمة av

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

كود البحث باليست بوكس بشرط - سعود - 29-07-13

هل تسمح لي بصياغة السؤال على نحو مافهمته انا؟
لديك اداة Listbox ممتلئة باسماء ملفات من مجلد معين.
وتريد نسخ (النص) اسم الملف الى مربع نص معين وفق الشروط الذي ذكرت.
هل هذا صحيح؟

كود البحث باليست بوكس بشرط - mazen - 29-07-13

نعم اخي مسعود هذا مااريد

كود البحث باليست بوكس بشرط - سعود - 29-07-13

تفضل الكود
كود :
For a = 0 To ListBox1.Items.Count - 1
            ListBox1.SetSelected(a, True)
            If IO.Path.GetFileName(ListBox1.Text).Contains("saud").ToString.ToLower Then
                saud.Text = IO.Path.GetFileName(ListBox1.Text)
            End If




            If IO.Path.GetFileName(ListBox1.Text).Contains("mazen").ToString.ToLower Then
                mazen.Text = IO.Path.GetFileName(ListBox1.Text)








            End If
        Next


كود البحث باليست بوكس بشرط - سعود - 29-07-13



المثال مرفق


كود البحث باليست بوكس بشرط - mazen - 29-07-13

مشكور جدا اخي مسعود رد رائع والكود مميز معايا

واريد طلب صغير انا عندي 2 ليست بوكس باحدهم الفولدرات ومنها ا خر للملفات ممكن اتعامل مع كود الفولدرات مباشرة وبعد ذاللك يظهر الملفات كما اشرت في الاكواد السابقة وتوزيعهم علي التيكيست بوكس