关于写文件 ~该怎么解决

关于写文件 ~~~~~~~~~~
向一个   aaa.txt   的文件里写入   "dsdsdd "   字符串

不管有没有都覆盖写入

怎么写,谢谢;

[解决办法]
Open App.Path & "\aaa.txt " For Output As #1
Print #1, "dsdsdd "
close #1