18-12-18, 10:03 PM
(18-12-18, 03:22 AM)elgokr كتب :الكود سيكون عبارة عن 3 مراحل
الاول جلب عدد الصفحات فى البحثحتى تستبدل من 50 الى القيمة التى تم جلبها
ثانياً الكود الخاص ك التالى
كود :
Using X As New Net.WebClient
X.Encoding = Encoding.UTF8
AddHandler X.DownloadDataCompleted, AddressOf search
X.DownloadDataAsync(New Uri("https://www.bing.com/search?q=site:pastebin.com+" & TextBox1.Text))
End Using
باكمله سيكون بداخل لـ For الذى تم عمله من ناتج الخطوة الاولى
ثالثاً ترحيل القيم من النتائج فى المرحلة الثانيةليتم عرضها لديك فى البرنامج
وبكده تكون انهيت ما تريد فعله كلياًاتمنى ان تكون الامور ليس معقدة وانا متاكد انت ستصل لها بالتركيز فى الشرحويعتمد ذلك اذا كنت انت من انشاء الكود فى الموضوع من البداية
تحياتى لكوتمنياتى لك التوفيق
شكرا حبيبي تم حل المشكل ربي يحفظك
شرحك اكثر من رائع