Select Case e.Col.Name
Case "zcfzb10","zcfzb12","zcfzb14","zcfzb16","zcfzb19","zcfzb21","zcfzb23","zcfzb25"
If e.Row("zcfzb27") <> e.Row("zcfzb9") Then
e.Col.AllowDirectType = False
Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables("hbdtbbsjcjwb") '指定目录树表
tb.TreeCols = "bb4|bb5" '指定用于生成目录树的列
tb.TreeFilter = "bb2 = '" & zgsztzz & "' and bb3 = '利润表'"
tb.TreeSort = "_sortkey"
tb.SourceCols = "bb5" '指定数据来源列
tb.ReceiveCols = e.Col.Name
e.Col.DropTree = tb.Build()
Else
e.Cancel = True
End If
End Select
窗口中的表条件绑定
if a = 1 then
窗口中的表绑定表a
else
窗口中的表绑定表b
end if
于是,鬼就出现了 ,当绑定的是表b时,"zcfzb1","zcfzb2","zcfzb5","zcfzb6" 列就出现莫名其妙的下拉列表,显示的是数字,好像是该列的宽度?