1、如上图所示:最终需要实现的目标是在图二:表B(数据表来源为图一:表A)的下拉框中显示如图三类似的目录如一级目录显示:1 总建面;二级目录显示1.1 地下建面。需要如何操作?
目前初步编制代码如下:
Dim kjml As New DropTreeBuilder
kjml.SourceTable = DataTables("表B)
kjml.TreeCols = "{序号}"
kjml.PathSeparator = "."
kjml.SourceCols = "计算口径"
kjml.ReceiveCols = "计算口径_内容"
kjml.ContentSeparator = "."
kjml.SeparateContent = False
Tables("表A").Cols("计算口径_内容").DropTree = kjml.Build()
2、如果中用Combolist实现下拉操作,能否实现上述显示?或者这个如何序号进行排序:
'Tables("表A").Cols("计算口径_内容").Combolist = DataTables("表B").GetComboListString("计算口径")