imprimir richtextbox como se ve

[mveraa]

hola estoy intentando imprimir el contenido de un richtextbox me funciona pero no puedo controlar la posicion de la imprecion siempre es 0,0

¿alguien me puede orientar?


si no lo hago asi me imprime en la posicion que quiero pero no respeta saltos de linea y queda malo

fichaprod.TextDesFicha.SelPrint Printer.hdc


por ejemplo lo hacia asi hasta que me di cuenta de la falla


Printer.CurrentX = 10
Printer.CurrentY = 78 '75
Printer.Font.Name = "BOOK OLD STYLE"
Printer.Font.Size = 10
Printer.Font.Bold = True
Printer.Print "Descripcion:"
'Imprime 10, 75, "Descripcion:"

Printer.CurrentX = 10
Printer.CurrentY = 82 '79
Printer.Font.Name = "arial"
Printer.Font.Size = 8
Printer.Font.Bold = True

fichaprod.TextDesFicha.SelPrint Printer.hdc 'asi lo tengo ahora pero lo deja en la pos. 0,0




'Printer.Print fichaprod.TextDesFicha.Text 'asi estaba antes pero no respeta saltos de linea

un saludo