主题：如何设置目录树的筛选条件

现在有一个销售表，需要从库存表中筛选出相应库存数据，以方便销售。

两表通过“品名助记码”和“批号”建立了关联。

商品数量比较大，每一个商品也有两个以上批号，而且，有的批号库存为零，每个批号的进货价可能不相同。

 

我在销售表的“品名助记码”列使用了项目列表，可以在商品表中引用品名、产地、规格等数据，但是批号、进货价等数据需要根据输入的品名助记码从库存表中获得。

 

我在销售表的“批号”列使用了目录树，但是目录树展示的是全部库存品种的批号信息。

 

我怎么样才能根据已经输入的“品名助记码”，筛选出需要的目录树呢？

 

我在“项目事件”的maintablechanged事件中设置了如下代码，但是没有达到目的，是什么原因呢？

 

Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("kcmx")
tb.TreeFilter = "[pmzjm] = '" & Vars("pmzjm") & "'"
tb.TreeCols = "ph|jysl"
tb.SourceCols = "ph|jysl|lsj|jj"
tb.ReceiveCols = "ph|kcsl|lsj|jj"
Tables("xsdmx").Cols("ph").DropTree = tb.Build()

晕，怎样才能只看到我所需要的商品的批号和库存目录树信息呢？

狐爸，

这一章我已经看了好几遍了，我就想知道目录树怎么设置动态筛选条件，因为我在上面设置的筛选条件不起作用，开始的时候是在ph列下拉菜单中全部显示所有商品的信息，后来再打开项目时发现这个表达式把所以信息都拦截掉了，下拉菜单是空白。

 

我舍得条件在哪里出问题了呢？

tb.TreeFilter = "[pmzjm] = '" & Vars("pmzjm") & "'"

 

还有就是在作为主表的时候的这个设置，在它作为关联子表的时候怎么连下拉菜单都不出现呢？

楼上的这位，广告不能乱发啊。

 

狐爸，

这一章我已经看了好几遍了，我就想知道目录树怎么设置动态筛选条件，因为我在上面设置的筛选条件不起作用，开始的时候是在ph列下拉菜单中全部显示所有商品的信息，后来再打开项目时发现这个表达式把所以信息都拦截掉了，下拉菜单是空白。

 

我舍得条件在哪里出问题了呢？

tb.TreeFilter = "[pmzjm] = '" & Vars("pmzjm") & "'"

 

还有就是在作为主表的时候的这个设置，在它作为关联子表的时候怎么连下拉菜单都不出现呢？

谢谢狐爸，我已经不使用目录树了，已经通过别的方法实现了同样的功能，而且比以前的方案更加方便。

狐爸说的啃狐表的帮助文件这句话太对了。

还是帮助文件看的不熟。