how do I display the items in a folder in a text box?

[evil_gamer]

I know I need a folder, c:\windows\desktop
I know I need a listbox, listThis
I know I need to open the folder so I can get the files within and I am pretty sure I need to use a loop to display the folder items in the list box, listThis

all of this under one control button I have tried something like this:

Private Sub getFilesInFolder_Click()
searchPath = "c:\windows\desktop"

for i = 0 to listThis
listThis.additem = searchPath
next i

and I get an error. I know I am missing something, and probably got somethings messed up.

What am I missing?