主题：窗体问题

你好，表客户写手信息，我设置了两个窗口“侧边导航窗口”和“主窗口”；前者是Nurbar，后者是页面集合。
此主题相关图片如下：222.jpg

我设置的代码：

Dim tab As WinForm.TabControl = e.Form.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

 

此主题相关图片如下：333.png

 

此主题相关图片如下：444.png

子问题：是不是Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
这句话定义有问题。

 

如果在一个 窗口中定义另一个窗口的控件，不能用e.Form.Controls？

如果是，那正确的应该怎么写？相关参考的教程在哪？

If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("控件名")

……

老兄，看不懂，请帮我在这个基础上改一下把

 

Dim tab As WinForm.TabControl = e.Form.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

老兄，看不懂，请帮我在这个基础上改一下把   Dim tab As WinForm.TabControl = e.Form.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

老兄，看不懂，请帮我在这个基础上改一下把   Dim tab As WinForm.TabControl = e.Form.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

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表示触发事件的窗口，也就是导航栏所在的窗口，你要引用的是右边的窗口，必须用窗口名称。