ActiveReport learning

xiaoxiao2021-03-05 27

First, replace English on the interface of ActiveReport to Chinese

Public Sub Creport (Areport As ActiveReport) 'Hanhua ActiveReport' The following applies 2.0with areport .toolbar.tools.Item (0) .tooltip = "Matalog" .toolbar.tools.Item (2) .caption = "Print .. ".Toolbar.Tools.Item (2) .tooltip =" Print report ".toolbar.Tools.Item (4) .tooltip =" copy ".toolbar.tools.Item (6) .tooltip =" Find ".toolbar .Tools.Item (8) .tooltip = "Single page display" .toolbar.tools.Item (9) .tooltip = "multiple page display" .toolbar.tools.Item (11) .tooltip = "小" .toolbar. Tools.item (12) .Tooltip = "Zoom" .toolbar.Tools.Item (15) .tooltip = "Previous" .toolbar.Tools.Item (16) .tooltip = "Next" .toolbar.Tools .Item (19) .Tooltip = "Back" .toolbar.Tools.Item (19) .caption = "Back" .toolbar.Tools.Item (20) .tooltip = "advance" .toolbar.Tools.Item (20) .Caption = "advance" endhend sub

Other Operations about ActiveReport are working hard, hey, it is the help documentation of E text, it seems good to eat

Second, E text help learning

1.Adding Run-Time Designer to Your Project

Key code:

a Add the following code to the Form_Load event:. Dim rpt As DDActiveReports2.ActiveReportPrivate Sub Form_Load () 'Set active Tab to the designerSSTab1.Tab = 0Set rpt = New ActiveReport'Activate all the toolbarsard.ToolbarsVisible = ddTBToolBox ddTBAlignment ddTBExplorer _ddTBFields ddTBFormat ddTBMenu ddTBPropertyToolbox ddTBStandardard.ToolbarsAccessible = ddTBToolBox ddTBAlignment ddTBExplorer _ddTBFields ddTBFormat ddTBMenu ddTBPropertyToolbox ddTBStandardEnd Sub

Note:.. When working with the designer, the toolbars can not be customizing The only available optionsAR2Pro | 11are ToolbarsVisible and ToolbarsAccessible If the project requires custom toolbars, a third party toolbar • control will need to be substituted for the runtime designer s toolbars.b . Add the following code: private sub sstab1_click (previoustab as integer) select copy previoustabcase is = 0preppreviewcase is = 1prepdesignerend SelectensEnd Sub

. C Add the following code to prepare the viewer control and designer when its tab is selected: Private Sub prepPreview () On Error GoTo errHndl'Must be used to writes the designer's layout'to the report so it can be previewedard.SaveToObject rptrpt. Restart'Run the new reportrpt.Run False'Add the report to the veiwerSet arv.ReportSource = rptExit SuberrHndl: MsgBox "Error Previewing the Report:" & Err.Number & "" & Err.DescriptionEnd SubPrivate Sub prepDesigner () On Error GoTo errHndlIf Not arv.ReportSource Is Nothing Thenarv.ReportSource.CancelSet arv.ReportSource = NothingEnd IfExit SuberrHndl: MsgBox "Error in Design Preview:" & Err.Number & "" & Err.DescriptionEnd Sub

Note: SaveToObject must be used to save the changes made in the run-time designer to an ActiveReportreport object You should always use that object to run and preview the report, do NOT use the • designer s Report property to run and preview the report. .

2. Package File Description: File Name DescriptionArpro2.DLL The Reporting Engine.ARVIEW2.ocx Only if you are using our ActiveX Viewer.ARdespro2.dll Only if you are using the end-user report designer.AB2DLL.dll If you are using the run-time designer (not supported on the web) .PDFExpt.DLL PDF Export Filter (when using PDF exporting) .RTFExpt.DLL RTF Export Filter (when using RTF exporting) .ExclExpt.DLL Excel Export Filter (when using Excel exporting) .TextExpt.DLL Text Export Filter (when using Text exporting) .HTMLExpt.DLL HTML Export Filter (when using HTML exporting) .TiffExpt.dll Tiff Export Filter (when using Tiff exporting) .WebCache.dll Only if you are using the WebCache Service.3.ar Run-Time Designer loading a DSR file example (ActiveX Designer):

Private Sub Form_Load () 'Set active Tab to the designerSSTab1.Tab = 0Set rpt = New ActiveReport'Activate all the toolbarsard.ToolbarsVisible = ddTBToolBox ddTBAlignment ddTBExplorer _ddTBFields ddTBFormat ddTBMenu ddTBPropertyToolbox ddTBStandardard.ToolbarsAccessible = ddTBToolBox ddTBAlignment DDTBEXPLORER _DDTBFIELDS DDTBFORMAT DDTBMENU DDTBPROPERTYTOOLBOX DDTBSTBSTANDARD'LOAD The ActiveX Designer Into the Run-Time DesignerRDROMObject RPTSAMplend Sub

Key code:

b. add the following code to the sstab1_click event: private sub sstab1_click (PreviousTab as integer) select copy previoustabcase is = 0preppreviewcase is = 1prepdesignerend SelectensEnd Sub

Key code:

b. add the following code to the sstab1_click event: private sub sstab1_click (PreviousTab as integer) select copy previoustabcase is = 0preppreviewcase is = 1prepdesignerend SelectensEnd Sub

转载请注明原文地址:https://www.9cbs.com/read-35930.html

9cbs

New Post(0)