data from listbox to textbox

How do I copy data from a listbox to a textbox at run-time keeping the same format - ie. look like a list?

Is there a way to perform an OLE drag and drop operation at run-time without actually moving the mouse from source to target object?

Thanks a lot for your help.
Ivan

something like this?
for i = 0 to listbox.listcount-1
strText = strText & listbox.list(i) & vbcrlf
next i
textbox.text = strText

make sure your textbox's multiline property is set to true.