Cita:
Iniciado por william_085 
ya lo intente asi david y si me sale bien pero algunas letras despues de la fila 3-4 casi no se le entiende
Infelizmente ahora no tengo Visual Basic para ayudarte, pero intenta imprimir varias cadenas de texto así:
Código:
Dim Looping As Integer
For Looping = 0 To 5
Printer.Print "Texto"
Next Looping
Printer.EndDoc
Para saber si el error está en la impresora o en el código. No sé si entiendes lo que quiero decir. Si al imprimir "Texto" seis veces imprime bien significa que el problema está en el código que estás utilizando.
Saludos
