Code:
Printer.Print RichTextBox1.text
Printer.EndDoc