Crystal Reportsを使用して印刷する方法

Question

私はvb.netアプリケーションを開発しました。私のアプリケーションは、販売レポートなどのいくつかのレポート機能を提供しています...私は、データセットオプションを使用してレポートを生成しました。つまり、データセットをクリスタルレポートのソースに設定しました。私は、アプリケーションがWindowsフォーム上の "レポート生成"ボタンをクリックしたときにレポートを印刷したいだけです...誰も私がこれをどのように達成できるかについて私に助けてくれますか？

Answer 1

私はオフ線に沿って何かを使用します。クラスの

輸入：その後、

Imports CrystalDecisions.CrystalReports.Engine 
Imports CrystalDecisions.ReportSource 
Imports CrystalDecisions.Shared 
Imports CrystalDecisions.Windows.Forms 

そして：

Private sub print_report() 

パラメータなど

Dim pFields As New ParameterFields() 
    Dim pField As New ParameterField() 
    Dim disVal As New ParameterDiscreteValue() 

    Try 
     Cursor.Current = System.Windows.Forms.Cursors.WaitCursor 

     Dim report_to_print As New report_name 

追加パラメータの場合を（そうでなければ無視するあなたはまた、Crystalレポートビューアコントロールを保持しているフォーム（ここではfrmReportViewer）と、それにレポートを渡す（後にこのためのコード）

 Dim frmReportViewer As New frmReportViewer(report_to_print) 

パスパラメータ（必要な場合）が必要neeeded）

 report_to_print.SetParameterValue("@parameter", parameter) 

 frmReportViewer.cryrepviewer.ParameterFieldInfo = pFields 

ショーのレポート

 frmReportViewer.ShowDialog() 


Catch ex As System.Exception 

    'your own error handling code here 

Finally 
     Cursor.Current = System.Windows.Forms.Cursors.Default 
End Try 
End Sub 

frmReportViewer - 表示、保存、印刷コントロールが含まれます。

Imports CrystalDecisions.CrystalReports.Engine 
Imports CrystalDecisions.Shared 

Public Class frmReportViewer Inherits System.Windows.Forms.Form 

    Dim mViewerRep As New ReportDocument 

    Public Sub New(ByVal pViewerRep As ReportDocument) 

    MyBase.New() 

    'This call is required by the Windows Form Designer. 
    InitializeComponent() 

    'Add any initialization after the InitializeComponent() call 

    mViewerRep = pViewerRep 

    End Sub 

    Private Sub cryRepViewer_Load() Handles cryrepviewer.Load 


     cryrepviewer.ReportSource = mViewerRep 
     cryrepviewer.Refresh() 
     Me.Text = "" 

    End Sub 
End Class