Print Orientation from Portrait to landscape?

Hi can anyone advise how this can be modified to print in Landscape Orientation?

Many Thanks

Private Sub CommandButton3_Click()
Me.Printform
End Sub