以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  目录树，增加节点怎么写代码？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101851)

--  作者：yancheng --  发布时间：2017/6/8 13:10:00 --  目录树，增加节点怎么写代码？ Dim cmd As New SQLCommand Dim dt As DataTable cmd.C cmd.CommandText = "Se lect Distinct Year(凭证明细.日期) As 年, Month(凭证明细.日期) As 月,凭证明细.合同名称,凭证明细.供应商,凭证明细.客户," &  _ "凭证明细.项目名称,凭证明细.会计科目_一级科目,凭证明细.会计科目_二级科目,会计科目.科目代码 As 科目代码,凭证明细.会计科目_三级科目 From {凭证明细} , {会计科目} where {凭证明细}.科目代码 = {会计科目}.科目代码" dt = cmd.ExecuteReader() If dt.DataRows.Count > 0 Then     Dim tv As WinForm.TreeView = e.Form.Controls("TreeView2")     tv.StopRedraw     tv.Nodes.Clear     tv.BuildTree(dt,"会计科目_一级科目|会计科目_二级科目|会计科目_三级科目","","")     tv.Nodes.Insert("全部",0)     tv.Nodes(1).Expand()     tv.ResumeRedraw() End If 现在我是这样写的。目录树生成； 问题1： 怎么把这个目录树，做一个分类：{"全部","资产","负债","权益","成本","损益"}，上第一级目录树，做这些分类； 问题2：我这个凭证明细中不同的会计科目，它们有不同的核算项目：如：{供应商，员工，合同，项目}  怎么才能加到第二级或第三级节点 中去？（同时，我筛选时，希望能获取：节点的datarow的方式）） 此主题相关图片如下：11.png

--  作者：有点蓝 --  发布时间：2017/6/8 14:30:00 --   只能手工生成节点了，参考：http://www.foxtable.com/webhelp/scr/2502.htm