Printing Form in Landscape using PrintForm Function

Question

i have a question i am trying print the form in landscape so it can print all of the content of the form.

Here is the print preview look like it is cut.

I am using this code to print it and also use the landscape mode to true i search in google.

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Me.PrintForm1.PrinterSettings.DefaultPageSettings.Landscape = True
    Me.PrintForm1.PrintAction = Printing.PrintAction.PrintToPreview
    Me.PrintForm1.Print()
End Sub

But it has the same result. Thank you.

It looks like it's in landscape. The margins look too thick though. — LarsTech, Apr 17 '19 at 18:35
I replace the screenshot i cut it on paint thats why it looks like in landsacpe — Kimberypalet, Apr 17 '19 at 18:50

score 2 · Accepted Answer · answered Apr 17 '19 at 18:32

I did this along time ago from something I found on a Google search. It will give you a printersettings dialog where you can select landscape before printing. If memory serves, the Printform.PrinterSettings.DefaultPageSettings.Landscape is read only or has an issue. Can't remember, anyway, you will need to add a PageSetupDialog and a PrintDocument to the form. Then change your code to this:

    PageSetupDialog1.Document = PrintDocument1
    If PageSetupDialog1.ShowDialog = DialogResult.OK Then
        PrintForm1.PrinterSettings = PageSetupDialog1.PrinterSettings
        If PrintForm1.PrinterSettings.IsValid Then
            PrintForm1.Print()
        End If
    End If

When you click your button1, you should be prompted with a page setup dialog where you can select landscape. Click OK and your form should print landscape.

I Guess if you don't want the Page Setup dialog, you could just have it print by setting the PageSetupDialog1's settings to Landscape.

    PageSetupDialog1.Document = PrintDocument1
    PageSetupDialog1.PrinterSettings.DefaultPageSettings.Landscape = True
    PrintForm1.PrinterSettings = PageSetupDialog1.PrinterSettings
    If PrintForm1.PrinterSettings.IsValid Then
        PrintForm1.Print()
    End If

Just a simple question. What is the printdocument1 ?? It says not declared thank you. — Kimberypalet, Apr 17 '19 at 18:52
by default, it should be located in the printing section of your Toolbox pane. If you've already found the PageSetupDialog, it should have been in that same section. — Charles May, Apr 17 '19 at 19:00

Printing Form in Landscape using PrintForm Function

1 Answers1