关于水晶报表打印的问题,请各路大侠指点迷津 水晶报表在Web页里面没有打印功能。如果要实现打印,可以将其导出为PDF格式。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub PrintReport(ByVal printerName As String) Dim margins As PageMargins ' 获取 PageMargins 结构并设置 ' 报表的边距。 margins = Report.PrintOptions.PageMargins margins.bottomMargin = 350 margins.leftMargin = 350 margins.rightMargin = 350 margins.topMargin = 350 ' 应用页边距。 Report.PrintOptions.ApplyPageMargins(margins) ' 选择打印机。 Report.PrintOptions.PrinterName = printerName ' 打印报表。将 startPageN 和 endPageN ' 参数设置为 0 表示打印所有页。 Report.PrintToPrinter(1, False, 0, 0)End Sub 请问关于用sqldatasource时编程传入参数的问题 如何根据excel批量查询及批量导入 radiobuttonlist在JS里的选择事件怎么写? 在做网页时怎么样 动态生成菜单 xml绑定到tree出错!!! 仁慈的主啊! 为啥VS2005比撒旦还要烂, 还要难用啊? 有没有补药可以打一下啊! 大家帮我看看,我没有分了 求助:一个关于查询的问题,请教! 水晶报表问题:不能显示生成的统计图,只能显示文字 还有三天下岗,水晶报表问题 用DataGrid实现数据的分页显示 请教页面弹出问题?
Dim margins As PageMargins ' 获取 PageMargins 结构并设置
' 报表的边距。
margins = Report.PrintOptions.PageMargins
margins.bottomMargin = 350
margins.leftMargin = 350
margins.rightMargin = 350
margins.topMargin = 350
' 应用页边距。
Report.PrintOptions.ApplyPageMargins(margins) ' 选择打印机。
Report.PrintOptions.PrinterName = printerName ' 打印报表。将 startPageN 和 endPageN
' 参数设置为 0 表示打印所有页。
Report.PrintToPrinter(1, False, 0, 0)
End Sub