V návrhovém režimu vytvořte TabControl s názvem TabControl1 a Button s názvem Button1.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TabControl1.TabPages.Add("tabPage3", "TabPage3")
Dim tabPage3 As TabPage = TabControl1.TabPages("tabPage3")
Dim textBox1 As New TextBox
textBox1.Dock = DockStyle.Fill
tabPage3.Controls.Add(textBox1)
End Sub
|