主题：combox

combox  能不能再显示框也显示列表框的值，别显示Value
此主题相关图片如下：qq截图20170629102859.png

 你把显示列和取值列，都设置为一样。

 

 在右边放一个文本框textbox1，可以隐藏。

 

 选择模板后，在TextChanged事件写代码：

 

Dim fdr As DataRow = DataTables("表A").Find("第一列 = '" & e.sender.Text & "'")

If fdr IsNot Nothing Then

    e.Form.Controls("Textbox1").Text = fdr("第二列")

Else

    e.Form.Controls("Textbox1").Text = Nothing

End If

这个适用于Text和Value是对应的，都是唯一的，实际情况中Text可能会重复，获取的value值是多个，这种情况就不行了

 只有2楼那种方法。