以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  目录树  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107202)
--  作者：cqli
--  发布时间：2017/9/23 10:14:00
--  目录树
你好！
代码建目录树，如何生成子节点的子节点，即生成三层，Level2的代码怎么写


Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode
nd = Trv.Nodes.Add("A1","A1")
nd.Nodes.Add("A11")
--  作者：有点蓝
--  发布时间：2017/9/23 10:26:00
--  
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode
nd = Trv.Nodes.Add("A1","A1")
Dim nd2 As WinForm.TreeNode = nd.Nodes.Add("A11")
nd2.Nodes.Add("A111")