具有查询功能的comboBox
请大家帮忙：
我实现在控件comboBox中实现查询功能，例如：
在comboBox下拉框中有数据
1111
1111-0001
1111-0002
1112
1601
1601-0001
1601-0001
当我在文本框中输入数据如果有此数据，自动找到它，若没有，把光标定在以所输入数据的第一个数据。
请大家帮忙，谢谢！
[解决办法]
combobox1.style=2
combobox1.sorted=true
[解决办法]
搜索一下sendmessage的用法，有这样的功能的
[解决办法]
comboBox1.Style = 1
comboBox.List(0) = 1111
comboBox.List(1) = 1112
comboBox.List(3) = ...
Dim i As integer
For i = 0 To comboBox.ListCount -1
If text.text = comboBox.List(i) then
comboBox.Text = comboBox.List(i)
Exit for
Else
comboBox.SetFocus
End If
Next i
差不多也就这样拉，没有经过具体的验证。我也是来找资料的，顺便回答下，给点分哦
[解决办法]
为什么要这么复杂 我实验我说的2个属性设置
[解决办法]
设置属性不符合要求，也不能实现其功能这样子可以
对象.Listindex = SendMessage(对象.hwnd, LB_FINDSTRING, -1, ByVal CStr(输入框.Text))
[解决办法]
设置属性不符合要求，也不能实现其功能这样子可以
最好是一个Textbox1中输入，用listbox1现实。
Combox本身就是这两个控件的组合，所以combox如果不符合要求就用这两个。
Listbox1.Listindex = SendMessage(Listbox1.hwnd, LB_FINDSTRING, -1, ByVal CStr(Textbox1.Text))
[解决办法]
vb自带的无法做到你需要的
给你个变通的方法，用combox和list一起用combox在list之上，平时list隐藏,只有combox输入数据并检索有内容的时候，那么list显示，同时将有关的内容插入list中，当点击list上相应的数据时,将这个数据插入combox中，然后隐藏list，
在界面感觉上类似与浏览器的地址栏
[解决办法]
combobox1.style=2
combobox1.sorted=true
这个就行
