帮助文件里这个目录树的代码怎么写？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 帮助文件里这个目录树的代码怎么写？

共有2228人关注过本帖树形打印复制链接主题：帮助文件里这个目录树的代码怎么写？

柚柚

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：66 积分：549 威望：0 精华：0 注册：2014/6/22 23:45:00

帮助文件里这个目录树的代码怎么写？ 发帖心情

Post By：2015/10/12 11:21:00 [只看该作者]

Dim s As String
'请在这里设置代码从数据表中获得目录树字符串,并赋值给变量s
Dim tb As New DropTreeBuilder
tb.TreeString = s '设置目录树字符串
tb.ReceiveCols = "大类|二类|三类" '指定数据接收列
Tables("订单").Cols("大类").DropTree = tb.Build()

这个第二行代码怎么写？

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/10/12 11:25:00 [只看该作者]

你是不是要这样啊？

Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("行政区域") '指定目录树表
tb.TreeCols = "省|县市" '指定用于生成目录树的列
tb.SourceCols = "省|县市|区号|邮编" '指定数据来源列
tb.ReceiveCols = "省|县市|区号|邮编" '指定数据接收列
Tables("客户").Cols("省").DropTree = tb.Build()

下一主题 >> << 上一主题

主题：帮助文件里这个目录树的代码怎么写？