以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]还是关于窗口问题——已解决  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40045)

--  作者:hovi
--  发布时间:2013/9/7 13:03:00
--  [求助]还是关于窗口问题——已解决

想实现图中所能实现的功能。

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl2")
 tab.SelectedIndex = 0

Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "养殖户信息"
         MainTable = Tables("养殖户信息(这里改成了要指向的页面号)")
End Select

 

都用了,但是不知道怎么把两个结合起来,气结啊,变了很多方法,请教老师来了,多谢。


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130907125824.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2013-9-7 16:31:11编辑过]

--  作者:Bin
--  发布时间:2013/9/7 14:03:00
--  
e.Form.Controls("TabControl1").SelectedIndex=2  


--  作者:hovi
--  发布时间:2013/9/7 14:12:00
--  

BIN老师,我已经有一个这样的指向了,上面的图标是指向page1-page9的

在下部窗口中我建立了导航,为了分别指向右侧的page1-page3。还请详细指点。谢谢。


--  作者:狐狸爸爸
--  发布时间:2013/9/7 14:14:00
--  

参考:

 

http://www.foxtable.com/help/topics/0876.htm

 


--  作者:狐狸爸爸
--  发布时间:2013/9/7 14:19:00
--  

稍微变通下:

 

Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "页面1"
         e.Form.Controls("TabControl1").SelectedIndex = 0
    Case "页面2"
         e.Form.Controls("TabControl1").SelectedIndex = 1
    Case "页面3"
         e.Form.Controls("TabControl1").SelectedIndex = 2
End Select


--  作者:hovi
--  发布时间:2013/9/7 16:18:00
--  

搞定~多谢指教了。图片点击可在新窗口打开查看

 

想请问下,你们给的这个网页面的帮助与狐表里的帮助好像不是完全一样啊。


--  作者:Bin
--  发布时间:2013/9/7 16:24:00
--  
是完全一样的,前提你得是最新版的狐表.
--  作者:hovi
--  发布时间:2013/9/7 16:31:00
--  

果然一样,谢谢了啊。