以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]NAVBAR控件,点击每个页面,都能打开不同的窗口??  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=81594)

--  作者:起源
--  发布时间:2016/3/1 18:48:00
--  [求助]NAVBAR控件,点击每个页面,都能打开不同的窗口??

示例

假定导航栏有三个页面,标题分别是页面1、页面2、页面3,希望选择这些页面时,能同时切换到对应的表A、表B、表C。

为此可以将SelectedIndexChanged事件代码设置为:

Dim bar As WinForm.NavBar = e.sender
Select
 Case bar.SelectedPage.ButtonText
    Case "
页面1"
         MainTable = Tables("
A")
    Case "
页面2"
         MainTable = Tables("
B")
    Case "
页面3"
         
MainTable = Tables("表C")
End
 Select






根据以上示例,我想设置点击页面1,打开窗口1

                      点击页面2,打开窗口2

                      点击页面3,打开窗口3


请问代码怎么写?


--  作者:大红袍
--  发布时间:2016/3/1 22:39:00
--  

forms("窗口1").Show

 

-----------

 

forms("窗口2").Show


--  作者:起源
--  发布时间:2016/3/2 11:56:00
--  
解决了,谢了图片点击可在新窗口打开查看