老师:你好!
对下面生成的目录树列表,要求进行多项选择,该如何修改代码?
'生成数据表
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "SELECT DISTINCT 使用状态,出库单号 From {出库单目录}"
dt = cmd.ExecuteReader()
'生成目录树
Dim tb1 As New DropTreeBuilder
tb.SourceTable = dt
tb.TreeCols = "使用状态|出库单号"
tb.SourceCols = "出库单号"
tb.ReceiveCols = "出库单号"
Tables("出库").Cols("出库单号").DropTree = tb.Build()