OpenInlineBomTree(内联)
Foxtable内置的BOM树非常强大,如果你对BOM树还不太了解,请务必回到使用指南学习掌握BOM树的
设置和使用。
Table的OpenInlineBomTree方法用于打开内联BOM树。
OpenInlineBomTree的语法为:
OpenInlineBomTree(Setting, Size)
Setting: InlineTreeSetting类型,用于设置BOM树。
Size: 整数型,可选,用于指定目录树宽度,单位为像素。
InlineTreeSetting的相关属性有:
ParentCol: 字符型,指定父列名称。
ChildCol: 字符型,指定子列名称。
TextCol: 字符型,用于指定标题列,如果省略,则目录树节点的标题来自于ChildCol指定的子列。
ValueCol: 字符型,用于指定数值列
SortCol: 字符型,指定排序列,参考:排序节点
SortDesc: 逻辑型,是否降序排序
IncludeSub: 逻辑型,指定是否显示子目录数据,默认为True。
GridTree: 逻辑性,指定是否自动开启折叠模式,默认为False。
ExpandTo: 整数型,指定折叠树默认展开级别,默认为0,也就是都不展开,如果设置为-1,则全部展开。
示例一
1、打开CaseStudy目录下的实例文件: BOM数据.Table
2、选择"物料清单A"表,在命令窗口执行下面的代码:
Dim
st As
New
InlineTreeSetting
st.ParentCol
= "上级"
st.ChildCol
= "物料"
st.ValueCol
= "用量"
st.GridTree
= True
Tables("物料清单A").OpenInlineBomTree(st)
得到的BOM树如下图:
示例二
1、打开CaseStudy目录下的实例文件: BOM数据.Table
2、选择"部门表",在命令窗口执行下面的代码:
Dim
st As
New
InlineTreeSetting
st.ParentCol
= "parentid"
st.ChildCol
= "id"
st.TextCol
= "name"
st.SortCol
= "order"
st.IncludeSub
= False
Tables("部门").OpenInlineBomTree(st)
得到的BOM树如下图: