VB build Tab dynamically ทำอย่างไร ขอความช่วยเหลือหน่อยครับ

 Private myTabControl As TabControl
    Private myTabPage As TabPage
 'build myTabGroup
    Private Sub BuildTabGroup()
        'build tabcontrol
        myTabControl = New TabControl()
        myTabControl.Size = New Size(200, 200)
        'myTabControl.Appearance = TabAppearance.FlatButtons
        flowlayoutpanelContent.Controls.Add(myTabControl)

        'build tabpage
        myTabPage = New TabPage()
        myTabPage.Text = "กาแฟร้อน"
        myTabControl.Controls.Add(myTabPage)

        myTabPage = New TabPage()
        myTabPage.Text = "กาแฟเย็น"
        myTabControl.Controls.Add(myTabPage)

        myTabPage = New TabPage()
        myTabPage.Text = "กาแฟปั่น"
        myTabControl.Controls.Add(myTabPage)

    End Sub

        Me.tabDetailAll.TabPages.Remove(Me.tpPayment)
        Me.tabDetailAll.TabPages.Add(Me.tpPayment)