asp网站 seo,网站下载端口建设,软件开发培训机构多少钱,网络引流怎么做啊?Visual Basic - 第三方控制Visual Basic - 打印与报表Visual Basic - DBGrid 现在几乎所有数据库表格控件(除了VB自身的DBGrid)都带有打印和预览功能#xff0c;象True DBGrid Pro(http://www.componentone.com/)、Farpoint Spread(http://www.fpoint.com/)、Janus Grid和国产…Visual Basic - 第三方控制Visual Basic - 打印与报表Visual Basic - DBGrid 现在几乎所有数据库表格控件(除了VB自身的DBGrid)都带有打印和预览功能象True DBGrid Pro(http://www.componentone.com/)、Farpoint Spread(http://www.fpoint.com/)、Janus Grid和国产的Cell(http://www.trustsoft.com)。其中除了Janus Grid其它几种控件在国内都可以买到。如果你平时使用DBGrid比较多可以考虑True DBGrid Pro。Cell在中文方面当然更出色。在单机上几个产品效果、价钱都差不多。但如果你想在多台机器上安装软件就有问题了。因为Cell是每台运行的机器都要购买一套而其它的产品一般只需要在开发的机器上购买一套运行的机器无需购买。 另外可以参考QA000050 能否利用Crystal Reports打印Data控件的Recordset对象的虚拟表。 http://www.china-askpro.com/msg13/qa10.shtml打印问题Crystaleport 用法很简单在要显示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 s/n: 70001 5367907: http://www.chinaaspx.com/club/topic_3_12999.htmPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load在此处放置初始化页的用户代码If Not IsPostBack ThenFill_DrpWc()Fill_DrpGrp()Fill_DbGrid()End IfreportDocument1.Load(C:\\Inetpub\\wwwroot\\Websfc\\CrystalReport1.rpt)CrystalReportViewer1.ReportSource reportDocument1CrystalReportViewer1.DataBind() End Sub单击打印Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.ClickreportDocument1.PrintOptions.PaperSize CrystalDecisions.[Shared].PaperSize.PaperA3 reportDocument1.PrintOptions.PrinterName HP LaserJet 6L reportDocument1.PrintToPrinter(1, False, 0, 0)End Sub 但有个问题哦无论你在那台机器上打印输出的都是server机器上的打印机 // This function enables and disables the Crystal Reports Win Form Viewer private void EnableViewer(bool show) { SeagateSoftware.WinForms.ToolbarStateChangeEvent evt new SeagateSoftware.WinForms.ToolbarStateChangeEvent(show); crystalReportViewer1.Toolbar.OnStateChange(this, evt); }转载于:https://www.cnblogs.com/runfeng/archive/2005/10/17/256734.html