以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口下拉列表值唯一时自动显示?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64980)

--  作者:wh420
--  发布时间:2015/3/6 13:33:00
--  窗口下拉列表值唯一时自动显示?

 窗口中有三个COMBOBOX,当选择型号的下拉列表值为“YYY"的时候,由于YYY对应的规格和颜色都是唯一的。

 

1、如何让唯一的值直接联动显示出来而不用再点下拉列表手动选择?见例子。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗口动态列表项目.foxdb


--  作者:lsy
--  发布时间:2015/3/6 13:41:00
--  
楼主没有灵活运用,这个案例已经告诉你方法了:

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=64898&page=2

--  作者:有点甜
--  发布时间:2015/3/6 14:11:00
--  

Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim str As String = e.Form.Controls("ComboBox1").Text
cmb.ComboList = DataTables("表A").GetComboListString("规格", "型号 = \'" & str & "\'")
If cmb.Items.Count = 1 Then
    cmb.Text = cmb.ComboList
End If


--  作者:wh420
--  发布时间:2015/3/6 17:01:00
--  
好的学习一下