本帖最后由 Crystal.Li 于 2021-6-9 17:11 编辑
ActveReport12 批量预览时,最大可以预览的页数是多少。也就是下面AddRange可以添加多少个Pages。
For Each stReport As SectionReport In diction.Values
stReport.Run(False)
stReport.Dispose()
If iStart <> 1 Then
stTitleReport.Document.Pages.AddRange(stReport.Document.Pages)
End If
iStart = iStart + 1
Next
|
|