我想用一个给合框实现渐进式查询，如何实现呀？大家给点思路吧！

Question

我想用一个给合框实现渐进式查询，如何实现呀？大家给点思路吧！
我想在入库录或出库单录入界面中用到，共有3000多种材料编码，所以每次出入库时直接输入准确的编码是不现实的，所以想用到渐进式查询，只输入名称或编码的一部分例显示出来，然后在众多的编码中选择一下，可是功能如何实现呀？请老师指教，当然也不一定必须用组合框，其他控件要能完全这个功能也行。关键是功能的实现。
thanks

Answer 1

调用API:SendMessage函数
声明：
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const LB_FINDSTRING = &H18F窗体：Private Sub Combo1_Change()
    Combo1.ListIndex = SendMessage(List1.hwnd, LB_FINDSTRING, -1, ByVal CStr(Combo1.Text))
End Sub就可以了

Answer 2

http://community.csdn.net/Expert/topic/3888/3888594.xml?temp=.1406671

Answer 3

http://community.csdn.net/Expert/topic/3659/3659692.xml?temp=.2189295