[Mohamed20]

كيف اضافة جميع 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 فقط

[مساعدة]

السلام عليكم

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

[Mohamed20]

(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)