VBA,Function 写文件函数

百度vba资料，才清楚 vba写文件还是挺方便的

Function GenSQLFile(ByVal File As String, ByVal SQLBody As String)
    Open File For Output As #1
    Print #1, SQLBody
    Close #1
End Function