Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
在enter输入.
Dim cmb As WinForm.Combobox = e.Sender
Dim r As Row = Tables("表名").Current
cmb.ComboList = DataTables("表名").GetComboListString("列名","筛选条件 = '" & r("筛选条件") & "'")
这个代码就是取不重复值的代码,可以看看帮助和论坛中关于组合框的内容.