Dim Tab As New TabPage
Tab.Name = "bomo"
Tab.Text = "选项卡x"
Dim MyForm As New Form2
MyForm.TopLevel = False
Tab.Controls.Add(MyForm)
TabControl1.TabPages.Add(Tab)
MyForm.Show()
以上是测试显示的代码,显示到新选项卡下没问题, 但是当主窗体放大缩小时 选项卡设置了跟着变 但是选项卡下显示的窗体不会跟着变化大小。 求教!
------解决方案--------------------
你设置一下控件的 Dock属性
Dim Tab As New TabPage
Tab.Name = "bomo"
Tab.Text = "选项卡x"
Dim TabContainer As New TabControl
TabContainer.Controls.Add(Tab)
TabContainer.Dock = DockStyle.Fill
Dim MyForm As New Form
MyForm.TopLevel = False
Tab.Controls.Add(MyForm)
MyForm.Dock = DockStyle.Fill
MyForm.Show()
Me.Controls.Add(TabContainer)
------解决方案--------------------
MyForm.Dock=Fill