- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助：用目录树管理表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98721)
-- 发布时间：2017/4/5 20:04:00
-- 求助：用目录树管理表
通过目录树选择表之后，是否可以在表这个节点再做子节点，完成对表格中某些列的筛选？
谢谢！
此主题相关图片如下：无标题.jpg
此主题相关图片如下：无标题.jpg[此贴子已经被作者于2017/4/5 20:04:11编辑过]
-- 发布时间：2017/4/5 21:01:00
--
AfterSelectNode事件，写代码
If Tables.Contains(e.Node.text) Then
e.node.Nodes.Clear
For Each c As Col In Tables(e.node.text).cols
e.node.nodes.Add(c.name)
Next
End If
-- 发布时间：2017/4/5 22:03:00
--
谢谢色老师，感觉有点意思了，但是我还是不太会在此基础上扩展。可能是我没有表达清楚。
我想要的效果是：在表A中，第一列有三个参数，A/B/C，分别有很多行，我希望在目录树中表A做个节点能进一步对某列进行筛选，即对第一列这A/B/C筛选出目录树的样式来，可分别点击A/B/C显示相关的行信息。
谢谢！
-- 发布时间：2017/4/6 0:44:00
--
做个具体的实例上传上来吧。
-- 发布时间：2017/4/6 9:37:00
--
好的，见附件！
即可通过选择节点Q或w或R，完成对表A中客户列的相同名称的筛选显示。
此主题相关图片如下：无标题.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:test0406.rar |
谢谢！
-- 发布时间：2017/4/6 9:41:00
--
If e.Node.Level = 1 Then
MainTable = Tables(e.Node.Text)
Else If e.node.level = 2 Then
MainTable = Tables(e.Node.ParentNode.Text)
MainTable.filter = "客户 = \'" & e.node.text & "\'"
End If
-- 发布时间：2017/4/6 10:13:00
--
太好了，搞定了，谢谢！