- 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=79584)
-- 发布时间：2016/1/5 14:21:00
-- TopicBar的动态判定和执行
在TopicLinkClick事件中，想执行判定，根据打开情况和点击的任务做不同的反应，如筛选。。
帮助中没找到介绍，该怎么用呢？
Dim tbp As WinForm.TopicBar = e.Form.Controls("账本TopicBar1")
If e.Page.Collapsed = True Then \'判定页面打开
For Each pg As WinForm.TopicPage In tbp.Pages \'遍历页面
For Each lnk As WinForm.TopicLink In pg.Links \'遍历页面下的任务
lnk.Text = lnk.Text.Trim("←")
Next
Next
e.Link.Text = e.Link.Text & "←" \'设置活动状态下的任务标题
Tables("主界面_主查询Table1").Filter = "[移动单元] = \'" & e.Page.Name & "\'and [物料类别] = \'" & e.Link.Name & "\'"
End If
-- 发布时间：2016/1/5 14:43:00
--
没看懂你什么意思，你代码没错啊。
-- 发布时间：2016/1/5 14:51:00
--
if 返回 false
Collapsed没有判断属性
改了代码，不做判断了，希望不会报错.................
此主题相关图片如下：截图20160105144836.png
[此贴子已经被作者于2016/1/5 14:51:13编辑过]
-- 发布时间：2016/1/5 14:54:00
--
你能够点击Link，此Page肯定是要在打开状态的。