'Define an Event Handler
PublicSub WritePage(ByVal sender AsObject, ByVal e As PrintProgressEventArgs)
Me.Label1.Content = reportObj.LogicalPageNumber.ToString() + "." + reportObj.LogicalPagePartNumber.ToString()
End SubPrivateSub ShowLogicalPageNimber()
' 1. Create Report object
Dim reportObj As Report = New Report()
' 2. Create EmbeddedVisualReportSection section.
' Put the grid you want to print as a parameter of section's constructor
Dim section As EmbeddedVisualReportSection = New EmbeddedVisualReportSection(XamDataGrid1)
' 3. Add created section to report's section collection
reportObj.Sections.Add(section)
' Optional. If you have progress indicator set its Report property to created report
progressInfo.Report = reportObj
' 4. Add delegate that calculates LogicalPageNumber
AddHandler reportObj.PrintProgress, AddressOfMe.WritePage
' 5. Call print method
reportObj.Print(True, False)
End Sub
'宣言
Public ReadOnly Property LogicalPageNumber As Integer
privatevoid ShowLogicalPageNimber()
{
// 1. Create Report object
Report reportObj = new Report();
// 2. Create EmbeddedVisualReportSection section.
// Put the grid you want to print as a parameter of section's constructor
EmbeddedVisualReportSection section = new EmbeddedVisualReportSection(XamDataGrid1);
// 3. Add created section to report's section collection
reportObj.Sections.Add(section);
// Optional. If you have progress indicator set its Report property to created report
progressInfo.Report = reportObj;
// 4. Add delegate that calculates LogicalPageNumber
reportObj.PrintProgress += delegate(object sender, PrintProgressEventArgs e)
{
Label1.Content = reportObj.LogicalPageNumber.ToString() + "." + reportObj.LogicalPagePartNumber.ToString();
};
// 5. Call print method
reportObj.Print(true, false);
}
'宣言
Public ReadOnly Property LogicalPageNumber As Integer