如何检测Crystal Report打印按钮何时被触发?

时间:2014-01-17 05:16:38

标签: vb.net crystal-reports

如何访问Crystal Report中的Print控件按钮并在其上放置event。我正在使用VB.NET Visual Studio 2010 WinForm。

1 个答案:

答案 0 :(得分:0)

我不确定您是否可以在Crystal Reports版本中访问此文件,但在第7版中,您可以引用Crystal Report Engine自动化服务器,您可以从中创建窗口对象,(报告的预览屏幕) ,定义此WithEvent允许您截取预览窗口事件。

   Private oCrystal As New CRPEAuto.Application
Private oReport As CRPEAuto.Report
Private WithEvents oWindow As CRPEAuto.Window

Private Sub Command1_Click()
    Set oReport = oCrystal.OpenReport("C:\Report1.rpt")
    Set oWindow = oReport.Preview("Report Title").Parent
End Sub

Private Sub oWindow_PrintButtonClicked(UseDefault As Boolean)
    MsgBox "Print Clicked"
End Sub