If MainTable.Name = "风险控制矩阵" Then
Dim dmp As New TableDataMap
dmp.DataTable = "流程架构维护" \'指定数据来源表
dmp.ValueCol = "流程编号" \'指定取值列
dmp.DisplayCol = "流程编号" \'指定显示列
\'指定下拉列表时显示哪些列的数据
dmp.ListCols = "公司名称,流程编号,一级业务流程,二级业务流程,三级业务流程,四级业务流程,五级业务流程,六级业务流程"
dmp.Sort = "流程编号" \'指定排序方式
Tables("风险数据库").Cols("流程编号").DataMap = dmp.CreateDataMap() \'生成并设置DataMap
End If
If MainTable.Name = "风险数据库" Then
Dim dmp As New TableDataMap
dmp.DataTable = "流程架构维护" \'指定数据来源表
dmp.ValueCol = "流程编号" \'指定取值列
dmp.DisplayCol = "流程编号" \'指定显示列
\'指定下拉列表时显示哪些列的数据
dmp.ListCols = "公司名称,流程编号,一级业务流程,二级业务流程,三级业务流程,四级业务流程,五级业务流程,六级业务流程"
dmp.Sort = "流程编号" \'指定排序方式
Tables("风险数据库").Cols("流程编号").DataMap = dmp.CreateDataMap() \'生成并设置DataMap
End If
我不知道这种差异时怎么产生的