主题：关于MainTableChanged的问题请教

写到窗口的AfterLoad事件

Dim dmp As New TableDataMap
dmp.DataTable = "客户" '指定数据来源表
dmp.ValueCol = "ID" '指定取值列
dmp.DisplayCol = "公司" '指定显示列
'指定下拉列表时显示哪些列的数据
dmp.ListCols = "ID,公司,姓氏,名字,职务,业务电话,传真号,地址,城市,邮政编码"
dmp.Sort = "城市" '指定排序方式
e.Form.Controls("Table1").Table.Cols("客户 ID").DataMap = dmp.CreateDataMap() '生成并设置DataMap