You can change the Orientation by uising the code below it requires you to have service pack 4 or above ( Vb last service pack was 6 and i sugest you download it).
Code:
Option Explicit
Private Sub Command1_Click()
DataReport1.Orientation = rptOrientLandscape
DataReport1.Show
End Sub