I seem to get this error every-time i create a web-browser with tabs.
Overload resolution failed because no accessible 'Int' accepts this number of arguments.Here is my code:
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form6
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form6))
Me.RibbonControl1 = New DevComponents.DotNetBar.RibbonControl()
Me.RibbonPanel1 = New DevComponents.DotNetBar.RibbonPanel()
Me.RibbonBar1 = New DevComponents.DotNetBar.RibbonBar()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.Back = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem15 = New DevComponents.DotNetBar.ButtonItem()
Me.LabelItem1 = New DevComponents.DotNetBar.LabelItem()
Me.ButtonItem14 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem16 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem19 = New DevComponents.DotNetBar.ButtonItem()
Me.LabelItem2 = New DevComponents.DotNetBar.LabelItem()
Me.ButtonItem20 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem17 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem18 = New DevComponents.DotNetBar.ButtonItem()
Me.RibbonPanel2 = New DevComponents.DotNetBar.RibbonPanel()
Me.RibbonTabItem1 = New DevComponents.DotNetBar.RibbonTabItem()
Me.RibbonTabItem2 = New DevComponents.DotNetBar.RibbonTabItem()
Me.Office2007StartButton1 = New DevComponents.DotNetBar.Office2007StartButton()
Me.ItemContainer1 = New DevComponents.DotNetBar.ItemContainer()
Me.ItemContainer2 = New DevComponents.DotNetBar.ItemContainer()
Me.ItemContainer3 = New DevComponents.DotNetBar.ItemContainer()
Me.ButtonItem2 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem3 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem4 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem5 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem6 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem7 = New DevComponents.DotNetBar.ButtonItem()
Me.GalleryContainer1 = New DevComponents.DotNetBar.GalleryContainer()
Me.labelItem8 = New DevComponents.DotNetBar.LabelItem()
Me.ButtonItem8 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem9 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem10 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem11 = New DevComponents.DotNetBar.ButtonItem()
Me.ItemContainer4 = New DevComponents.DotNetBar.ItemContainer()
Me.ButtonItem12 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem13 = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem1 = New DevComponents.DotNetBar.ButtonItem()
Me.QatCustomizeItem1 = New DevComponents.DotNetBar.QatCustomizeItem()
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.RibbonControl1.SuspendLayout()
Me.RibbonPanel1.SuspendLayout()
Me.RibbonBar1.SuspendLayout()
Me.SuspendLayout()
'
'RibbonControl1
'
Me.RibbonControl1.Controls.Add(Me.RibbonPanel1)
Me.RibbonControl1.Controls.Add(Me.RibbonPanel2)
Me.RibbonControl1.Dock = System.Windows.Forms.DockStyle.Top
Me.RibbonControl1.Items.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.RibbonTabItem1, Me.RibbonTabItem2})
Me.RibbonControl1.KeyTipsFont = New System.Drawing.Font("Tahoma", 7.0!)
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Padding = New System.Windows.Forms.Padding(0, 0, 0, 2)
Me.RibbonControl1.QuickToolbarItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.Office2007StartButton1, Me.ButtonItem1, Me.QatCustomizeItem1})
Me.RibbonControl1.Size = New System.Drawing.Size(1195, 103)
Me.RibbonControl1.Style = DevComponents.DotNetBar.eDotNetBarStyle.Office2007
Me.RibbonControl1.TabGroupHeight = 14
Me.RibbonControl1.TabIndex = 0
Me.RibbonControl1.Text = "RibbonControl1"
'
'RibbonPanel1
'
Me.RibbonPanel1.ColorSchemeStyle = DevComponents.DotNetBar.eDotNetBarStyle.Office2007
Me.RibbonPanel1.Controls.Add(Me.RibbonBar1)
Me.RibbonPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.RibbonPanel1.Location = New System.Drawing.Point(0, 25)
Me.RibbonPanel1.Name = "RibbonPanel1"
Me.RibbonPanel1.Padding = New System.Windows.Forms.Padding(3, 0, 3, 3)
Me.RibbonPanel1.Size = New System.Drawing.Size(1195, 76)
Me.RibbonPanel1.TabIndex = 1
'
'RibbonBar1
'
Me.RibbonBar1.AutoOverflowEnabled = True
Me.RibbonBar1.ContainerControlProcessDialogKey = True
Me.RibbonBar1.Controls.Add(Me.TextBox1)
Me.RibbonBar1.Dock = System.Windows.Forms.DockStyle.Top
Me.RibbonBar1.Items.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.Back, Me.ButtonItem15, Me.LabelItem1, Me.ButtonItem14, Me.ButtonItem16, Me.ButtonItem19, Me.LabelItem2, Me.ButtonItem20, Me.ButtonItem17, Me.ButtonItem18})
Me.RibbonBar1.Location = New System.Drawing.Point(3, 0)
Me.RibbonBar1.Name = "RibbonBar1"
Me.RibbonBar1.Size = New System.Drawing.Size(1189, 73)
Me.RibbonBar1.Style = DevComponents.DotNetBar.eDotNetBarStyle.Office2007
Me.RibbonBar1.TabIndex = 0
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(184, 18)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(850, 20)
Me.TextBox1.TabIndex = 0
'
'Back
'
Me.Back.Image = CType(resources.GetObject("Back.Image"), System.Drawing.Image)
Me.Back.Name = "Back"
Me.Back.SubItemsExpandWidth = 14
Me.Back.Text = "ButtonItem14"
'
'ButtonItem15
'
Me.ButtonItem15.Image = CType(resources.GetObject("ButtonItem15.Image"), System.Drawing.Image)
Me.ButtonItem15.Name = "ButtonItem15"
Me.ButtonItem15.SubItemsExpandWidth = 14
Me.ButtonItem15.Text = "ButtonItem15"
'
'LabelItem1
'
Me.LabelItem1.Name = "LabelItem1"
Me.LabelItem1.Text = " "
'
'ButtonItem14
'
Me.ButtonItem14.Image = CType(resources.GetObject("ButtonItem14.Image"), System.Drawing.Image)
Me.ButtonItem14.Name = "ButtonItem14"
Me.ButtonItem14.SubItemsExpandWidth = 14
Me.ButtonItem14.Text = "ButtonItem14"
'
'ButtonItem16
'
Me.ButtonItem16.Image = CType(resources.GetObject("ButtonItem16.Image"), System.Drawing.Image)
Me.ButtonItem16.Name = "ButtonItem16"
Me.ButtonItem16.SubItemsExpandWidth = 14
Me.ButtonItem16.Text = "ButtonItem16"
'
'ButtonItem19
'
Me.ButtonItem19.Image = CType(resources.GetObject("ButtonItem19.Image"), System.Drawing.Image)
Me.ButtonItem19.Name = "ButtonItem19"
Me.ButtonItem19.SubItemsExpandWidth = 14
Me.ButtonItem19.Text = "ButtonItem19"
'
'LabelItem2
'
Me.LabelItem2.Name = "LabelItem2"
Me.LabelItem2.Text = resources.GetString("LabelItem2.Text")
'
'ButtonItem20
'
Me.ButtonItem20.Image = CType(resources.GetObject("ButtonItem20.Image"), System.Drawing.Image)
Me.ButtonItem20.Name = "ButtonItem20"
Me.ButtonItem20.SubItemsExpandWidth = 14
Me.ButtonItem20.Text = "ButtonItem20"
'
'ButtonItem17
'
Me.ButtonItem17.Image = CType(resources.GetObject("ButtonItem17.Image"), System.Drawing.Image)
Me.ButtonItem17.Name = "ButtonItem17"
Me.ButtonItem17.SubItemsExpandWidth = 14
Me.ButtonItem17.Text = "ButtonItem17"
'
'ButtonItem18
'
Me.ButtonItem18.Image = CType(resources.GetObject("ButtonItem18.Image"), System.Drawing.Image)
Me.ButtonItem18.Name = "ButtonItem18"
Me.ButtonItem18.SubItemsExpandWidth = 14
Me.ButtonItem18.Text = "ButtonItem18"
'
'RibbonPanel2
'
Me.RibbonPanel2.ColorSchemeStyle = DevComponents.DotNetBar.eDotNetBarStyle.Office2007
Me.RibbonPanel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.RibbonPanel2.Location = New System.Drawing.Point(0, 0)
Me.RibbonPanel2.Name = "RibbonPanel2"
Me.RibbonPanel2.Padding = New System.Windows.Forms.Padding(3, 0, 3, 3)
Me.RibbonPanel2.Size = New System.Drawing.Size(75, 21)
Me.RibbonPanel2.TabIndex = 2
'
'RibbonTabItem1
'
Me.RibbonTabItem1.Checked = True
Me.RibbonTabItem1.Name = "RibbonTabItem1"
Me.RibbonTabItem1.Panel = Me.RibbonPanel1
Me.RibbonTabItem1.Text = "Home"
'
'RibbonTabItem2
'
Me.RibbonTabItem2.Name = "RibbonTabItem2"
Me.RibbonTabItem2.Panel = Me.RibbonPanel2
Me.RibbonTabItem2.Text = "RibbonTabItem2"
'
'Office2007StartButton1
'
Me.Office2007StartButton1.AutoExpandOnClick = True
Me.Office2007StartButton1.CanCustomize = False
Me.Office2007StartButton1.HotTrackingStyle = DevComponents.DotNetBar.eHotTrackingStyle.Image
Me.Office2007StartButton1.Image = CType(resources.GetObject("Office2007StartButton1.Image"), System.Drawing.Image)
Me.Office2007StartButton1.ImagePaddingHorizontal = 2
Me.Office2007StartButton1.ImagePaddingVertical = 2
Me.Office2007StartButton1.Name = "Office2007StartButton1"
Me.Office2007StartButton1.ShowSubItems = False
Me.Office2007StartButton1.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer1})
Me.Office2007StartButton1.Text = "&File"
'
'ItemContainer1
'
'
'
'
Me.ItemContainer1.BackgroundStyle.Class = "RibbonFileMenuContainer"
Me.ItemContainer1.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
Me.ItemContainer1.Name = "ItemContainer1"
Me.ItemContainer1.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer2, Me.ItemContainer4})
'
'ItemContainer2
'
'
'
'
Me.ItemContainer2.BackgroundStyle.Class = "RibbonFileMenuTwoColumnContainer"
Me.ItemContainer2.ItemSpacing = 0
Me.ItemContainer2.Name = "ItemContainer2"
Me.ItemContainer2.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer3, Me.GalleryContainer1})
'
'ItemContainer3
'
'
'
'
Me.ItemContainer3.BackgroundStyle.Class = "RibbonFileMenuColumnOneContainer"
Me.ItemContainer3.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
Me.ItemContainer3.MinimumSize = New System.Drawing.Size(120, 0)
Me.ItemContainer3.Name = "ItemContainer3"
Me.ItemContainer3.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ButtonItem2, Me.ButtonItem3, Me.ButtonItem4, Me.ButtonItem5, Me.ButtonItem6, Me.ButtonItem7})
'
'ButtonItem2
'
Me.ButtonItem2.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem2.Image = CType(resources.GetObject("ButtonItem2.Image"), System.Drawing.Image)
Me.ButtonItem2.Name = "ButtonItem2"
Me.ButtonItem2.SubItemsExpandWidth = 24
Me.ButtonItem2.Text = "&New"
'
'ButtonItem3
'
Me.ButtonItem3.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem3.Image = CType(resources.GetObject("ButtonItem3.Image"), System.Drawing.Image)
Me.ButtonItem3.Name = "ButtonItem3"
Me.ButtonItem3.SubItemsExpandWidth = 24
Me.ButtonItem3.Text = "&Open..."
'
'ButtonItem4
'
Me.ButtonItem4.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem4.Image = CType(resources.GetObject("ButtonItem4.Image"), System.Drawing.Image)
Me.ButtonItem4.Name = "ButtonItem4"
Me.ButtonItem4.SubItemsExpandWidth = 24
Me.ButtonItem4.Text = "&Save..."
'
'ButtonItem5
'
Me.ButtonItem5.BeginGroup = True
Me.ButtonItem5.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem5.Image = CType(resources.GetObject("ButtonItem5.Image"), System.Drawing.Image)
Me.ButtonItem5.Name = "ButtonItem5"
Me.ButtonItem5.SubItemsExpandWidth = 24
Me.ButtonItem5.Text = "S&hare..."
'
'ButtonItem6
'
Me.ButtonItem6.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem6.Image = CType(resources.GetObject("ButtonItem6.Image"), System.Drawing.Image)
Me.ButtonItem6.Name = "ButtonItem6"
Me.ButtonItem6.SubItemsExpandWidth = 24
Me.ButtonItem6.Text = "&Print..."
'
'ButtonItem7
'
Me.ButtonItem7.BeginGroup = True
Me.ButtonItem7.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem7.Image = CType(resources.GetObject("ButtonItem7.Image"), System.Drawing.Image)
Me.ButtonItem7.Name = "ButtonItem7"
Me.ButtonItem7.SubItemsExpandWidth = 24
Me.ButtonItem7.Text = "&Close"
'
'GalleryContainer1
'
'
'
'
Me.GalleryContainer1.BackgroundStyle.Class = "RibbonFileMenuColumnTwoContainer"
Me.GalleryContainer1.EnableGalleryPopup = False
Me.GalleryContainer1.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
Me.GalleryContainer1.MinimumSize = New System.Drawing.Size(180, 240)
Me.GalleryContainer1.MultiLine = False
Me.GalleryContainer1.Name = "GalleryContainer1"
Me.GalleryContainer1.PopupUsesStandardScrollbars = False
Me.GalleryContainer1.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.labelItem8, Me.ButtonItem8, Me.ButtonItem9, Me.ButtonItem10, Me.ButtonItem11})
'
'labelItem8
'
Me.labelItem8.BorderSide = DevComponents.DotNetBar.eBorderSide.Bottom
Me.labelItem8.BorderType = DevComponents.DotNetBar.eBorderType.Etched
Me.labelItem8.CanCustomize = False
Me.labelItem8.Name = "labelItem8"
Me.labelItem8.PaddingBottom = 2
Me.labelItem8.PaddingTop = 2
Me.labelItem8.Stretch = True
Me.labelItem8.Text = "Recent Documents"
'
'ButtonItem8
'
Me.ButtonItem8.Name = "ButtonItem8"
Me.ButtonItem8.Text = "&1. Short News 5-7.rtf"
'
'ButtonItem9
'
Me.ButtonItem9.Name = "ButtonItem9"
Me.ButtonItem9.Text = "&2. Prospect Email.rtf"
'
'ButtonItem10
'
Me.ButtonItem10.Name = "ButtonItem10"
Me.ButtonItem10.Text = "&3. Customer Email.rtf"
'
'ButtonItem11
'
Me.ButtonItem11.Name = "ButtonItem11"
Me.ButtonItem11.Text = "&4. example.rtf"
'
'ItemContainer4
'
'
'
'
Me.ItemContainer4.BackgroundStyle.Class = "RibbonFileMenuBottomContainer"
Me.ItemContainer4.HorizontalItemAlignment = DevComponents.DotNetBar.eHorizontalItemsAlignment.Right
Me.ItemContainer4.Name = "ItemContainer4"
Me.ItemContainer4.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ButtonItem12, Me.ButtonItem13})
'
'ButtonItem12
'
Me.ButtonItem12.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem12.ColorTable = DevComponents.DotNetBar.eButtonColor.OrangeWithBackground
Me.ButtonItem12.Image = CType(resources.GetObject("ButtonItem12.Image"), System.Drawing.Image)
Me.ButtonItem12.Name = "ButtonItem12"
Me.ButtonItem12.SubItemsExpandWidth = 24
Me.ButtonItem12.Text = "Opt&ions"
'
'ButtonItem13
'
Me.ButtonItem13.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
Me.ButtonItem13.ColorTable = DevComponents.DotNetBar.eButtonColor.OrangeWithBackground
Me.ButtonItem13.Image = CType(resources.GetObject("ButtonItem13.Image"), System.Drawing.Image)
Me.ButtonItem13.Name = "ButtonItem13"
Me.ButtonItem13.SubItemsExpandWidth = 24
Me.ButtonItem13.Text = "E&xit"
'
'ButtonItem1
'
Me.ButtonItem1.Name = "ButtonItem1"
Me.ButtonItem1.Text = "ButtonItem1"
'
'QatCustomizeItem1
'
Me.QatCustomizeItem1.Name = "QatCustomizeItem1"
'
'TabControl1
'
Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.TabControl1.Location = New System.Drawing.Point(0, 103)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(1195, 328)
Me.TabControl1.TabIndex = 1
'
'Form6
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1195, 431)
Me.Controls.Add(Me.TabControl1)
Me.Controls.Add(Me.RibbonControl1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "Form6"
Me.Text = "Photon"
Me.RibbonControl1.ResumeLayout(False)
Me.RibbonControl1.PerformLayout()
Me.RibbonPanel1.ResumeLayout(False)
Me.RibbonBar1.ResumeLayout(False)
Me.RibbonBar1.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents RibbonControl1 As DevComponents.DotNetBar.RibbonControl
Friend WithEvents RibbonPanel1 As DevComponents.DotNetBar.RibbonPanel
Friend WithEvents RibbonBar1 As DevComponents.DotNetBar.RibbonBar
Friend WithEvents RibbonPanel2 As DevComponents.DotNetBar.RibbonPanel
Friend WithEvents RibbonTabItem1 As DevComponents.DotNetBar.RibbonTabItem
Friend WithEvents RibbonTabItem2 As DevComponents.DotNetBar.RibbonTabItem
Friend WithEvents Office2007StartButton1 As DevComponents.DotNetBar.Office2007StartButton
Friend WithEvents ItemContainer1 As DevComponents.DotNetBar.ItemContainer
Friend WithEvents ItemContainer2 As DevComponents.DotNetBar.ItemContainer
Friend WithEvents ItemContainer3 As DevComponents.DotNetBar.ItemContainer
Friend WithEvents ButtonItem2 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem3 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem4 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem5 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem6 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem7 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents GalleryContainer1 As DevComponents.DotNetBar.GalleryContainer
Friend WithEvents labelItem8 As DevComponents.DotNetBar.LabelItem
Friend WithEvents ButtonItem8 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem9 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem10 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem11 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ItemContainer4 As DevComponents.DotNetBar.ItemContainer
Friend WithEvents ButtonItem12 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem13 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem1 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents QatCustomizeItem1 As DevComponents.DotNetBar.QatCustomizeItem
Friend WithEvents Back As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem15 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents LabelItem1 As DevComponents.DotNetBar.LabelItem
Friend WithEvents LabelItem2 As DevComponents.DotNetBar.LabelItem
Friend WithEvents ButtonItem14 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem16 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem17 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem18 As DevComponents.DotNetBar.ButtonItem
Private Sub Form6_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Browser As New WebBrowser
TabControl1.TabPages.Add("New Page")
Browser.Name = "Web Browser"
Browser.Dock = DockStyle.Fill
TabControl1.SelectedTab.Controls.Add(Browser)
Int = Int() + 1
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()
End Sub
Private Sub Back_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Back.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoBack()
End Sub
Private Sub ButtonItem15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem15.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoForward()
End Sub
Private Sub ButtonItem14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem14.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Refresh()
End Sub
Private Sub ButtonItem16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem16.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Stop()
End Sub
Private Sub ButtonItem17_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem17.Click
Dim Browser As New WebBrowser
TabControl1.TabPages.Add("New Page")
TabControl1.SelectTab(Int)
Browser.Name = "Web Browser"
Browser.Dock = DockStyle.Fill
TabControl1.SelectedTab.Controls.Add(Browser)
Int = Int() + 1
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()
End Sub
Private Sub ButtonItem18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem18.Click
If Not TabControl1.TabPages.Count = 1 Then
TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)
TabControl1.SelectTab(TabControl1.TabPages.Count - 1)
Int = Int() - 1
End If
End Sub
Friend WithEvents ButtonItem19 As DevComponents.DotNetBar.ButtonItem
Friend WithEvents ButtonItem20 As DevComponents.DotNetBar.ButtonItem
Private Sub ButtonItem19_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem19.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()
End Sub
Private Sub ButtonItem20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonItem20.Click
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox1.Text)
End Sub
End Class