Filling a list box with multipe values

I want to be able to fill a list box with a file name, the file page size (8.5 x 11) and the number of pages in the file. I would like all of these to be on one line.

lstSelectedFiles.Additem (filename) & (pgsize) & (pgnum)
result in the list box is: File.pdf 8.5 x 11 35

The problem is that when I pass the file name to the second list box it will not open the file because the filename is not correct as it takes into account the page size and the page num.

lstSourceFiles.text = lstSelectedFiles.text
result is: File.pdf 8.5 x 11 35

all I want to pass is the file name, but have not been able to figure out how to do this.

Any information on how to do this would be great. Thanks for the help.

Something like :

Code:

---

lstSourceFiles.Text = Left$(lstSelectedFiles.Text, InStr(1, lstSelectedFiles.Text, " ") - 1)

---

Thank you very much. I'll give it a try.

lain17 the code works perfectly thank you so much!!!!!