Поиск в листбокс с вводом в текст бокс

[LeXoN]

Вопрос состоит в том что надо найти строку в лист боксе а в водишь её в текст боксе как это привязать друг к другу поиск по лист бокс что то типо Dim FIndex As Integer = ListBox2.FindString("as") этого !

[LeXoN]

Так и не могу разобраться нашёл исходник но не могу преобразовать в .NET он написан на VB6 может кто поможет и посоветует как сделать??

[Viper]

С исходником то все ясно, а где твои попытки перевода?

З.Ы. Другое дело, что алгоритм поиска в найденном примере просто ужасный.

[LeXoN]

Код: Выделить всё

Dim FIndex As Integer = MyListBox.FindString ("As")
  Dim FVal As String = MyListBox.Items.Item(FIndex).ToString()
  MsgBox (FVal)