PrintOptions.ApplyPageMargins 方法

請參考:MSDN PrintOptions.ApplyPageMargins 方法
--
Private Sub PrintReport(ByVal printerName As String)
   Dim margins As PageMargins

 ' 取得 PageMargins 結構並設定
   '  報表的邊界。
   margins = Report.PrintOptions.PageMargins
   margins.bottomMargin = 350
   margins.leftMargin = 350
   margins.rightMargin = 350
   margins.topMargin = 350
 ' 套用頁面邊界。
   Report.PrintOptions.ApplyPageMargins(margins)

   ' 選取印表機。
   Report.PrintOptions.PrinterName = printerName
 
   ' 列印報表。將 startPageN 及 endPageN
   '  參數設定為 0 即可列印所有頁面。
   Report.PrintToPrinter(1, False, 0, 0)
End Sub

==
但這在 crystal report 2010 SP2  +VS2010  竟會錯誤!
到底何原因!?  該升級 crsyal report 2010 sp5 ?

20130721:
***已找到問題, 套用頁面邊界 ; 必須在輸出列印之前 , 在指定報表檔之後  ; 才會正常!***