具有查询功能的comboBox

Question

请大家帮忙：
我实现在控件comboBox中实现查询功能，例如：
在comboBox下拉框中有数据
1111
1111-0001
1111-0002
1112
1601
1601-0001
1601-0001
当我在文本框中输入数据如果有此数据，自动找到它，若没有，把光标定在以所输入数据的第一个数据。
请大家帮忙，谢谢！

Answer 1

combobox1.style=2
combobox1.sorted=true

Answer 2

搜索一下sendmessage的用法，有这样的功能的

Answer 3

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差不多也就这样拉，没有经过具体的验证。我也是来找资料的，顺便回答下，给点分哦

Answer 4

设置属性不符合要求，也不能实现其功能这样子可以
对象.Listindex = SendMessage(对象.hwnd, LB_FINDSTRING, -1, ByVal CStr(输入框.Text))

Answer 5

设置属性不符合要求，也不能实现其功能这样子可以
最好是一个Textbox1中输入，用listbox1现实。
Combox本身就是这两个控件的组合，所以combox如果不符合要求就用这两个。
Listbox1.Listindex = SendMessage(Listbox1.hwnd, LB_FINDSTRING, -1, ByVal CStr(Textbox1.Text))

Answer 6

vb自带的无法做到你需要的
  给你个变通的方法，用combox和list一起用combox在list之上，平时list隐藏,只有combox输入数据并检索有内容的时候，那么list显示，同时将有关的内容插入list中，当点击list上相应的数据时,将这个数据插入combox中，然后隐藏list，
  在界面感觉上类似与浏览器的地址栏

Answer 7

cuilei197979(风) ,你好：
能不能给点具体的代码呀？谢谢！

Answer 8

combobox1.style=2
combobox1.sorted=true这个就行