目录树的NodeMouseDoubleClick事件代码设置为:
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")If e.Node.Name = "全部" Then Tables("会计科目").Filter = ""Else Tables("会计科目").Filter = "科目代码 Like '" & e.Node.Name & "%'"End If
这样双击某个节点,即可将此节点及其子节点对应的行全部筛选出来。
这是原始例子的代码;
现在我想改一下: 双击某个节点,将此节点及其子节点对应的最末一级科目全部筛选出来,要如何改代码?
不是在目录树里筛选,是在表里面筛选