- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- GenerateTree怎么添加根节点，把生成的节点做为二级节点 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=126021)
-- 发布时间：2018/10/12 11:30:00
-- GenerateTree怎么添加根节点，把生成的节点做为二级节点
GenerateTree怎么添加根节点，把生成的节点做为二级节点
如图，把文档中心做为根节点
GenerateTree生成的节点，全部在 文档中心节点下
此主题相关图片如下：qq图片20181012112928.png
-- 发布时间：2018/10/12 11:52:00
--
参考代码
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
tr.GenerateTree(DataTables("表A"),"代码","名称",".")
Dim btr = tr.basecontrol
tr.nodes.add("根目录", "根目录")
Dim pnd = btr.nodes("根目录")
For i As Integer = btr.nodes.count-2 To 0 Step -1
Dim nd = btr.nodes(i)
btr.nodes.remove(nd)
pnd.nodes.Insert(i, nd)
Next
-- 发布时间：2018/10/12 12:39:00
--
这样太麻烦，还不如直接用 代码 递归生成
参考 用递归函数生成会计科目
此主题相关图片如下：qq图片20181012123957.png
此主题相关图片如下：qq图片20181012123957.png[此贴子已经被作者于2018/10/12 12:40:15编辑过]