以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  topicbar点击页面时如何获取所点击的页面?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170056)

--  作者:happyft
--  发布时间:2021/7/9 22:47:00
--  topicbar点击页面时如何获取所点击的页面?
想在topicbar的页面点击时再动态生成其下的任务links,但只有一个clikc事件,当中没有e.page的参数
现在只能遍历每个页面生成,
Dim tpb As WinForm.TopicBar = e.Form.Controls("TopicBar1")
\'点击某个页面时动态生成其下的任务
For Each pg As WinForm.TopicPage In tpb.Pages
    Select Case pg.Name
        Case "待处理"
            Dim tbs As List(Of String) = DataTables("表A").GetValues("单据名称")
            pg.Links.Clear()  \'先清空所有任务
            For Each tb As String In tbs
                pg.Links.Add(tb,tb)
            Next
        Case "已完成"
.......
    End Select
Next
上面的代码是所有节点都生成,我只想根据点击的那个页面来生成,要如何获取到点击的页面名称?

谢谢!

--  作者:有点蓝
--  发布时间:2021/7/10 9:26:00
--  
帮助都没有看过吧:http://www.foxtable.com/webhelp/topics/0869.htm
--  作者:HappyFt
--  发布时间:2021/7/10 10:10:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:任务栏.jpg
图片点击可在新窗口打开查看

帮助那个是点击页面下面的任务的事件,任务都还没有生成,我是要在点击页面时动态生成其下面的任务
--  作者:有点蓝
--  发布时间:2021/7/10 10:33:00
--  
展开事件TopicPageExpanded也有page参数的http://www.foxtable.com/webhelp/topics/2133.htm
--  作者:HappyFt
--  发布时间:2021/7/10 10:49:00
--  
TopicPageExpanded可以了,原以为会闪屏,结果不会,谢谢!