Hola , estoy haciendo un proyecto y quiero imprimir un formulario con sus labels y todo.En un boton pongo form.printform y cuando va a imprimir me sale este mensaje:

Error '486' en tiempo de ejecucion:
No se puede imprimir la imagen de formulario en este tipo de impresora.

Como soluciono este problema ? Estoy bastante perdido en el tema de impresiones.

Cualquier ayuda sera bienvenida.Gracias

He buscado mas informacion y he visto un componente: Visual Basic PowerPacks, tengo que instalarlo para poder usar la propiedad printform ? Tengo que instalar algo adicional ? o eso es para .NET ?

Porfa ayudenme

Los PowerPacks son componentes para .NET, lo unico que hacen es emular entre otras cosas el uso de la impresora tal como lo hace VB6 en .NET.

La propiedad PrintForm esta disponible en VB 6.0 por lo que no necesitas instalar nada mas. Por otro lado si por favor posteas parte del código donde aparece la sentencia que te causa el error pudiera darnos una idea de como resolver el problema.

Saludos,

Explico la situacion, en un formulario pongo un fondo con una cuadricula, y a esta cuadricula ajusto muchos labels, los cuales relleno con la informacion de una base de datos con un data control. En el formulario tengo un boton y de codigo tiene:

Private Sub Command1_Click()
'Cmd.Visible = False
'Printer.PaperSize = vbPRPSA4
'Printer.Orientation = 2
'Printer.NewPage
'Printer.PaperSize = vbPRPSA4
'Printer.Orientation = 2
'Printer.EndDoc

Form3.PrintForm
End Sub

He probado 20.000 formas de escribirlo y siempre me da fallo. Mi impresora es una HP dekjet 3650.Alguna veces e conseguido que se moviera la impresora pero salia la hoja en blanco :S

pues la verdad no se me ocurre que puede ser, dale una leiada a estos articulos que hablan del mismo problema y como solucionarlo con windows NT y 2000

http://support.microsoft.com/kb/242483

http://support.microsoft.com/kb/178076/es

Iniciado por juliocasho

Private Sub Command1_Click()
'Cmd.Visible = False
'Printer.PaperSize = vbPRPSA4
'Printer.Orientation = 2
'Printer.NewPage
'Printer.PaperSize = vbPRPSA4
'Printer.Orientation = 2
'Printer.EndDoc

Form3.PrintForm
End Sub

Intenta lo siguiente

Código:

Private Sub Comand1_Click()
 ' Aqui puedes poner antes la configuración de la pagina y copias y tamaño de la hoja

 Form3.PrintForm
 Form3.EndDoc
End Sub

Saludos

Gracias a todos por vuestra ayuda ! Ya me funciona ejeje creo k me fallaba por tener la impresora en red, la puse en mi ordenador y ahora funciona ! Gracias sois los mejores =)