主题：NavBar控件问题

在NavBar控件的SelectedIndexChanged的事件中输入下面的代码

Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "页面1"
         Forms("窗口1").Open()

    Case "页面2"
         Forms("窗口2").Open()

    Case "页面3"
         Forms("窗口3").Open()

End Select

这个代码只能实现点击不同页面按钮标题后打开窗口,如果点击了"页面1"后关闭打开的窗口,再点击"页面1"代码无效了,该如何实现点击"页面1"后关闭窗口再点击"页面1"窗口照样能打开?

无效? 没有反应还是报错? 不应该会无效啊. 上个例子看看.

SelectedIndexChanged

选择不同页面后执行,所以在保持在同一个按钮的情况下,没达到执行代码的条件

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目29.zip

我明白你意思了.你把代码放到DOubleClick事件去即可.

如果是单击按钮标题后执行代码能实现吗?也就是把代码写到Click事件中,学生发现无法实现,在点击其他按钮标题时,按钮标志还停在原先位置,但已经达到执行代码条件.比如现在按钮标题为"页面1"单击"页面2"的时候打开的确实"窗口1",只有按钮标志在"页面2"的时候再单击"页面2"打开的才是"窗口2"

如果能有"单击按钮标题后"执行代码的事件就简单了

单击不行,单击会先触发Click事件再改变页面.

放到 MouseUp 事件里

MouseUp 事件 可行,感谢bin老师跟逛逛老师的帮助