以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  有关TopicBar 控件的使用  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2478)

--  作者:baoxyang
--  发布时间:2009/4/16 22:27:00
--  有关TopicBar 控件的使用
TopicBar 控件没有设置背景及字体,效果做出来,可否增加此功能?

TopicLinkClick

单击任务栏中某个任务后执行。

e参数属性:

Sender:返回触发事件的控件
Form:   返回控件所在的窗口
Link:   所单击的任务
Page:   任务所在的页面。

通常利用此事件,判断单击的是哪个页面中的哪个任务,然后执行相应的操作。

示例

Select Case e.Link.Name
    Case
"增加"
       
\'在此加入相应的代码
   
Case "移动"
       
\'在此加入相应的代码
   
Case "删除"
       
\'在此加入相应的代码
   
Case "主页"
       
\'在此加入相应的代码
End
Select

upload=bmp,未命名.bmp]UploadFile/2009-4/200941622233374819.bmp[/upload]上面说明看不明白,如何实现点击"入库单据管理"后找开窗口A?请教各位楼主了!

--  作者:czy
--  发布时间:2009/4/16 22:39:00
--  
Select Case e.Link.Name
    Case "入库单据管理"
        Forms("窗口A").Open()
    Case "红冲入库管理"
        \'在此加入相应的代码
    Case "退货入库管理"
        \'在此加入相应的代码
    Case "捆包库位位置"
        \'在此加入相应的代码
    Case "入库捆包查询"
        \'在此加入相应的代码
End Select

--  作者:baoxyang
--  发布时间:2009/4/16 22:48:00
--  
怎么点击没有找开窗体?好像没有反映.是否是用e.Forms("窗口A").Open()

--  作者:czy
--  发布时间:2009/4/16 23:14:00
--  
以下是引用baoxyang在2009-4-16 22:48:00的发言:
怎么点击没有找开窗体?好像没有反映.是否是用e.Forms("窗口A").Open()


不能用e参数的。
2楼的代码放在TopicBar控件的TopicLinkClick事件中。
刚测试,2楼的代码没有问题。


--  作者:baoxyang
--  发布时间:2009/4/17 0:08:00
--  

 哦,知道了.原来显示的标题,代码用的名称.而我设的时候名称与标题是不一致的.呵呵!