!!!Помогите!!!

[Sound]

Ребят, в общем такой расклад.

Есть Текстбокс и листбокс. В листбокс при клике на OptionButton загружаются названия графств Англии из базы данных:
Private Sub Option1_Click()

lst2.Clear

Data1.Recordset.MoveLast
Data1.Recordset.MoveFirst

c = Data1.Recordset.RecordCount

For i = 1 To c
lst2.AddItem Data1.Recordset.Fields("Counties")

Data1.Recordset.MoveNext

Next i

А теперь помогите пожалуйста мне сделать так, чтоб при вводе в текстбокс буквы или буквосочетания, в Листбоксе оставались лишь те названия, которые начинаются на введенное в текстбокс.



Заранее спасибо

[tyomitch]

Недопустимое название топика.
Попытайтесь снова.