Como Imprimir una Factura desde Visual Basic??

[Kruzado]

aqui tienes yn ejemplo de como generar un listado mediante codigo de visual, espero te sirva, solo tendras que tomarte un tiempo para definis las coordenadas par aimprimir

Printer.ScaleMode = 4 'define que vas a imprimir en formato caracteres
Printer.Orientation = 1 'define la orientacion del papel (normal o apaisado)
Printer.CurrentX = 0 ' la coordenada x en que se va a imprimir
Printer.CurrentY = 0 ' la coordenada y en la que se va a imprimir
Dim Imagen As Picture
Set Imagen = LoadPicture("negrochico.bmp")
Printer.PaintPicture Imagen, 0, 0 ', 4300, 600 ' que imprima imagen en x = 0 en Y = 0, ancho = 4300, alto = 600
Set con = base.OpenRecordset("select * from ccomanda1 where impreso='NO' and comanda.mesa='" & mesa & "' and tipodoc = 0 and numdoc = 0 order by tipo", dbOpenDynaset)
old = Printer.FontSize
Printer.Font = "Trebuchet MS" ' define el tipo de letra
Printer.FontSize = 14 ' el tamaño de la letra
Printer.CurrentX = 0
Printer.CurrentY = 8
Printer.Print " COMANDA MESA " & con("comanda.mesa") ' el printer.print imprime en la impresora, segun las coordenadas currentx(columna) y currenty(fila) que le diste
Printer.CurrentX = 0
Printer.CurrentY = 10
Printer.Print "Garzón " & con("nombre")
Printer.CurrentX = 0
Printer.CurrentY = 11
Printer.Print "Sector " & con("descripcionu")
printer.enddoc ' finaliza el documento y lo envia a impresora

de yapa te va omo imprimir una imagen, espero te sirva