主题：[求助]保存id，但是前台显示的时候显示名称

各位老师，我想实现在存储的时候保存数据id，但是调用显示的时候，显示名称，下面是我实现的代码，功能已经实现，但是在第二行代码中，我觉得有点麻烦，每次都得绑定本地的表。

Dim dmp As New TableDataMap

DataTables("父表").fill("Select * F rom {园区}","plant",False)

dmp.DataTable = "父表"

dmp.ValueCol = "地块数量" '指定取值列

dmp.DisplayCol = "园区名称" '指定显示列

'指定下拉列表时显示哪些列的数据

dmp.ListCols = "园区名称"

'dmp.Sort = "城市" '指定排序方式

Tables("xianshi_table1").Cols("施肥方式").DataMap = dmp.CreateDataMap() '生成并设置DataMap