主题：[求助]多表目录树

If DataTables("电气工程量").Find(filter) IsNot Nothing Then
e.Form.Controls("电气").Select
       
    Tables("工程量输入_电气").Filter = Filter
End If

If DataTables("水卫工程量").Find(filter) IsNot Nothing Then
    Tables("工程量输入_水卫").Filter = Filter   
    e.Form.Controls("水卫").Select
End If

 

我这样写，窗体表没有激活，为什么

 呃，你说的没激活是什么意思？你是不是应该要切换页签（选项卡）？

是的

 

 你切换呗。页签.SelectedPage = 页签.TabPages("xxx")

甜老师，请教一个问题，就是希望从2个表里提取部分列生成到一个目录树里，如果2个表的需要生成目录树的列不一样，希望同一个表生成的目录树放在一个节点下，应该要怎么写代码啊？

甜老师，请教一个问题，就是希望从2个表里提取部分列生成到一个目录树里，如果2个表的需要生成目录树的列不一样，希望同一个表生成的目录树放在一个节点下，应该要怎么写代码啊？

参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=127148&skin=0