【求助】如何正确输出文件

关键代码如下↓
Open App.Path & "/KSCG.sco" For Output As 1#
For intF = 1 To UBound(Scores)
strResult = CStr(Scores(intF).lngScore) & "/" & Scores(intF).strName
Print 1#, strResult
Next intF
Close 1#
一运行这个子程序就会提示编译错误：“没有适合的对象，方法无效”
然后Print 1#, strResult就被涂蓝了。
找了很多教程都是print输出的呐，为什么我这个不行？
需要更多代码的话我再把整个子程序发出来