

| Type | Description |
The following sample shows the drop down portion of the control:
Private Sub CalcCombo1_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = vbKeyF2) Then
With CalcCombo1
.DropUp
End With
End If
End Sub