VB5 - Searching List?

[PGTibs]

This has probably been asked before somewhere so sorry if it has but i can't find it. How would i go about searching a list for a word?

So i've got my list that loads from a text file but i want to be able to insert a word into a textarea and click a search button and it to highlight the list entry containing that word?

Thanks

[RhinoBull]

What "list" would that be? Listbox, Combobox, some grid, multi line text, etc..
In case you need to search Listbox or combo try this:

Option Explicit

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
                (ByVal hwnd As Long, ByVal wMsg As Long, _
                 ByVal wParam As Long, lParam As Any) As Long

Private Const LB_FINDSTRING = &H18F
Private Const LB_FINDSTRINGEXACT = &H1A2
Private Const CB_FINDSTRING = &H14C

Private Sub Command1_Click()
Dim strText As String

    '''strText = InputBox("Prompt", "Title", "search text")
    strText = Text1.Text
    List1.ListIndex = SendMessage(List1.hwnd, LB_FINDSTRINGEXACT, -1, ByVal strText)

End Sub

[PGTibs]

Thanks, yeh it's a Listbox just that code doesn't seem to highlight the searched text. I press the search button and it doesn't give an error but also doesn't do anything. All the names are right aswell? :S

[RhinoBull]

As you can see there are two constants available: LB_FINDSTRINGEXACT and LB_FINDSTRING.
In my sample I used LB_FINDSTRINGEXACT so try the other one instead.

[PGTibs]

Ooo it works, thanks once again!