x report orizzontale:
DataReport.Orientation = rptOrientLandscape