Impresión de TextBox definido por coordenadas

[Middrel]

Hola buenos días...

Tengo una duda, espero me pudieran apoyar...

Tengo un código para impresión de un sistema para registrar las ventas, pedidos, etc de una tienda de comida rápida, el código lo que debe hacer, es imprimir un ticket de venta o de entrega de pedidos, así que no debería tener mucha ciencia, además lo imprime a la impresora que esté por default, no hay necesidad (por el momento) de hacer que se puedan elegir las impresoras.

El código es el siguiente:

Código:

Private Sub BtnImprimirFactura_Click()
    
    Printer.Orientation = 1
    Printer.ScaleMode = 6
    Printer.ScaleHeight = 210
    Printer.ScaleWidth = 297
    Printer.FontSize = 8
    Printer.FontBold = False
    
    ' Encabezados
    colocar "XXXXXXXXXXXXXXXXXXXXXXXXXXX", 55, 4
    colocar "--------------------------------------------------------------------", 10, 5
    colocar "OPERADO POR:", 91, 7
    colocar "AHURES FRANQUICIAS, S.A. DE C.V.", 30, 9
    colocar "RFC: AFR080801F62", 87, 12
    colocar "PLAZA PALMAS 1", 96, 14
    colocar "BLVD UNIVERSITARIO 395 LOCAL 5", 30, 16
    colocar "JURIQUILLA,  QUERÉTARO", 65, 18
    colocar "-------------------------------------------------------------------", 10, 20
    colocar "-------------------------------------------------------------------", 10, 24
    colocar "                         ", 10, 24
    
    ' Encabezados Pedidos
    colocar "SERVICIO:", 180, 26
    colocar "                         ", 10, 28
    Printer.FontSize = 7
    colocar "CLAVE     DESCRIPCIÓN      P.U. CANTIDAD IMPORTE", 10, 30
    colocar "-------------------------------------------------------------------", 10, 32
    colocar "                         ", 10, 34

    ' Importes de Pagos
    Printer.Print  LblSubTotal
    Printer.Print  LblDescCliente
    Printer.Print  LblDescAdicional
    Printer.Print  LblSubtotal2
    Printer.Print  LblIVA
    Printer.Print  LblTotal
              
    Printer.EndDoc
    
End Sub

Private Function colocar(texto As String, X As Integer, Y As Integer)
  
    Printer.CurrentX = X
    Printer.CurrentY = Y
    Printer.Print texto
  
End Function

Como verán, algo sencillo, sin embargo, estoy teniendo problemas para posicionar los textbox en "x/y" coordenadas, como verán con la opción de Printer.Print, sólo lo imprime desde la primera columna, si utilizo la función que cree "colocar" y les doy las coordenas, p.e. colocar LblTotal, 100,30 no lo hace, no sé a que se deba.

Existe alguna forma de posicionar los textbox, para que queden de acuerdo a como los necesito, ¡Ojo! estos texbox corresponden a importes, por lo tanto, si utilizo un tab(n) en la impresión estos quedan descuadrados, al parecer lo que necesitaría es que estén alineados a la derecha, creo.

Espero sus comentarios y de antemano les agradezco su atención.

Saludos.