تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كود فتح صفحة من صفحات مبرمجة في webbrowser تلقائيا
#1
السلام عليكم ورحمة الله

انا عايز نفس الي موجود في الكود بس ينفذ امر تاني  
الامر هو ان هو يفتح صفحة مختلفة  في webbrowser1[b] كل لما يضغط علي button1[/b]
الصفحات زي جوجل او فيسبوك او ياهو .......الخ.

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       TextBox1.Text = Int(Rnd() * 6)
       Select Case TextBox1.Text
           Case 0
               TextBox1.Text = "1330-1813-5332-3018-4123-4267"

           Case 1
               TextBox1.Text = "1330-1167-8857-3801-9962-4540"

           Case 2
               TextBox1.Text = "1330-1182-3585-9477-5524-4839"

           Case 3
               TextBox1.Text = "1330-1813-5332-3018-4123-4267"

           Case 4
               TextBox1.Text = "1330-1011-6547-2116-7061-1195"

           Case 5
               TextBox1.Text = "1330-1430-9860-3108-6588-8053"

       End Select
   End Sub

ولو في كود تاني عادي مش شرط نفس الكود 
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

تفضل الكود
كود :
       TextBox1.Text = Int(Rnd() * 6)
       Select Case TextBox1.Text
           Case 0
               WebBrowser1.Navigate("http://www.google.com/")
           Case 1
               WebBrowser1.Navigate("http://www.facebook.com/")
           Case 2
               WebBrowser1.Navigate("http://www.twitter.com/")
           Case 3
               WebBrowser1.Navigate("http://www.vb4arb.com/")
           Case 4
               WebBrowser1.Navigate("http://www.vb4arb.com/")
           Case 5
               WebBrowser1.Navigate("http://www.vb4arb.com/")
       End Select

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: DK-x , DK-x , اسامه الهرماوي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] التعامل مع الأداة webBrowser برمجيا صالح حمادي 3 79 اليوم, 12:04 AM
آخر رد: elgokr
Heart [VB.NET] كل عام وانتم بخير ... محتاج كود نسخ قاعدة البيانات تلقائيا abdullhadi999 32 702 15-05-19, 08:24 PM
آخر رد: asemshahen5
  تحميل صفحة انترنت بدون الويب براوزر ابو روضة 0 42 05-05-19, 06:04 PM
آخر رد: ابو روضة
  فلتره الملفات في ال WebBrowser معاذ_ابراهيم 3 138 02-05-19, 06:24 PM
آخر رد: fouadhdfouad
  [VB.NET] منع الرجوع WebBrowser DK-x 0 42 01-05-19, 12:50 PM
آخر رد: DK-x
  قراءة صفحات الانترنت على RichTextBox ابو روضة 4 148 16-04-19, 06:55 PM
آخر رد: ابو روضة
  سؤال حول TextBox مرتبط ب WebBrowser ارجو رد من الاخ DK-x وشكرا للاخ بدري حاتمي 4 108 09-04-19, 06:16 PM
آخر رد: حاتمي
  سؤال حول TextBox مرتبط ب WebBrowser حاتمي 6 214 09-04-19, 01:00 AM
آخر رد: حاتمي
  جلب نص من صفحة ويب farfour 0 83 23-03-19, 07:06 PM
آخر رد: farfour
  طريقة تكرار الامر تلقائيا | حل مشكلة script error في webbrowser عند فتح صفحة ما soloxocf1 6 356 18-03-19, 09:16 AM
آخر رد: 5000

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم