After Experimenting a little bit I found that

the SendMessage(ListboxHwnd,LB_FindString,-1,ByVal Cstr(TextToSearchFor))
works if

In the declare you declare sendmessage like

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

And not like

'(This Was Taken From API Viewer [apilod32.exe])
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd
As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long

the principle difference is to give the lParam an 'As Any' data type as
opposed to 'As Long'

this has only been tested in VB4 32 Bit

Hope It Works For You

Simon Carter

----------------------------------------------------------------------------
----------------
Do You Program In VB4 (32 Bit)!
Try Using SC4VB Its Designed To Make Your Life Easier.  Includes Resource
Editor,Project/Object Repository's, Source Code, HelpFile,Tips Plus Much

Or Download From
http://www.*-*-*.com/
http://www.*-*-*.com/
----------------------------------------------------------------------------
----------------