How can I get the report to print in landscape?

I changed the width to 11inches, but all it does now is shrink the page to fit a portrait a4...

Its a vb.net console app.

Here is what I tried:
vb Code:
  1. ' Export the given report as an EMF (Enhanced Metafile) file.
  2.     Private Sub Export(ByVal report As LocalReport)
  3.         Dim deviceInfo As String = "<DeviceInfo>" & _
  4.             "<OutputFormat>EMF</OutputFormat>" & _
  5.             "<Orientation>Landscape</Orientation>" & _
  6.             "<PageWidth>11in</PageWidth>" & _
  7.             "<PageHeight>8.5in</PageHeight>" & _
  8.             "<MarginTop>0.25in</MarginTop>" & _
  9.             "<MarginLeft>0.25in</MarginLeft>" & _
  10.             "<MarginRight>0.25in</MarginRight>" & _
  11.             "<MarginBottom>0.25in</MarginBottom>" & _
  12.             "</DeviceInfo>"
  13.         Dim warnings As Warning()
  14.         m_streams = New List(Of Stream)()
  15.         report.Render("Image", deviceInfo, AddressOf CreateStream, warnings)
  16.         For Each stream As Stream In m_streams
  17.             stream.Position = 0
  18.         Next
  19.     End Sub