منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[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=16593)

الصفحات: 1 2 3 4

تغيير محتوى listbox - mervandzz - 26-07-16

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



اريد من اخوتي الكرام كود لوضع محتوي رابط في  listbox2مع تغيير المحتوي في كل ضغطة زر الي رابط مختلف علي listbox1 مثال


الي


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






RE: تغيير محتوى listbox - LoveVb - 26-07-16

ياليت توضح اكثر
هل سيكون في ليست بوكس 1 روابط
http://vb4arb.com/
http://vb4arb.com/vb
http://vb4arb.com/twitter ^^
وعند تحديدها يقوم بتحمل محتوى الرابط ويضعه في ليست بوكس 2

RE: تغيير محتوى listbox - mervandzz - 26-07-16

نعم يااخي LoveVb الليست بوكس 1 يكون فيه روابط و كل رابط له محتوي نصي معين و كل مااضغط علي زر معين يتغير المحتوي علي حسب الرابط الي انا عاملو
بس الروابط مو تكون ضاهرة علي الليست يوكس

RE: تغيير محتوى listbox - LoveVb - 26-07-16

قم بجعل العناصر في ليست بوكس واحد هكذا
الرابط الاول ثم مسافة حتى المستخدم لا يستطيع رؤيته ثم علامة ~ ثم رابط الرابط الاولى  Smile
هكذا
الرابط الاول                                                                            ~http://vb4arb.com

ضع هذا الكود

إقتباس :   Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        ListBox2.Items.Add(New Net.WebClient().DownloadString(ListBox1.SelectedItem.ToString.Split("~")(1)))
    End Sub

او الطريقة الثانية وهي إنشاء مصفوفة عامة
 Dim Urls() As String = {"link1", "link2", "link3", "link4"}
ثم تضع الروابط بها
والكود يكون

إقتباس :    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        ListBox2.Items.Add(New Net.WebClient().DownloadString(Urls(ListBox1.SelectedIndex)))
    End Sub
اختر اي واحده
هل المحتوى في الرابط اكثر من سطر؟

RE: تغيير محتوى listbox - mervandzz - 26-07-16

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

RE: تغيير محتوى listbox - LoveVb - 26-07-16

العفو
ListBox2.Items.AddRange(Split(New Net.WebClient().DownloadString(Urls(ListBox1.SelectedIndex)), vbNewLine))

RE: تغيير محتوى listbox - mervandzz - 26-07-16

مشكور و رايح اتبعك معايا انو لما اضغط علي الليست بوكس الاول علي الرابط الثاني مثال ما ينحدف المحتوي الرابط الاول من الليست بوكس الثاني و مشكور مرة ثانية

RE: تغيير محتوى listbox - LoveVb - 26-07-16

ضع قبل كود جلب المحتوى
listbox2.items.clear
العفو ^^

RE: تغيير محتوى listbox - mervandzz - 26-07-16

الف الف شكر يااخ LoveVbعلي مجهودك و ربنا يزيدهالك في حسناتك انشالله

RE: تغيير محتوى listbox - سعود - 26-07-16

ما رايك بالفكرة التالية:
انظر هنا
فقط مشاركة لاخواني. Heart