Opa, conseguiu achar a solução para a questão?
Tente isso
If IO.File.Exists("Arq.txt") Then
Kill("Arq.txt")
End If
FileOpen(1, "c:\Arq.txt", OpenMode.Output) ' Open file for output.
PrintLine(1, TAB(10), "Coluna10", TAB(40), "Coluna40") ' Print word at column 10.
FileClose(1)