تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب كود أظافة تاب يفتح موقع معين والذهاب له مباشرة من اختيار المبرمج
#1
احبتي واصدقائي ...

اريد كود عمل New Tab يعني في سبيل المثال عند الضغط على صورة او بوتن يفتح لنا تاب جديد مع الذهاب الى موقع معين من اختيارك ؟؟ يعني مثلا انا عندي موقع عبر الانترنيت واريد من خلال ضغطة زر على بوتن او صورة عن النقر اليه يفتح تاب جديد وياخذه الى الموقع الذي أدرجته انا


مع الشكر الجزيل
الرد }}}}
تم الشكر بواسطة:
#2
جرب هذه الطريقة

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

    Dim wb As New WebBrowser
    wb.Dock = DockStyle.Fill

    Dim tb As New TabPage
    tb.Controls.Add(wb)
    Me.TabControl1.TabPages.Add(tb)

    Me.TabControl1.SelectedIndex = Me.TabControl1.TabPages.Count - 1

    tb.Text = "Google"
    wb.Navigate("http:\\www.google.com")

End Sub
الرد }}}}
تم الشكر بواسطة:
#3
جرب بوضعها بدالة كالتالي

كود :
Public Class Form1

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

        AddTabPage("http:\\www.google.com")
    End Sub

    Private Sub AddTabPage(ByVal url As String)

        Dim wb As New WebBrowser
        wb.Dock = DockStyle.Fill

        Dim tb As New TabPage
        tb.Controls.Add(wb)
        Me.TabControl1.TabPages.Add(tb)

        Me.TabControl1.SelectedIndex = Me.TabControl1.TabPages.Count - 1

        tb.Text = "تحميل..."
        wb.Navigate(url)

        AddHandler wb.DocumentCompleted, AddressOf WebBrowser_DocumentCompleted

    End Sub


    Private Sub WebBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
        sender.Parent.Text = sender.DocumentTitle
    End Sub

End Class
الرد }}}}
تم الشكر بواسطة:
#4
ايش صار معاك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف اجعل البرنامج لا يفتح مدونتى الا مرة واحدة فى اليوم ابو روضة 4 208 07-09-17, 10:19 AM
آخر رد: ابو روضة
  [سؤال] لو سمحتم عاوز كود لأظهار كود العميل في التيكست بوكس عند اختيار العميل من الكومبوبوكس ahmedgamal 4 153 05-09-17, 06:01 AM
آخر رد: ahmedgamal
  [سؤال] كيف أفتح صوره من مسار معين طـلال 1 89 28-08-17, 05:04 AM
آخر رد: سعود
  [سؤال] جلب قيم من موقع ابو روضة 0 66 24-08-17, 06:54 PM
آخر رد: ابو روضة
  [VB.NET] مساعدة في العمل على موقع بإستخدام HttpWebReuest asda 1 152 12-07-17, 02:25 PM
آخر رد: asda
  [سؤال] هل ممكن احد فئه حسب سنوات من تاريخ معين.. Marwan9990 5 173 10-07-17, 11:54 PM
آخر رد: Marwan9990
  [VB.NET] كيفية اختيار من CheckedListBox باستخدام زر enter waelalmsry75 22 684 29-06-17, 08:07 PM
آخر رد: waelalmsry75
  كيفية الطباعة مباشرة المتألق9 1 143 19-06-17, 02:59 AM
آخر رد: WAEL ABED
  جعل الرابط يفتح علي الجوجل كروم khaled12345 2 145 18-06-17, 09:46 AM
آخر رد: khaled12345
  هل يمكن عرض جزأ معين من صفحة اكسيل او وورد في الفورم khaled12345 2 189 10-06-17, 08:18 PM
آخر رد: khaled12345

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


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