主题：[求助]取值字典的多列

    Dim dmp As New TableDataMap
    dmp.DataTable = "客户" '指定数据来源表

    dmp.ValueCol = "ID，公司，姓氏" '指定取值列多列 

    dmp.DisplayCol = "公司" '指定显示列
    '指定下拉列表时显示哪些列的数据
    dmp.ListCols = "ID,公司,姓氏,名字,职务,业务电话,传真号,地址,城市,邮政编码"
    dmp.Sort = "城市" '指定排序方式
    Tables("订单").Cols("客户 ID").DataMap = dmp.CreateDataMap() '生成并设置DataMap
End If