用法很简单：在要显示ActiveReports窗体前，加入：Creport ActiveReport1 ''''ActiveReport1是AR的窗体。
Public Sub Creport(AReport As ActiveReport)''''汉化ActiveReport''''以下适用2.0With AReport .ToolBar.Tools.Item(0).Tooltip = "各页目录" .ToolBar.Tools.Item(2).Caption = "打印..." .ToolBar.Tools.Item(2).Tooltip = "打印报表" .ToolBar.Tools.Item(4).Tooltip = "拷贝" .ToolBar.Tools.Item(6).Tooltip = "查找" .ToolBar.Tools.Item(8).Tooltip = "单页显示" .ToolBar.Tools.Item(9).Tooltip = "多页显示" .ToolBar.Tools.Item(11).Tooltip = "缩小" .ToolBar.Tools.Item(12).Tooltip = "放大" .ToolBar.Tools.Item(15).Tooltip = "上一页" .ToolBar.Tools.Item(16).Tooltip = "下一页" .ToolBar.Tools.Item(19).Tooltip = "后退" .ToolBar.Tools.Item(19).Caption = "后退" .ToolBar.Tools.Item(20).Tooltip = "前进" .ToolBar.Tools.Item(20).Caption = "前进" End WithEnd Sub
Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（学习笔记） Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长：MinTao ICP备案号：鄂ICP备11006601号-18
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
