[VB.NET] جلب قيمة من رابط xml - نسخة قابلة للطباعة

[VB.NET] جلب قيمة من رابط xml - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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] جلب قيمة من رابط xml (/showthread.php?tid=24210)

جلب قيمة من رابط xml - محمد اسماعيل - 17-03-18

لدي رابط لملف XML اريد جلب قيمة منة وصورة

انا بجيب القيم بالطريقة دية وشغالة معايا المشكلة لو في اكتر من node يحملوا نفس الاسم ازاي احدد الي الجزء الي انا عايزه

ثانيا يوجد رابط صورة كيف يتم تحديد ة واظهار الصورة بالبيكتشر لدي ببرنامج عندي

الكود الذي استخدمة لجلب القيم من رابط XML وجابت معايا اول قيمة

كود :

Dim xmlDoc As New XmlDocument()

        xmlDoc.Load("URL")

        Dim xmlnode As XmlNodeList

        XmlNode = xmlDoc.GetElementsByTagName("WIND:condition")

        For Each node As XmlNode In xmlnode

            Dim pudate = node.Attributes("speed").InnerText

            TextBox10.Text = pudate

        Next

جزء من الملف xml

كود :

  اول يوم <WIND:condition code="32" date="17 Mar 2018" day="Sat" speed ="55"/>

 تاني يوم<WIND:condition code="30" date="18 Mar 2018" day="Sun" speed ="60"/>

<WIND:condition code="32" date="19 Mar 2018" day="Mon" speed ="40"/>

حاولت اجيب معلومات تاني يوم ولكن لم تفلح الطريقة معي
بالطريقة دية

كود :

XmlNode = xmlDoc.GetElementsByTagName("WIND:condition")

        تغير قيمة بوضع 1'  For Each node As XmlNode In xmlnode (1)

            Dim pudate = node.Attributes("date").InnerText

            TextBox10.Text = pudate

        Next

الصورة تحمل رابط باخر نفس ملف xml بالجزء دة

كود :

<description>

<![CDATA[<img src="http://l.yimg.com/31.gif /> <b>Current Conditions:</b>

</description>

اريد اظهارها بالبيكتشر بوكس ببرنامجي