Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Tab_Page As New TabPage
Tab_Page.Text = "New Page"
TabControl1.TabPages.Add(Tab_Page)
TabControl1.SelectedIndex = TabControl1.TabPages.Count - 1
Dim Web_Browser As New WebBrowser
Web_Browser.Url = New Uri("http://www.google.com")
Web_Browser.Dock = DockStyle.Fill
Tab_Page.Controls.Add(Web_Browser)
End Sub
أخي الكريم الرابط السابق به الملفات الخاصة بنظام ماك
ولكن قمت بالبحث مرة أخرى حتى وجدت المكتبة الخاصة بالويندوز من الرابط التالي WebKit.Net
حمل الملف ثم قم بإدراج الأداة WebKitBrowser
وضع الكود التالي وسيعمل بإذن الله
كود :
Dim Tab_Page As New TabPage
Tab_Page.Text = "New Page"
TabControl1.TabPages.Add(Tab_Page)
TabControl1.SelectedIndex = TabControl1.TabPages.Count - 1
Dim Web_Browser As New WebKit.WebKitBrowser
Web_Browser.Url = New Uri("http://www.google.com")
Web_Browser.Dock = DockStyle.Fill
Tab_Page.Controls.Add(Web_Browser)