主题：[求助],navbar的控件代码如何转到tabcontrol

设计了一个界面，NAVBAR在左，tabcontrol在右，设计如下代码

Dim bar As WinForm.NavBar = e.sender

Select Case bar.SelectedPage.ButtonText
    Case "客户管理"
         Dim tab As winform.tabcontrol
         tab = e.Form.Controls("TabControl1")
         tab.SelectedIndex = 0
         MainTable = Tables("表A")
    Case "供应商管理"
         Dim tab As winform.tabcontrol
         tab = e.Form.Controls("TabControl1")
         tab.SelectedIndex = 1

end select

运行时出现如下问题：

请问如何解决？请高手指点一下

我的代码是放在 NAVBAR中的selectedindexchanged事件中的

直接上例子，请直接修改