Limpiar combo

Necesito limpiar un combo desde dentro del mismo, en el evento keypress
pongo el código al pie, la primera vez que presiono va al primer ítem y la
segunda lo limpia, como puedo hacer para que lo limpie con una sola
pulsación.?

Private Sub CboCateg_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles CboCateg.KeyPress
If e.KeyChar = Microsoft.VisualBasic.ChrW(27) Then
Me.CboCateg.SelectedIndex = -1
End If
End Sub