以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  combox  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103017)

--  作者:Carey
--  发布时间:2017/6/29 10:32:00
--  combox
combox  能不能再显示框也显示列表框的值,别显示Value
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170629102859.png
图片点击可在新窗口打开查看

--  作者:有点色
--  发布时间:2017/6/29 11:09:00
--  

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

 

 在右边放一个文本框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


--  作者:Carey
--  发布时间:2017/7/4 9:24:00
--  回复:(有点色) 你把显示列和取值列,都设置为...
这个适用于Text和Value是对应的,都是唯一的,实际情况中Text可能会重复,获取的value值是多个,这种情况就不行了
--  作者:有点甜
--  发布时间:2017/7/4 9:25:00
--  
 只有2楼那种方法。