pirulete
25 de Agosto del 2003

hola saben necesito imprimir un form completo si tienen documentacion o codigo diganme

Juan
25 de Agosto del 2003

Pues es bastante fácil ya que el objeto form tiene un
método llamado PrintForm que hace especificamente
eso. Te pongo el código que viene como ejemplo en
la ayuda:

Private Sub Form_Click ()
Dim Msg ' Declarar variable.
On Error GoTo ErrorHandler ' Configura el controlador de errores.
PrintForm ' Imprime el formulario.
Exit Sub
ErrorHandler:
Msg = "Imposible imprimir el formulario."
MsgBox Msg ' Muestra el mensaje.
Resume Next
End Sub

P.D.: Es conveniente que el form tenga la propiedad
autoredraw = true, de lo contrario no se imprimirán
los gráficos dinujados en tiempo de ejecución.