26 Nisan 2019 Cuma

VB.NET Create Dynamic TabControl and WebBrowser with ini section names


Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim LoadSettings As New clsIni("C:\settings.ini")
        Dim sites As String
        Dim url As String
        Dim array() As Integer = {1, 2, 3}
        Dim tb As TabControl = New TabControl
        For i As Integer = 1 To array.Length - 1
            sites = LoadSettings.GetString("site" & i, "name", "")
            url = LoadSettings.GetString("site" & i, "url", "")
            Dim page As TabPage = New TabPage
            Dim browser As WebBrowser = New WebBrowser
            tb.TabPages.Add(page)
            page.Text = sites
            Me.Controls.Add(tb)
            tb.Dock = DockStyle.Fill
            page.Controls.Add(browser)
            browser.Navigate(url)
            browser.Dock = DockStyle.Fill
        Next
    End Sub
End Class

VB.NET Create Filled Form Dynamic TabControl with ini section names


Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim LoadSettings As New clsIni("C:\settings.ini")

        Dim sites As String       

        Dim tb As TabControl = New TabControl

        For i As Integer = 1 To array.Length - 1

            sites = LoadSettings.GetString("site" & i, "name", "")

            Dim page As TabPage = New TabPage

            tb.TabPages.Add(page)

            page.Text = sites

            Me.Controls.Add(tb)

            tb.Dock = DockStyle.Fill

        Next

    End Sub

End Class

VB.NET Create Filled Form Dynamic TabControl


Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim tab As TabControl = New TabControl

        Dim page1 As TabPage = New TabPage

        tab.TabPages.Add(page1)

        Me.Controls.Add(tab)

        tab.Dock = DockStyle.Fill



    End Sub

End Class