郁闷,还是自己解决了。在CrystalReportViewer控件的Navigate事件里面,有个e As CrystalDecisions.Web.NavigateEventArgs的参数,在它的成员里面就可以得到当前页了 Private Sub CrystalReportViewer1_Navigate(ByVal source As Object, ByVal e As CrystalDecisions.Web.NavigateEventArgs) Handles CrystalReportViewer1.Navigate If e.NewPageNumber = 2 Then Label1.Text="第二页" ElseIf e.NewPageNumber = 1 Then Label1.Text="第一页" End If End Sub
Private Sub CrystalReportViewer1_Navigate(ByVal source As Object, ByVal e As CrystalDecisions.Web.NavigateEventArgs) Handles CrystalReportViewer1.Navigate If e.NewPageNumber = 2 Then
Label1.Text="第二页"
ElseIf e.NewPageNumber = 1 Then
Label1.Text="第一页"
End If
End Sub