Create a form with a crystalreportviewer on it, and set the zoom level to the required value.
A zoom level of 1 fits the report to 'page width'
A zoom level of 2 fits the report to show the full page
' --- set the viewer properties and bind the report
myform.CrystalReportViewer1.DisplayGroupTree = False
myform.CrystalReportViewer1.ReportSource = myreport
myform.CrystalReportViewer1.Zoom(1) ' use 1 for page width, or 2 for full page
myform.CrystalReportViewer1.Refresh()