[elgokr]

تم الاطلاع على الملف المرفق

وملاحظ ان جلب اسم الفيديو المطلوب تحميله يتم جلبه من خلال الاتى

كود :

           If item.GetAttribute("Id").Contains("msgtxt3567146535") Then
               checkedListBox1.Items.Add(item.InnerText)
           End If

تعال كده اطلب منك التالى

حتى تصل الفكرة لك كاملاً

فى البدابة انشاء checkedListBox اضافى فى الشاشة

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

الى هنا جميل
يعنى كل اللى مطلوب منك انك ستكرر مثل هذا الكود

كود :

       ss = webBrowser1.Document.GetElementsByTagName("span")
       For Each item As HtmlElement In ss
           If item.GetAttribute("Id").Contains("msgtxt3567146535") Then
               checkedListBox1.Items.Add(item.InnerText)
           End If
       Next item

لكن بدل من ان يتم جلب اسم الفيديو يقوم بجلب رابط الفيديو

وبدل من تمريره الى checkedListBox1 سيكون checkedListBox2

جلب الرابط سيكون من A بدلاً من Span والـ id الخاص به search_more

الرابط ستجده فى href

طيب بعد عمل التالى ماذا يمكنك فعله

كل ما عليك هو تطبيق شرح الاخوة فى جلب كل رقم لـ checkedListBox1 المحدد

فمثلاً لنقول ان checkedListBox1 المحدد هو 1 هتستخدم 1 لكن هنا على checkedListBox2

واللى هيكون بطبيعة الحال مخفي واللى هيكون فى الرابط التى تم جلبها

اتمنى ان اكون سهلت الامر عليك

وان الامر اصبح اسهل وبسيط بكل ما تتخيله

تحياتى لك

وتمنياتى لك التوفيق