感谢。
表Tb_CusInfo中PrepareEdit事件设置:
If e.IsFocusCell Then
If e.Col.Name = "sales_user" Then
e.Col.Combolist = DataTables("Tb_UserInfo").GetComboListString("user_id", "[user_area] = '" & e.Row("sales_area") & "'")
End If
End If
同时在MainTableChanged事件中设置:
If MainTable.Name="Tb_CusInfo" Then
Dim dmp As New TableDataMap
dmp.DataTable="Tb_UserInfo"
//这个地方能否动态设置?
dmp.ValueCol="user_id"
dmp.DisplayCol="user_name"
dmp.ListCols="user_area,user_name"
dmp.Sort="user_area"
Tables("Tb_CusInfo").Cols("sales_user").DataMap=dmp.CreateDataMap()
End If
这样的会,后面的数据字典设置就无效。
请问,如何让两个同时有效果?