以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]用下拉窗口输入,如何实现数据字典效果?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188262)

--  作者:leoWang
--  发布时间:2023/9/11 10:04:00
--  [求助]用下拉窗口输入,如何实现数据字典效果?
我有两个表:客商表、地区表,客商表有地区编码列,我想在录入地区编码时候,显示地区名称,这样可读性较好!用数据字典是可以实现,但地区编码是树型结构,看起来用下拉窗口比较好的!所以,我想直观仅录入末级结点,又想实现数据字典样式,请问有什么好办法吗?谢谢!
--  作者:有点蓝
--  发布时间:2023/9/11 10:13:00
--  
显示地区名称到客商表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

--  作者:leoWang
--  发布时间:2023/9/11 10:38:00
--  
这样做,客商表的地区编码的值还是编码,显示是名称,对吧?
--  作者:有点蓝
--  发布时间:2023/9/11 10:54:00
--  
试试不就知道了
--  作者:leoWang
--  发布时间:2023/9/11 10:59:00
--  
图片点击可在新窗口打开查看图片点击可在新窗口打开查看