Cita:
Iniciado por rishart
excelente avellaneda muchisimas gracias funciono a la perfeccion. solo una pregunta mas y disculpa la molestias ocacionadas, se puede ocultar 3 botones es decir que no aparescan en la impresion, yo lo trate de hacer poniendo al boton como invisible pero aun asi me aparece. si no es mucha molestia podrias comentarme como hacerle... de antemano te agradezco y te envio un cordial saludo.

Hola, sí es así como dices, poniendo los botones en invisible. Si no te funciona es que quizás lo estás poniendo en un procedimiento que no es el correcto.
Debes cambiar la propiedad en el evento que llama a imprimir justo antes del sub CopiarPantalla() y después de imprimir volverlos a hacer visibles.
Sería así:
Código:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Button1.Visible = False
Button2.Visible = False
CopiarPantalla()
PrintDocument1.DefaultPageSettings.Landscape = True
PrintDocument1.Print()
Button1.Visible = True
Button2.Visible = True
End Sub

Suerte!!