How do I change printers?

G222 · December 31st, 2009, 06:33 PM

I have just started using VB2008. I canât get my program to print on anything but the default printer.
I select another printer in PrintDialog1.ShowDialog but the printing comes out on the default printer. How do I make use of the selected printer?
My code is:

Code:

       Try
            'Specify current page settings
            PrintDocument1.DefaultPageSettings = PrintPageSettings
            'Specify document for print dialog box and show
            StringToPrint = RichTextBox1.Text
            PrintDialog1.Document = PrintDocument1
            Dim result As DialogResult = PrintDialog1.ShowDialog()
            'If click OK, print document to printer
            If result = DialogResult.OK Then
                PrintDocument1.Print()
            End If
        Catch ex As Exception
            'Display error message
            MessageBox.Show(ex.Message)
        End Try

gagster · September 23rd, 2010, 12:52 AM

Code:

If result = DialogResult.OK Then
    PrintDocument1.PrinterSettings = PrintDialog1.PrinterSettings
    PrintDocument1.Print()
End If