منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

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

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

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

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

تفضل الكود

كود :

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

المثال مرفق

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

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