تفضل اخي الطريقة
اول شي اعمل عدد معين من label ورتبها على شكل جدول وضعها في group box
ثم استخدم الكود التالي
اول اضف اداة web browser
ثم ضع الفروم لود
الكود التالي
WebBrowser1.Navigate(" رابط الموقع ")
بعد مانضع رابط الموقع نبدا نحلل صفحة الموقع عن طريق فحص العنصر من المتصفح
مثلا سنجلب رقم يوجد بين وسمين
تم سحبه بهذة الطريقه
وهكذا كرر مع كل وسم يوجد بينه ارقام
اول شي اعمل عدد معين من label ورتبها على شكل جدول وضعها في group box
ثم استخدم الكود التالي
اول اضف اداة web browser
ثم ضع الفروم لود
الكود التالي
WebBrowser1.Navigate(" رابط الموقع ")
بعد مانضع رابط الموقع نبدا نحلل صفحة الموقع عن طريق فحص العنصر من المتصفح
مثلا سنجلب رقم يوجد بين وسمين
كود :
"r">10137.30</td>تم سحبه بهذة الطريقه
كود :
For Each ele As HtmlElement In WebBrowser1.Document.GetElementsByTagName("r") ' r وهنا قمنا بعمل حلقة تكرار كافية لفلترة الوسم
label1.Text += vbNewLine + ele.InnerText ' td وهُنا قمنا بجلب قيم النص المُفلترة من وسم
Next