为 DrillDownSubreport 事件提供数据。
命名空间 CrystalDecisions.Web 程序集 CrystalDecisions.Web (CrystalDecisions.Web.dll)
语法
声明
Public Class DrillSubreportEventArgs
Inherits ViewerEventArgs
public class DrillSubreportEventArgs : ViewerEventArgs
备注
DrillSubreportEventArgs 类包含与 DrillSubreport 事件相关的数据。CrystalReportViewer 引发 DrillSubreport 事件。
示例
以下示例记录报表的 DrillDownSubreport 事件。
声明
Private Sub LogDrillDownSubreportEvent(ByVal source As Object, _
ByVal e As CrystalDecisions.Web.DrillSubreportEventArgs) Handles _
CrystalReportViewer.DrillDownSubreport
Dim eventLog As New EventLog("event.log")
Dim eventMsg As String = _
"DrillDownSubreport event:" & vbCrLf & _
"CurrentSubreportName: " & e.CurrentSubreportName() & vbCrLf & _
"NewSubreportName: " & e.NewSubreportName() & vbCrLf & _
"CurrentSubreportPageNumber: " & e.CurrentSubreportPageNumber() & vbCrLf & _
"NewSubreportPageNumber: " & e.NewSubreportPageNumber() & vbCrLf & _
"CurrentSubreportPosition: " & e.CurrentSubreportPosition().ToString & vbCrLf & _
"NewSubreportPosition: " & e.NewSubreportPosition().ToString
eventLog.WriteEntry(eventMsg)
e.Handled = False
End Sub
private void LogDrillDownSubreportEvent(Object source,
CrystalDecisions.Web.DrillSubreportEventArgs e)
{
System.Diagnostics.EventLog eventLog =
new System.Diagnostics.EventLog("event.log");
string eventMsg =
"DrillDownSubreport event:" + "\n" +
"CurrentSubreportName: " + e.CurrentSubreportName + "\n" +
"NewSubreportName: " + e.NewSubreportName + "\n" +
"CurrentSubreportPageNumber: " + e.CurrentSubreportPageNumber + "\n" +
"NewSubreportPageNumber: " + e.NewSubreportPageNumber + "\n" +
"CurrentSubreportPosition: " + e.CurrentSubreportPosition.ToString() + "\n" +
"NewSubreportPosition: " + e.NewSubreportPosition.ToString();
eventLog.WriteEntry(eventMsg);
e.Handled = false;
}
继承层次结构
Object
EventArgs
ViewerEventArgs
DrillSubreportEventArgs
版本信息
Crystal Reports Basic for Visual Studio 2008
从此版本开始支持： Crystal Reports for Visual Studio .NET 2002