Help wanted with file list boxes and list boxes
Charl,
Something like this :
Dim iSub as Integer
Dim sItem as String
List1.Clear
For iSub = 0 To FileList1.ListCount - 1
sItem = FileList1.List( iSub )
List1.AddItem Left( sItem, InstrRev( sItem, "." ) - 1 )
Next
HTH,
Phill W.
Quote:
> Hi, What I would like to achieve is to program a add all button in a
form
> that would add all the files in a FILE LIST BOX to a LIST BOX,
unfotuneately
> the books I have aquired does not go into that, and i am struggling to
get
> the right code, could someone help please
> Example
> File list Box List Box
> ------------ ---------
> Test1.exe Test1
> Test2.exe Test2
> Test3.exe Test3
> Test4.exe Test4
