تقييم الموضوع :
  • 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 , اسامه الهرماوي , soloxocf1


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  فلتره الملفات في ال WebBrowser معاذ_ابراهيم 4 247 10-07-19, 08:52 PM
آخر رد: معاذ ابراهيم
  [VB.NET] التعامل مع الأداة webBrowser برمجيا صالح حمادي 4 228 21-05-19, 02:19 AM
آخر رد: صالح حمادي
Heart [VB.NET] كل عام وانتم بخير ... محتاج كود نسخ قاعدة البيانات تلقائيا abdullhadi999 32 969 15-05-19, 08:24 PM
آخر رد: asemshahen5
  تحميل صفحة انترنت بدون الويب براوزر ابو روضة 0 125 05-05-19, 06:04 PM
آخر رد: ابو روضة
  [VB.NET] منع الرجوع WebBrowser DK-x 0 113 01-05-19, 12:50 PM
آخر رد: DK-x
  قراءة صفحات الانترنت على RichTextBox ابو روضة 4 239 16-04-19, 06:55 PM
آخر رد: ابو روضة
  سؤال حول TextBox مرتبط ب WebBrowser ارجو رد من الاخ DK-x وشكرا للاخ بدري حاتمي 4 179 09-04-19, 06:16 PM
آخر رد: حاتمي
  سؤال حول TextBox مرتبط ب WebBrowser حاتمي 6 299 09-04-19, 01:00 AM
آخر رد: حاتمي
  جلب نص من صفحة ويب farfour 0 143 23-03-19, 07:06 PM
آخر رد: farfour
  طريقة تكرار الامر تلقائيا | حل مشكلة script error في webbrowser عند فتح صفحة ما soloxocf1 6 483 18-03-19, 09:16 AM
آخر رد: 5000

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


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