Prova ad inserire nella form una combo di nome Combo1
ed aggiungi questo codice:

codice:
Private Sub Form_Load()
Dim i As Integer

  For i = 0 To 9
    Combo1.AddItem (i & " voce")
  Next i
  Combo1.ListIndex = 0
End Sub
a me se clicco su un numero qualsiasi va già sull'item che comincia con quel carattere numerico lì...
Ciao
Sara.