我有两个表:客商表、地区表,客商表有地区编码列,我想在录入地区编码时候,显示地区名称,这样可读性较好!用数据字典是可以实现,但地区编码是树型结构,看起来用下拉窗口比较好的!所以,我想直观仅录入末级结点,又想实现数据字典样式,请问有什么好办法吗?谢谢!
显示地区名称到
客商表drawcell事件处理
If e.Col.Name = "地区编码" Then
dim dr as datarow = datatables("地区").find("地区编码='" & e.row("地区编码") & "'")
If dr isnot nothing Then
e.Text = dr("地区名称")
End If
End If
这样做,客商表的地区编码的值还是编码,显示是名称,对吧?