- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求模糊搜索的方法。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48647)
-- 发布时间：2014/4/2 17:25:00
-- 求模糊搜索的方法。
比如，在一个文本框里输入个字符或字符串，则通过这个输入的内容，在指定字段里以输入的字符进行模糊搜索。
并返回所有值，并以列表的形式显示，供用户选择。
帮助里有下拉表的例子，我在想能不能不以表的形式来显示呢。
[此贴子已经被作者于2014-4-2 17:26:41编辑过]
-- 发布时间：2014/4/2 17:41:00
--
这样吗? http://www.foxtable.com/help/topics/1534.htm
-- 发布时间：2014/4/2 17:48:00
--
以下是引用ndxfke在2014-4-2 17:25:00的发言：
比如，在一个文本框里输入个字符或字符串，则通过这个输入的内容，在指定字段里以输入的字符进行模糊搜索。
比如，在一个文本框里输入个字符或字符串，则通过这个输入的内容，在指定字段里以输入的字符进行模糊搜索。
并返回所有值，并以列表的形式显示，供用户选择。
帮助里有下拉表的例子，我在想能不能不以表的形式来显示呢。
[此贴子已经被作者于2014-4-2 17:26:41编辑过]
是动态下拉列表？
参考 http://www.foxtable.com/help/topics/1523.htm
-- 发布时间：2014/4/2 17:50:00
--
类似的，这个帮助我看过。它是以表的形式弹出来选。
记得是vb还是vs里可以这样。
我输入一个0，把这个字段中以0开头的所有值，全部提取出来。以列表的形式显示，可以选择。
此主题相关图片如下：111.jpg
此主题相关图片如下：111.jpg-- 发布时间：2014/4/2 17:53:00
--
参考3楼,把条件设置为 Like 就好.
-- 发布时间：2014/4/2 18:17:00
--
谢谢，两位！
仿照做了一个。
Dim dt As DataTable = DataTables("盘点报表")
Dim comb As WinForm.ComboBox = e.Form.Controls("ComboBox1")
comb.Items.Clear
If comb.text > ""
Dim l As Integer = len(comb.text)
For Each dr As DataRow In dt.DataRows
If dr("物料编码").Substring(0,len(comb.text)) = comb.text
comb.Items.Add(dr("物料编码"))
End If
Next
If comb.Items.Count > 0
comb.text = comb.Items(0)
comb.SelectionStart = l
comb.SelectionLength = len(comb.text) - l
End If
End If
-- 发布时间：2014/4/2 18:42:00
--
ComboBox
Enter事件：e.Sender.ComboList = DataTables("盘点报表").GetComboListString("物料编码")
允许直接输入：True
启用输入助手：True
不但可以首字符模糊查询，Ctrl+Enter还可以任意位置字符模糊查询。