Urgent please help

[Dextergaisie]

Hello fellow programmers. Happy new year to you all. I have little problem with how to go about the following.

I want to be able to search a file name amongst filepaths

For example i have a listbox containing the following paths

C:\new folder\music\track1.mp3
C:\new folder\music\Akon.mp3
C:\new folder\music\BenFolds.mp3
C:\new folder\music\Dexter.mp3

And i need to search and highlight the prefered item from a textbox. Lets say
I type in akon in a textbox so that the akon path is selected.
How do I do that?
I really need your help on this one too.
I would be very grateful as usual. Thank you all.

[smUX]

I'll point you in the right direction...

for b=1 to listbox.listcount
if instr(listbox.List(b),"Akon")<>0 then debug.print "line" & str(b)
next b

[akhileshbc]

Something like this:

Option Explicit

Private Sub Command1_Click()
Dim strText As String
Dim i As Integer

strText = "Akon"
For i = 0 To List1.ListCount - 1
  If InStr(UCase(List1.List(i)), UCase(strText)) <> 0 Then List1.ListIndex = i
Next i
End Sub

Private Sub Form_Load()
List1.AddItem "C:\new folder\music\track1.mp3"
List1.AddItem "C:\new folder\music\Akon.mp3"
List1.AddItem "C:\new folder\music\BenFolds.mp3"
List1.AddItem "C:\new folder\music\Dexter.mp3"
End Sub

[Edgemeal]

I'll point you in the right direction..

better recheck your map (code) then.

for b=1 to listbox.listcount ?

[smUX]

I don't see anything wrong with the code...although I did write it outside of the programming environment so minor things might be in there :-P

[Edgemeal]

I don't see anything wrong with the code...although I did write it outside of the programming environment so minor things might be in there :-P

just for the newbies, should be, 0 to .listcount - 1

The first item in the list is ListIndex 0, and the value of the ListCount property is always one more than the largest ListIndex value.

[smUX]

Ah...I rarely use listboxes, I don't like them...I think you see why :-)