منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] اضافة عنصرين جديدين listbox - نسخة قابلة للطباعة

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



اضافة عنصرين جديدين listbox - mervandzz - 22-07-16

                                                       السلام عليكم ورحمة الله وبركاته     


اريد من اخوتي الكرام كود لاضافة عنصرين جديدين تحت كل رقم فيlistbox

مثال انا عندي ارقام زي الي في الصورة


و اريد اضافة مثلا كلمة منتدى فيجوال بيسك لكل العرب و vbnet واحدة فوق الرقم و الثانية تحت
و بتصير كدا


 واكون شاكر لكم علي افادتي Blush



RE: اضافة عنصرين جديدين listbox - الوادي - 22-07-16

الطريق كثيرة منها
PHP كود :
ListBox1.Items.Add("vbnet")
For 
ListBox1.Items.Count 2 To 1 Step -1
    ListBox1
.Items.Insert(i"منتدى فيجوال بيسك لكل العرب")
    
ListBox1.Items.Insert(i"vbnet")
Next
ListBox1
.Items.Insert(0"منتدى فيجوال بيسك لكل العرب"



RE: اضافة عنصرين جديدين listbox - LoveVb - 22-07-16

تفضل
       For i = ListBox1.Items.Count - 1 To 0 Step -1
           ListBox1.Items.Insert(i, "vb4arb")
           ListBox1.Items.Insert(i + 2, "vb.net")
       Next


RE: اضافة عنصرين جديدين listbox - mervandzz - 22-07-16

(22-07-16, 09:34 PM)LoveVb كتب : تفضل
       For i = ListBox1.Items.Count - 1 To 0 Step -1
           ListBox1.Items.Insert(i, "vb4arb")
           ListBox1.Items.Insert(i + 2, "vb.net")
       Next

جزاك الله خيرا أخي الكريم علي المساعدة

[url=http://vb4arb.com/vb/user-14299.html][/url]