以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Combobox的“列表项目”的“取值列”能否增加“取值列(不重复值)”?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2200)

--  作者:abcdzabcdz
--  发布时间:2009/3/25 9:52:00
--  Combobox的“列表项目”的“取值列”能否增加“取值列(不重复值)”?
Combobox的“列表项目”的“取值列”能否增加“取值列(不重复值)”?列表项目取于某列值常取的是“不重复值”。
--  作者:狐狸爸爸
--  发布时间:2009/3/25 9:55:00
--  
用动态列表项目+GetComboListString函数解决。
--  作者:blackzhu
--  发布时间:2009/3/25 10:00:00
--  

在enter输入.


Dim cmb As WinForm.Combobox = e.Sender
Dim r As Row = Tables("表名").Current
cmb.ComboList = DataTables("表名").GetComboListString("列名","筛选条件 = \'" & r("筛选条件") & "\'")

这个代码就是取不重复值的代码,可以看看帮助和论坛中关于组合框的内容.