Why Im I getting an error in the third line in the code below???

Sub CreateAfile()
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Test.txt", True)
a.WriteLine ("Executable_File" & " " & "Input_File" & " " &
"Output_File" & " " & "Tabular_File")
a.Close
End Sub