我在主窗口中分别有两个tabcontrol控件我希望通过navbar来控制两个tabcontrol的显示,当点击tab1的时候显示第一个tabcontrol,同时隐藏第二个tabcontrol,点击tab2的时候显示第二个tabcontrol,隐藏第一个
我在navbar中这样设置了
Dim bar As WinForm.NavBar = e.sender
Dim t0 As WinForm.TabControl = e.Form.Controls("TabControl_人事管理")
Dim t1 As WinForm.TabControl = e.Form.Controls("TabControl1")
Select Case bar.SelectedPage.ButtonText
Case "tab1"
t0.Visible = True
t1.Visible = False
Case "tab2"
t0.Visible = False
t1.Visible = True
End Select
但是只是第一个case起作用,第二个case 不起作用,麻烦帮我看看,谢谢
[此贴子已经被作者于2012-7-8 22:17:09编辑过]