主题：窗体问题

Dim tab As WinForm.TabControl = Forms("右边窗口名称").Controls("TabControl1")
Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "任务总目录"
        tab.SelectedIndex = 0
    Case "任务进度条"
        tab.SelectedIndex = 1
    Case "写手客户信息"
        tab.SelectedIndex = 2
End Select

e.Form表示触发事件的窗口，也就是导航栏所在的窗口，你要引用的是右边的窗口，必须用窗口名称。