PDA

Click to See Complete Forum and Search --> : printing numerics in alignment


ppacheco
Jan 5th, 2000, 03:10 AM
I need some assistance. I am trying to out put some data using the statement below

Printer.FontName = "Courier"
Printer.Print ssno; Tab(15); name; Tab(50); Format$(Format$(hppd, "###,###.00"), "@@@@@@@@"); Tab(65); Format$(Format$(hytd, "###,###.00"), "@@@@@@@@"); Tab(75); Format$(Format$(hgoal, "###,###.00"), "@@@@@@@@"); Tab(100); Format$(Format$(dppd, "###,###.00"), "@@@@@@@@"); Tab(115); Format$(Format$(dytd, "###,###.00"), "@@@@@@@@"); Tab(125); Format$(Format$(dgoal, "###,##0.00"), "@@@@@@@@@")

I cannot get the numbers to right align.

i get the following on the printer.
3,948.71
948.71

when i output to debug.print the columns are aligned.

Thanks for you help in advance.

Aug 14th, 2000, 03:41 PM
hope this helps you....

Printer.ScaleMode = vbCharacters
Printer.CurrentX = 85 - Printer.TextWidth(Number)
Printer.Print Number

where 85 is the right most end of the column.
this will print right aligned numbers.

larry

[Edited by larryn on 08-14-2000 at 07:05 PM]