- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 下拉目录树显示问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123480)
-- 发布时间：2018/8/15 16:56:00
-- 下拉目录树显示问题
在项目的CurrentTableChanged事件设如下代码，生成下拉列表，如图。想在图中生成目录树的“名称”列后标出“政府青苗补偿标准”和“业主青苗补偿标准”，如“稻谷|3000元|1052元”，请问老师能实现吗？该怎么修改代码？
For Each t As Table In Tables
If t.Name Like "*S征地明细*" Then
Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("S青苗补偿标准") \'指定目录树表
tb.TreeCols = "县区|乡镇|类别|名称" \'指定用于生成目录树的列
tb.SourceCols = "名称|单位|政府补偿标准|业主补偿标准" \'指定数据来源列
tb.ReceiveCols = "名称|单位|政府青苗补偿标准|业主青苗补偿标准" \'指定数据接收列
tb.TreeWidth = 300 \'指目录树宽度
t.Cols("名称").DropTree = tb.Build()
End If
Next
此主题相关图片如下：1111.png
-- 发布时间：2018/8/15 17:12:00
--
添加一个表达式列，把需要合成的数据弄过去；
根据表达式列生成目录树。
-- 发布时间：2018/8/16 12:38:00
--
表达式如下：
杆线管线类型 + \'|\' + 政府补偿标准 + \'|\' + 业主补偿标准生成例子：
10千伏输电线路|144000|108500
相在金额后多加个元字，如下，该怎么设置？
10千伏输电线路|144000元|108500元
-- 发布时间：2018/8/16 14:26:00
--
杆线管线类型 + \'|\' + 政府补偿标准 + \'元|\' + 业主补偿标准 + \'元\'