Estoy utilizando el metodo printer.print para mis impresiones solo que tengo una dificultad a la hora de imprimir todos mis reportes todo va bien execto por un campo texto Multilinea que a la hora de imprimir solo me imprime todo el texto encimado (no se si es la palabra correcta) es decir una arriba de la otra si que el texto se distinga.

utilizo este metodo.

'COMENTARIOS
Texto = Len(Comentarios.Text)
If Texto > 100 Then
numero = Texto \ 100
For i = 0 To numero
Comentarios.SelStart = (100 * i)
Comentarios.SelLength = 100
bloque = Comentarios.SelText
Printer.CurrentY = 14 + VerticalMargen + ((1.17 - Printer.TextHeight(bloque)) / 2)
Printer.CurrentX = 1 + HorizontalMargen
Printer.Print bloque
Next i
Else
Printer.CurrentY = 14 + VerticalMargen + ((1.17 - Printer.TextHeight(Comentarios.Text)) / 2)
Printer.CurrentX = 1 + HorizontalMargen
Printer.Print Comentarios.Text
End If


Printer.EndDoc

alguna sugerencia de mi error. espero su valiosa ayuda por lo pronto gracias...

__________________
El exito no es un milagro, es una Recopensa

Supongo que lo soluciones con

Como lo hago "de memoria", y además no utilizo el método Printer.Print..., te verás obligado a hacer el oportuno retoque a mi propuesta.

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

Como Siempre Amigo J.M.Movilla tus respuestas son muy acertadas. el texto quedo mejor de lo que esperabas. mil gracias ya que con tu sabiduria estoy aprendiendo bastante y poco a poco mis aportes en este foro no solo van hacer de pedir si no de dar mis conocimientos. a todos gracias por su valiosa ayuda. Dios me los bendiga mucho.

A Perdon - Se que no usas el metodo printer.print para tus impresiones como haces o que metodo me recomiendas para hacer mis reportes.

__________________
El exito no es un milagro, es una Recopensa