水晶报表9，预览栏怎么去掉

水晶报表9，预览栏如何去掉？

Private   Sub   Command1_Click()

        Dim   CrxApp   As   CRAXDRT.Application
        Dim   CrxRep   As   CRAXDRT.Report
        Dim   crxDatabase   As   CRAXDRT.Database
        Dim   crxDatabaseTables   As   CRAXDRT.DatabaseTables
        Dim   crxDatabaseTable   As   CRAXDRT.DatabaseTable

        Set   CrxApp   =   New   CRAXDRT.Application
        Set   CrxRep   =   CrxApp.OpenReport( "c:\Report1.rpt ")

        CRViewer91.ReportSource   =   CrxRep
        CRViewer91.ViewReport
       
        Set   crxDatabase   =   Nothing
        Set   crxDatabaseTable   =   Nothing
        Set   crxDatabaseTables   =   Nothing
        Set   crxReport   =   Nothing
        Set   crxApplication   =   Nothing
       
End   Sub

如上代码，显示报表时，左边有个预览栏，如何去掉？

------解决方案--------------------
那我来接分