Foxtable(狐表)用户栏目专家坐堂 → selectindexchanged问题


  共有1932人关注过本帖树形打印复制链接

主题:selectindexchanged问题

帅哥哟,离线,有人找我吗?
Rhonin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:142 积分:1115 威望:0 精华:0 注册:2017/4/21 9:36:00
selectindexchanged问题  发帖心情 Post By:2017/10/25 10:45:00 [显示全部帖子]

求助一下大佬代码为什么不报错也不执行啊
Dim nb As WinForm.NavBar = forms("main").Controls("导航中心")
For i As Integer = 0 To nb.NavPages.count-1
    nb.NavPages(i).Visible = False
Next
nb.Navpages(14).visible=True
If e.sender.SelectedPage.Name = "page1" Then
    For i As Integer = 0 To nb.NavPages.count-1
        nb.NavPages(i).Visible = False
    Next
    nb.Navpages(14).visible=True
ElseIf e.sender.SelectedPage.Name = "page2,page10" Then
    For i As Integer = 0 To nb.NavPages.count-1
        nb.NavPages(i).Visible = False
    Next
    nb.Navpages(0).visible=True
    nb.Navpages(1).visible=True
    nb.Navpages(14).visible=True
end if 

其中导航中心是一个navbar控件

 回到顶部
帅哥哟,离线,有人找我吗?
Rhonin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:142 积分:1115 威望:0 精华:0 注册:2017/4/21 9:36:00
  发帖心情 Post By:2017/10/25 11:06:00 [显示全部帖子]

多谢多谢 搞定了,页面名称忘写上了,它默认是空的,但是为什么不报错呢...

 回到顶部