Tabbing In File

SesshoumaruSama
10-19-2003, 01:51 AM
How would u Print a Tab space...?

Print #1, Data & "TAB";

Help would be very much appreciated... Thanks

zanth_quareni
10-19-2003, 02:24 AM
Hmm if it is tha same as the way you do it with Printer.Print, you just add tab(Number) where Number is the column you want to start at.

If not, you can write a little function to tab a certain number of spaces...
Function Space(num as integer) as string
dim i as integer
for i = 0 to (num - 1) 'loops for the amount of spaces you specified
Space = Space & " " 'adds a space
next i
end function

or something that starts writing at a specific column. it just adds to the string a number of spaces until it reaches the number specified.
Function AddTab(column As Integer, lineToTab As String) As String
Do While Len(lineToTab) < column
lineToTab = lineToTab & " "
Loop

AddTab = lineToTab
End Function

gurus/experts/others-that-know please correct me or give shorter methods...

SesshoumaruSama
10-19-2003, 02:48 AM
I don't want to add spaces because i want excel to read the text file, so spaces don't work. And also, I'm printing under a timer so I don't think do and while loops will work. Thanks for your help though, I'll try it out and see how it goes... Thx... :)

Flyguy
10-19-2003, 03:24 PM
Just use vbTab:

sLine = "Item1" & vbTab & "Item2" & vbTab & "Item3"

SesshoumaruSama
10-20-2003, 07:12 AM
Thanks heaps... :)

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum