Question

表格结构：

a）在form1上有4个复选框，form2有一个带有4个tabpages的tabcontrol1。

b）form1上的每个复选框都与form2上的标签页链接。

c）每个标签页都有固定的控件。

我正在努力实现以上结构，

a）在form1上使用“确定”按钮，我想向用户显示那些选项卡选中复选框。

b）使用form2上的“取消”按钮，我想恢复所有带控件的标签页。

我尝试过关注但是没有按预期工作，并添加了空白的标签页。

form1上的“确定”按钮下的代码：

If CheckBox1.Checked Then
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(1))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(2))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(3))
End If
If CheckBox2.Checked Then
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(0))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(2))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(3))
End If
If CheckBox3.Checked Then
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(0))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(1))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(3))
End If
If CheckBox4.Checked Then
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(0))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(1))
   Form2.TabControl1.TabPages.Remove(Form2.TabControl1.TabPages(2))
End If
Me.Hide()
Form2.Show()

Form2上“取消”按钮下的代码：

Me.Refresh()
TabControl1.TabPages.Insert(1, TabPage2)
TabControl1.TabPages.Insert(2, TabPage3)
Me.Hide()
Form1.Show()

Answer 1

不使用删除标签页，而是使用TabPage的隐藏（）和Show（）函数。

隐藏＆amp;显示Tabpages vb.net（这里有什么问题？）

1 个答案: