《Visual-Basic通用报表设计小结》由会员分享，可在线阅读，更多相关《Visual-Basic通用报表设计小结（5页珍藏版）》请在金锄头文库上搜索。
1、大家都知道，在借助第三方软 CrystalReporterVB 平台下制作报表大致有两种选择：使用VB 自带的件。其中第三方软件比较著名的就是MSExcel，以下就这三个方案进行详细的讨论。Data Report和Seagate控件和公司的1. Data Report控件1 1 Data Report控件使用方法由于是 VB 自带的控件，所以使用相对比较方便。使用方法是：首先在选择 添加 Data report 选项，这样Data Report控件就选入到了应用程序。工程 菜单下面使用 Data report的情况大多数采用数据绑定的模式，也就是将此控件与数据库的数据表绑定起来以便可以不用编写
2、代码就轻松完成报表的设计。要使用数据绑定就必须要指定数据源， 这里的数据源不是数据控件而是数据环境（ Data Environment）,选择 工程 菜单下面选择 添加 Data Environment选项就可以将数据环境添加进应用程序中。数据环境有两个重要的属性： Connection和 Command属性，前者是连接指定的数据库，后者连接指定的数据表，一旦这两者都设置成功之后，就可以把数据环境作为数据源了。只需要把 Data report的 DataSource属性设置为前面的数据环境对象以及把DataMember设置为数据环境对象的Command对象即可。1 2 Data Report控
3、件界面元素完成了 Data report 控件的数据绑定工作之后就可以直接控制报表的制作与显示了。这里首先熟悉一下 Data report 控件的显示界面：Datareport 控件一共有5 个区组成，分别是报表头、页面头、细节区、页面注脚和报表注脚。 报表头和报表注脚是用分别用于整个报表的最上部和最下部， 它们将出现于整个报表的每一页， 可以放置一些报表名称， 时间之类的固定文本； 页面头和页面注脚只能出现在当前页的最上部和最下部， 也就是说它只能出现在当前页中， 不出现在其他页面中， 可以放置随页面变化的一些量比如页码等； 而细节区就是用来进行实际显示的区域， 它是我们最为关心的区域， 通
4、过在此区域内放置显示控件可以控制报表的实际显示输出。 这里介绍一下放置文本框控件的使用方法， 其实在绑定情况下只需要设置其 DataMember 和 Datafield 即可，前者用来指定数据表，可以设置为前面数据环境对象的 Command 对象，后者是指定数据段，即绑定的数据库的指定字段。这样不需要编写任何代码就可以实现报表的显示工作。1 3 Data Report控件的打印功能对于报表的打印可以直接使用Data report自带的打印功能，即可以实现简易的报表打印。不过为了实现比较复杂的打印功能，也可以通过程序控制的方法来进行。这里只是给出一个实现思路：首先需要制作一个按钮控件来显示 打印
5、设置 的窗口，通过这个窗口用户可以设置打印的相关的参数，然后在实现打印的子模块中使用VB 内嵌的printer对象来实现真实的打印，该对象能够对打印的当前位置进行定位，而且对打印的字体等参数进行控制，所以结合 打印设置 窗口可以实现类似于word 里面的打印功能。2 MS Excel说起报表设计应用程序，无意微软的 Excel 是一支独秀， MS Excel 就是用来进行表格和报表设计用的应用程序， 它具有优秀的方格控制和宏代码定制功能。 所以如果在设计自己的应用程序的时候能够结合到 Excel 的话，那么你的应用程序就应该是相当的完善了， 因为无论是编辑还是打印功能， Excel 都提供了很
6、完美的解决方案，所以你的应用程序所要做的事情就是实现程序和 Excel 通讯即可。事实上，可以使用VBscript可以将VB与Excel两者连接起来。以下就简要介绍在VB下开发基于Excel 的编程思路。在 VB 中处理 Excel 的对象大致分为五个： Application 对象、WorkBook 对象、WorkSheet对象、 Range 对象以及Cell 对象。它们的功能分别如下：Application-用来指代整个应用程序。WorkBook-表示工作簿对象WorkSheet-表示工作表对象，注意， 一个工作簿可以包含多个工作表，它们就类似于多文档中的框架窗口和里面的单个视图一样。Ra
7、nge-表示工作表中的某个区域范围对象，特殊情况下也可以只代表一个Cell 。Cell-表示特定工作表的一个单元格对象。这个对象的使用频率是最高的。清楚了以上的五个对象的应用范围， 那么使用它们就很简单了， 不过在使用这些对象之前，首先需要对它们进行声明。 方法是在 工程 的 引用 对话框之下选择 Microsoft Excel9.0 Object Library ，这样就将整个 Excel 对象库就引入到程序中来了。下面举一个示例，其实现的功能是打开一个工作簿。Function OpenBook(str As String) As Boolean This procedure checks
8、to see if the workbook specified in the str argument is open. If it is open, the workbook is activated. If it is not open, the procedure opens it.Dim wkbCurrent As Excel.WorkbookDim strBookName As StringOn Error GoTo OpenBook_Err Determine the name portion of the str argument. strBookName = NameFrom
9、Path(str)程序。在 Crystal Reports Pro 模板来开始报表工程。If Len(strBookName) = 0 Then Exit FunctionIf Workbooks.Count 0 ThenFor Each wkbCurrent In WorkbooksIf UCase$(wkbCurrent.Name) = UCase$(strBookName) Then wkbCurrent.ActivateExit FunctionEnd IfNext wkbCurrentEnd IfWorkbooks.Open strBookNameOpenBook = TrueOpe
10、nBook_End:Exit FunctionOpenBook_Err:OpenBook = FalseResume OpenBook_EndEnd Function3 Crystal Reporter（水晶报表）做为一个优秀的报表软件， 水晶报表是实际应用中最多的方案。 在这一节里主要介绍一下水晶报表的定制和显示，打印功能的实现。首先要区分Crystal Reports插件程序和Crystal Reports控件。前者主要用来创建报表模板，后者主要是用来在程序中显示和打印报表， 这两者的分工决定了它们程序中的功能的不同。其中 Crystal Reports的插件程序可以从Seagate 公司
11、的官方网站上下载最新的测试版本。3 1 Crystal Reports插件程序的使用选择 外接程序菜单的 报表设计器 选项，则VB 将执行 Crystal Reports Pro插件应用里选择 新建报表 图标，可以选择8 标准模板和一个自定义的整个水晶报表的使用跟第一节的 Data Report 的使用很类似。 首先需要给报表选择数据源，（即数据库），然后就可以在报表中添加、删除、修改字段以及为记录分组，可以利用水晶报表创建很多具有自定义风格的报表。由于本身 Crystal Reports 插件程序就是一个功能强大的报表设计软件，这里就不能一一的讲解了，有兴趣可以参考程序自带的帮助文档。3 2
12、 Crystal Reports控件的背景知识Crystal Reports Pro还提供一个报表生成模块，该模块可以连接到并访问VB 应用程序，VB 程序员不需花费大量时间写自己的代码就可再应用程序中添加复杂的报表生成及输出功能。CrystalReports引擎是一个动态链接库，它可以使应用程序访问并具有同Reports一样强大的报表输出功能。应用程序是通过Crystal Reports ActiveXCrystal控件来访问引擎。再编译时应用程序同报表引擎链接，以给应用程序添加了生成报表的功能。当程序使用 Crystal Reports ActiveX 控件时，可以通过再设计时设置 Cry
13、stal 或者再运行时改变对象属性，来建立应用程序和 Crystal Reports 之间的连接。通过控件的属性可以指定：对象属性Crystal响应应用程序某个事件的输出报表的名字。报表的目标位置（预览窗口、磁盘文件或者电子邮件等）。想要打印的份数（如果报表提交给打印机的话）。输出文件的信息。预览窗口的大小及位置信息（如果报表在预览窗口中显示时）。选择公式信息（如果在报表中限制记录的话）。排序信息。其他相关的属性。这里要注意一点的是， Crystal 控件必须在由 Crystal Reports Pro 创建的报表中使用，而试图在 VB 应用程序里引用之前，必须首先创建报表。3 3 Crystal Reports控件的使用了解了选
