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

نسخة كاملة : كيف اضافة جميع item list فى subitem
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف اضافة جميع item list فى listview subitem

كود :
       Dim Newlist As New ListViewItem
       Newlist.text = ""
       For Each effect In listofint
           Newlist.SubItems.Add(effect)
       Next
       ListView1.Items.Add(Newlist)
هذا الكود يتم اضافة اخر item فقط
السلام عليكم

المطلوب غير مفهوم. ضع مثال
(11-03-17, 01:18 AM)مساعدة كتب : [ -> ]السلام عليكم

المطلوب غير مفهوم. ضع مثال

شكرآ تم الحل الحمد الله
كود :
Dim List As String = String.Join(",", listofint.Select(Function(itemID) itemID.ToString()).ToArray())
كونت مثلآ عندى listbox فيها items 1,2,3,4,5 كونت اريد اضافة هذه items الى listview subitem
لم توضع تركيبة ListView كيف هي،
ول تقصد أن توزع عناصر listbox على اعمدة السطر الواحد، يعني (item(1 تضعه في (subitem(1 و(item(2 تضعه في (subitem(2 وهكذا

ولو تضع صورة تشبيه بالرسام يكون أفضل

جرب هذا التعديل لوضعها على عدة أسطر
كود :
For Each effect In listofint
   Dim Newlist As New ListViewItem
   Newlist.SubItems.Add(effect)
   ListView1.Items.Add(Newlist)
Next

أو هذا الكود للتوزيع على أعمدة subitem لنفس السطر
كود :
Dim Newlist As New ListViewItem
For Each effect In listofint
   Newlist.SubItems.Add(effect)
Next
ListView1.Items.Add(Newlist)