Won't Print on Screen

Type Record
Field F1
Field F2
Feild F3
End Type

WriteFile file
For thisRecord.Record = Each Record
WriteLine file, thisRecord\F1
WriteLine file, thisRecord\F2
WriteString file, thisRecord\F3
Next
CloseFile file

I'm trying to save the above Type & End Type that Iam displaying on the screen in the 1st post above!