Private Sub Command1_Click()
' the following example will print hello on the form
    Printer.Print "hello"
' use the EndDoc command if this text is the last thing you want
' to print on the paper 
    Printer.EndDoc
End Sub