- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [讨论]用于筛选的组合框下拉列表，保存设置问题？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75104)
-- 发布时间：2015/9/27 9:01:00
-- [讨论]用于筛选的组合框下拉列表，保存设置问题？
[讨论]用于筛选的组合框下拉列表，保存设置问题？
组合框用户模糊筛选，希望组合框能保存每次模糊筛选输入的值，形成下拉列表。
因为是模糊查询，所以每次输入的字和词不是某列的内容，而且只是核心字和词。
此主题相关图片如下：2015年9月27日.png
valuechanged：：
Dim spmc As WinForm.ComboBox = e.Form.Controls("商品名称")
Tables("宝藏商品选择_宝藏商品").Filter = " 商品名称 like \'%" & spmc.value & "%\'"
Dim Li As new List(of String)
If li.Contains(spmc.value) = False Then
li.Add(spmc.value)
End If
SaveConfigValue("prd", li)
enter：：
e.Sender.ComboList = GetConfigValue("prd","")
错误：
此主题相关图片如下：2015年9月27日2.png
此主题相关图片如下：2015年9月27日2.png[此贴子已经被作者于2015/9/27 9:02:25编辑过]
-- 发布时间：2015/9/28 9:57:00
--
Dim spmc As WinForm.ComboBox = e.sender
Tables("宝藏商品选择_宝藏商品").Filter = " 商品名称 like \'%" & spmc.value & "%\'"
Dim Li = spmc.Items
If li.Contains(spmc.value) = False Then
li.Add(spmc.value)
End If
SaveConfigValue("prd", spmc.ComboList)