Combobox présélection items

Bonjour ,

Est -il possible dans un combobox lorsque je rentre une lettre dans celle-ci qu'il présectionne les items commençant par cette première lettre ?

Merci

bien sur cadeau :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Dim i = 0 For Each a In ComboBox1.Items If a.ToString.Contains(ComboBox1.Text) Then i += 1   End If Next If i = 1 Then For Each a In ComboBox1.Items If a.ToString.Contains(ComboBox1.Text) Then ComboBox1.Text = a.ToString   End If Next     End If

---