VB6 Simple Virtual ComboBox (OwnerDrawn)

[ChenLin]

I added a button support, let's see if it is needed: while supporting F4, you can press the down arrow to open the list.

Private Sub oCB_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyDown And Not DroppedDownState Then
KeyCode = vbKeyF4
End If
End Sub