Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Sub OutputFixedWidthTest()
Dim intMyFile As Integer
Dim TestCounter As Integer
'Get a pointer for the file
intMyFile = FreeFile
'Open/Create the test file in the C direcotry
Open "[i]C:\fixedwidth.txt[/i]" For Output As #intMyFile
'Loop for testing, replace this with your recordset
For TestCounter = 1 To 10
[green][b]'NOTE: If your text is longer than the space allotted then
' the text will print on the next line[/b][/green]
Print #intMyFile, "Name"; Tab(6); "Zip C"; Tab(11); "ST"
Next TestCounter
'Close the file
Close #intMyFile
End Sub