Foxtable(狐表)用户栏目专家坐堂 → [讨论]用于筛选的组合框下拉列表,保存设置问题?


  共有2643人关注过本帖树形打印复制链接

主题:[讨论]用于筛选的组合框下拉列表,保存设置问题?

帅哥哟,离线,有人找我吗?
ehomecd
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:267 积分:2562 威望:0 精华:0 注册:2008/11/9 18:30:00
[讨论]用于筛选的组合框下拉列表,保存设置问题?  发帖心情 Post By: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 9:02:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By: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)


 回到顶部