Nothing

假如文本框为Text1
可以在文本框的change事件中加入
下面的代码

[code:b32364321f]
Private Sub Text1_Change()
    Combo1.Text = Text1.Text
End Sub
[/code:b32364321f]

或是将 Combo1的Style属性设置为1，然后你将 Combo1高度拉大，你会看到你想要的效果。