以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  导航栏设计的几个问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1508)

--  作者:julia
--  发布时间:2008/12/28 21:57:00
--  导航栏设计的几个问题
今天我们版主对我相当的好,很仔细的解决了我的很多问题,我觉得很开心.最后他留下一个问题让我自已去学着看帮助.可是我用了2个小时最后的结果还是一无所获.朋友你可别生气.图片点击可在新窗口打开查看最后还是要把这个问题放在这里让大家帮我解决一下.谢了.脑子笨就是没办法的啦

请问

用导航栏,如何打开指定表. 导航栏里有不同的页面,我想一个页面能够打开一个指定表,这如何操作.谢了


--  作者:gdlgh
--  发布时间:2008/12/28 23:20:00
--  
导航栏每个页面有个ID或页面,只要判断返回那个ID或页面就打开那个表就行了!

SelectedIndex

整数型,返回或者设置导航栏选定页面的位置。


示例

 

Dim Bar As WinForm.NavBar
Bar = e.Form.Controls(
"NavBar1")
Select Case Bar.SelectedIndex
    Case
 0
        Maintable = Tables("表1")

    Case
 1
        Maintable = Tables("表2")

    Case
 2
        Maintable = Tables("表3")

    Case
 3
        Maintable = Tables("表N")
End Select


--  作者:julia
--  发布时间:2008/12/29 8:44:00
--  

系统重启后打开文件,我的导航栏总是先打开CASE 3也就是最底下的那一栏,怎么样才能让他先打开CASE 0 也就是最上面的那栏?


--  作者:狐狸爸爸
--  发布时间:2008/12/29 8:59:00
--  

设置在窗口的AfterLoad事件中:

Dim
Bar As WinForm.NavBar
Bar = e.Form.Controls(
"NavBar1")
Bar.SelectedIndex = 0

[此贴子已经被作者于2008-12-29 8:59:55编辑过]

--  作者:狐哥
--  发布时间:2008/12/29 14:21:00
--  
以下是引用gdlgh在2008-12-28 23:20:00的发言:
导航栏每个页面有个ID或页面,只要判断返回那个ID或页面就打开那个表就行了!

SelectedIndex

整数型,返回或者设置导航栏选定页面的位置。


示例

 

Dim Bar As WinForm.NavBar
Bar = e.Form.Controls(
"NavBar1")
Select Case Bar.SelectedIndex
    Case
 0
        Maintable = Tables("表1")

    Case
 1
        Maintable = Tables("表2")

    Case
 2
        Maintable = Tables("表3")

    Case
 3
        Maintable = Tables("表N")
End Select




看了几次帮助,仍不是很懂,能否做个实例。


--  作者:gdlgh
--  发布时间:2008/12/29 15:02:00
--  
好简单的!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table