组合框检索的问题

程序中有一个组合框，style=0，下拉内容有：“中华人民共和国”、“中华人民”、“中国”
我现在想在组合框中一个“中”字，然后下面会显示三个，如果我输入“中华”，则下面显示前两个，如果我不选择下面的内容，鼠标移动到别的空间上，提示内容不存在，组合框输入刚输入的字清空。

我的设计想法是，在窗体上创建一个组合框，然后在组合框下面创建一个列表框，程序运行的时候隐藏，当在组合框中输入内容的时候，处罚组合框的change事件，同时把列表框显示，列表框中有个click事件，combo1.text=list1.text。现在碰到的问题是后面一个，当我把鼠标移动到别的控件上的时候，不知道用什么方法把组合框中输入的内容情况，我用过用LostFocus时间，但是这样的话，列表框的click不起作用了...

求高人指点一下，谢谢... --------------------编程问答-------------------- msdn shautocomplete api

补充：VB ,  控件