主题：[求助]NAVBAR控件，点击每个页面，都能打开不同的窗口？？

示例

假定导航栏有三个页面，标题分别是页面1、页面2、页面3，希望选择这些页面时，能同时切换到对应的表A、表B、表C。

为此可以将SelectedIndexChanged事件代码设置为：

Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "页面1"
         MainTable = Tables("表A")
    Case "页面2"
         MainTable = Tables("表B")
    Case "页面3"
         MainTable = Tables("表C")
End Select

根据以上示例，我想设置点击页面1，打开窗口1

                      点击页面2，打开窗口2

                      点击页面3，打开窗口3

请问代码怎么写？

forms("窗口1").Show

-----------

forms("窗口2").Show