تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود البحث باليست بوكس بشرط
#1
نا عندي مجموعة عناصر داخل اليست بوكس اريد نقلها لتيكيست بوكس بشرط
ان العناصر الموجودة هي من فولدر يعني انقل الملفات بالفولدرات داخل اليست بوكس

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

وهكذا مباشرة من الملفات الموجودة باليست بوكس يعني ياخذ اسم الملف كامل الموجود بداخلة الشرط او جزء من اسم الملف
الرد }}}
تم الشكر بواسطة:
#2
هل تسمح لي بصياغة السؤال على نحو مافهمته انا؟
لديك اداة Listbox ممتلئة باسماء ملفات من مجلد معين.
وتريد نسخ (النص) اسم الملف الى مربع نص معين وفق الشروط الذي ذكرت.
هل هذا صحيح؟
الرد }}}
تم الشكر بواسطة:
#3
نعم اخي مسعود هذا مااريد
الرد }}}
تم الشكر بواسطة:
#4
تفضل الكود
كود :
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
الرد }}}
تم الشكر بواسطة:
#5


المثال مرفق


الملفات المرفقة
.zip   MAZEN.zip (الحجم : 33.98 ك ب / التحميلات : 48)
الرد }}}
تم الشكر بواسطة:
#6
مشكور جدا اخي مسعود رد رائع والكود مميز معايا

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



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


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