PrintForm

[wdevaal]

Ik ben bezig met een klein programmatje te maken in Microsoft Visual Basic 2008.

Nu wil ik een formulier afdrukken met de volgende code:

With PrintForm
.Form = Me
.PrintAction = PrintAction.PrintToPreview
.Print()
End With

Dit gaat goed, maar ik wil dit formulier standaard op liggend A4 afdrukken, en dit wil me niet lukken.

m.v.g. Willy…

 

[armed10]

probeer dit:

PrintDoc.DefaultPageSettings.Landscape = True

:thumb:

 

[wdevaal]

probeer dit:

PrintDoc.DefaultPageSettings.Landscape = True

:thumb:

Naar aanleiding van jou bericht ben ik verder gaan zoeken, en de juiste code is:

With PrintForm
.PrinterSettings.DefaultPageSettings.Landscape = True
.Form = Me
.PrintAction = PrintAction.PrintToPreview
.Print()
End With

En dit doe wat ik wil, liggend afdrukken.

Bedank voor jou reactie.

m.v.g. Wiliy...