Con la commondialog scegli solamente la stampante ... per stampare devi scrivere

Printer.Print Text1.Text
Printer.EndDoc

Naturalmente non viene fatta alcuna formattazione ... devi pensarci tu ...