设置了一个主窗口
然后在主窗口打开后加载设置以下代码:
Dim bar As WinForm.NavBar = Forms("主窗口").controls("NavBar1")
bar.Navpages("page1").buttontext = 导航栏标题("A")
bar.Navpages("page2").buttontext = 导航栏标题("B")
bar.Navpages("page3").buttontext = 导航栏标题("C")
bar.Navpages("page4").buttontext = 导航栏标题("D")
再在NavBar1的SelectedIndexChanged设置以下代码
Dim bar As WinForm.NavBar = Forms("主窗口").controls("NavBar1")
Select Case bar.SelectedPage.name
Case "page1"
Forms("查看窗口A").open()
Case "page2"
Forms("查看窗口B").open()
Case "page3"
Forms("查看窗口C").open()
Case "page4"
Forms("查看窗口D").open()
End Select
当在主窗口点击NavBar1时,弹出查看窗口
问题:
发布后的项目,在其中一台电脑上点击NavBar1无反应
其它电脑正常
请问,NavBar1是与什么有关的,我这台电脑哪里出问题了
[此贴子已经被作者于2019/3/26 11:47:26编辑过]