为什么我设定好一张水晶报表的格式好了 机子上的其他报表就跟着变 ?（是设置打印的的宽和高 ）

Imports CrystalDecisions.Windows.Forms
Imports System.Data
Imports System.Data.SqlClient
Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports.Engine

Dim crReport As New RP149000
'打印设置
With crReport.PrintOptions
.PaperSource = CrystalDecisions.[Shared].PaperSource.Auto
'横排
'.PaperOrientation = CrystalDecisions.[Shared].PaperOrientation.Landscape
.PaperSize = CrystalDecisions.[Shared].PaperSize.PaperA4
End With