动态下拉列表多列取值问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

自定义函数CPBZ

'产品标准下拉列表

Dim dt As DataTable

cmd.例ommandText = "例ELECT 执行标准,标准名称 From {产品标准}"

dt = cmd.ExecuteReader()

Return dt

AfterLoad

e.Form.Controls("执行标准").ComboList= Functions.Execute("CPBZ").SQLGetComboListString("执行标准+标准名称")

现在下拉列表框显示为“执行标准标准名称”，

此主题相关图片如下：1.png

选定后值也为“执行标准标准名称”，

如何实现选定后值为"执行标准"

此主题相关图片如下：3.png

主题：动态下拉列表多列取值问题