Mail, a friend asked, by the way written .VB Crystal Reports 9, this is very simple, built-event Private Sub CRViewer91_NextPageButtonClicked (UseDefault As Boolean) Call MsgBox ( "back feed") End SubPrivate Sub CRViewer91_LastPageButtonClicked (UseDefault As Boolean) Call Msgbox ("Last Page") End Sub
Private sub crviewer91_firstpageButtonClicked (Usedefault As Boolean) Call Msgbox ("First Page") End Sub
Private sub crviewer91_prevpageButtonClicked (Usedefault as boolean) Call Msgbox ("forward one page") End Subvs.net2003 comes with a direct event,
However, it can be obtained,
First define two global variables public lastpagenum as INT16 'Previous page Page PUBLIC NOWPAGENUM AS INT16' Current page page number
Use the following event skills to obtain the page change event,
Private Sub CrystalReportViewer1_Navigate (ByVal source As Object, ByVal e As CrystalDecisions.Windows.Forms.NavigateEventArgs) Handles CrystalReportViewer1.Navigate 'acquires the current page NowPageNum = CrystalReportViewer1.GetCurrentPageNumber' if it is first loaded, exit If NowPageNum = -1 Then Exit Sub end if 'If it is changed to lastpagenum <> nowpagenum the call msgbox ("change page") end if' replacement variables Lastpagenum = NOWPAGENUM END SUB
