Como Justificar a la derecha un valor numérico con el printer.print

Jorge
15 de Julio del 2004
Ayuda por favorrrrrrrrrrrrrrrrr.
Necesito con urgencia justificar hacia la derecha valores numéricos con el objeto printer.print. Necesito que me aparezca en el listado algo como esto:

(LISTADO POR IMPRESIÓN)

NETO IVA(19%) TOTAL
----------------------------------------------------------
150.000 28.500 178.500
1.230.000 233.700 1.463.700
298.600 56.734 355.334
-----------------------------------------------------------
TOTAL$ 1.678.600 318.934 1.997.534

He intentado de todo, pero no pasa nada, estoy al borde del colapso, pues necesito entregar esta misma tarde a un cliente las modificaciones que están pendientes ya hace una semana.
Gracias por su ayuda

Jorge Segovia
PROGRAMADOR, Vallenar CHILE

Felipe Henr?ez O
15 de Julio del 2004
Hola Compatriota Jorge
Aunque el editor de esta Web no acompañó mucho tu ejemplo, te entendí perfectamente. La mejor manera de alinear hacia la derecha un valor numérico es contando los caracteres, incluyendo los picture de edición, pon atención:

Dim EspacioX as Long
Dim TotalX as Double

TotalX = .Fields("Total")

EspacioX = 11 - Len(Format(TotalX, "###,###,##0"))
Printer.Print Tab(105); Spc(EspacioX); Format(TotalX, "###,###,##0");

Si te fijas la variable TOTALX que rescata directamente el valor el campo TOTAL, está editado con 9 valores numéricos, mas 2 puntos, lo que da un largo de cadena de 11 caracteres. Hazlo así y olvidate del problema.

Te mando un saludo desde La Serena CHILE, (somos casi vecinos).

FELIPE HENRIQUEZ ORDENES
Analista de Sistemas Computacional