- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求解：如何根据列名自动生成目录树 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83044)
-- 发布时间：2016/3/30 10:19:00
-- 求解：如何根据列名自动生成目录树
想根据表的列名自动生成目录树，该怎么写代码
-- 发布时间：2016/3/30 10:30:00
--
参考
http://www.foxtable.com/help/topics/0893.htm
http://www.foxtable.com/help/topics/1970.htm
-- 发布时间：2016/3/30 10:39:00
--
我想根据的是所有列的列名生成目录树，而不是根据列的内容生成目录树
-- 发布时间：2016/3/30 10:43:00
--
此主题相关图片如下：69o0ywa1{kmz%3{`if)wm5.png
-- 发布时间：2016/3/30 10:43:00
--
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each t As Table In Tables
Dim tnd As WinForm.TreeNode = trv.nodes.Add(t.name)
For Each c As Col In t.cols
tnd.nodes.Add(c.name)
Next
Next