我想把listMedia（一个listbox控件）中的所有记录全部写到一个文件里。

Open App.Path & "\Medianame.txt" For Output As #5 '打开Medianame.txt文件， For i = 0 To listMedia.ListCount-1 step 1 print #5, listMedia.List(i) Next Close #5 好象这样循环结束后，“Medianame.txt”只有最后的一条记录吧？每循环一次是不是都把原来的“Medianame.txt”修改了，而不是添加上啊？ 请大侠们指点啊！