not exactly a text box, but there is a directory object.
The "Directory List Box" is a tool on the standard toolbox. 8th from the top, left side, with the image of a windows folder.
private sub form_load()
Dir1.Path = "C:\folder1\"
end sub
if you need to have it in a list box, (be ware, there are better ways then what i have here), then you can try the following code:
'(have your dir1.visible = false)
private sub form_load()
Dir1.Path = "C:\folder1\"
Dim x as integer
For x = 0 To Dir1.ListCount - 1
list1.AddItem (Dir1.List(x))
Next x
end sub
'that works.. but not the best way. im sure. also, your output will list the folder names with the path before them. you can do some string manipulation on your own to remove the path. if you want help with that, im game.