LayersTree无法展开 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

在窗口中加入一个控件

在窗口加载后加入代码：

Dim trv As WinForm.LayersTree = e.Form.Controls("LayersTree1")

Dim st As New LayerTreeSetting

st.PathCol = "第一列"

st.Separator = "/"

st.IncludeSub = True

st.GridTree = True ‘逻辑性，指定是否自动开启折叠模式，默认为False。

st.ExpandTo = -1 ’整数型，指定折叠树默认展开级别，默认为0,也就是都不展开，如果设置为-1，则全部展开

trv.BuildBomTree(Tables("文件服务器"), st)

问， GridTree = True ？ ExpandTo = -1 为什么不自动展开？

另外，这个生成的层级树，可以像 TreeView 一样，单独设置节点的字体和颜色的吗？因为我想把每一个大层的节点显示出来不一样的颜色。

主题：LayersTree无法展开