主题：[求助]Tabcontrol页面转换问题（已解决，谢！）

各位专家好，有如下问题急需求助：

窗口里一个Tabcontrol控件，如下图：

此主题相关图片如下：win_total.jpg

不同的页面是不同的功能，通过一个integer变量WinC控制页面转换：

导航的代码：

Select Case e.Link.Name
            Case "其他入库"
                Vars("WinC") = 0
                Forms("Win_Stock").Open
                MainTable = Tables("其他入库单")
            Case "其他出库"
                Vars("WinC") = 1
                Forms("Win_Stock").Open
                MainTable = Tables("其他出库单")
            Case "订单入库"
                Vars("WinC") = 2
                Forms("Win_Stock").Open
                MainTable = Tables("订单入库主文件") 
            Case "订单出库"
                Vars("WinC") = 3
                Forms("Win_Stock").Open
                MainTable = Tables("订单出库主文件")
            Case "库存调整"
                Forms("库存调整").Open
                MainTable = Tables("库存调整主文件")
           End Select

Win_Stock  AfterLoad代码：

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
'tab.ShowTabs =False

Select Case Vars("WinC")
    Case 0
                e.Form.Controls("Table_name").Text = "【其他入库单】"
    Case 1
                e.Form.Controls("Table_name").Text = "【其他出库单】"
    Case 2
                e.Form.Controls("Table_name").Text = "【订单入库单】"
    Case 3
                e.Form.Controls("Table_name").Text = "【订单出库单】"
End Select
tab.SelectedIndex = Vars("WinC")

现在的问题是，导航条上点击后窗口打不开。不知道为什么？

谢谢各位。