- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 表格下拉目录树 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179349)
-- 发布时间：2022/8/19 14:07:00
-- 表格下拉目录树
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("计算口径")
-- 发布时间：2022/8/19 14:17:00
--
使用下拉窗口做：http://www.foxtable.com/webhelp/topics/2350.htm