以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Q:BOM树问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23147)

--  作者:hp001
--  发布时间:2012/9/3 17:08:00
--  Q:BOM树问题

我的BOM树是设计有父子表的

1、筛选到那个货号,就显示那个货号的树结构

2、现在我设计的这个树会把其他的货号的树结构也带出来

3、有啥好办法解决。


--  作者:hp001
--  发布时间:2012/9/3 17:10:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目9.zip


--  作者:狐狸爸爸
--  发布时间:2012/9/3 17:53:00
--  

看不懂你的问题,不能具体一点吗?

最好举例说明。

 


--  作者:hp001
--  发布时间:2012/9/3 18:34:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看
 如图

 


--  作者:hp001
--  发布时间:2012/9/3 18:38:00
--  

这个树我是父子表关联的,

如货号,DXA-1010D02-40-CA 这个是一个货号

我是要体现这个货号的BOM树

结果把其他的也体现出来了

我想设计一个过滤,

查询到这个货号即体现这个货号的树结构,其他的不要


--  作者:狐狸爸爸
--  发布时间:2012/9/3 23:23:00
--  
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode
Dim dt As DataTable = DataTables("ABOM明细")
tr.StopRedraw()
tr.Nodes.Clear
tr.Nodes.Add("全部")
For Each dr As DataRow In dt.datarows.Select("筛选条件表达式")
    If dr.IsNull("母件编号") Then
        nd = tr.Nodes.Add(dr("零件代号"))
        Functions.Execute("AddChildren",nd,dt)
    End If
Next
tr.ResumeRedraw()