关于组合框的有关问题

关于组合框的问题
如何实现:当某组合框获得焦点时,按下空格键/回车键就可以打开组合框,然后按上下箭头移动,最后按回车键进行选定某一项目?

[解决办法]
Private Sub Combo1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case vbKeySpace
SendKeys "{f4}"
End Select
End Sub

[解决办法]
同上，注意加上KeyAscii = 0。
Private Sub Combo1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case vbKeySpace
KeyAscii = 0
SendKeys "{f4}"
End Select
End Sub