Private Sub Form_Load()
    ' replace the "Form1" below with the name of the
    ' form you want to print
    Form1.PrintForm
End Sub