转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> VB.NET程序 >> 正文
Visual Basic实现动态报表         ★★★★

Visual Basic实现动态报表

作者:闵涛 文章来源:闵涛的学习笔记 点击数:847 更新时间:2009/4/23 15:02:38
  Visual Basic中如何实现动态报表是一个在众多VB网站论坛上提问频率很高的问题,在实际项目中, 作者也遇到这个问题, 经过一番深入研究,用一种简单的方法在Visual Basic中实现了动态报表。

  Visual Basic中制作报表的工具有很多,如Crystal报表编辑器、Datareport报表窗体、Printer对象以及象Vsview等一些第三方控件。但Crystal报表编辑器一般只能制作定制报表,Printer对象操纵起来非常复杂,第三方控件多数需要购买,费用不非。作者制作动态报表是通过Datareport窗体实现的,以下通过一个具体的例子说明是如何实现动态报表的。

  假设在C盘dongtai目录下存放一个Access数据库stock.mdb,其中的"股票行情表"用来记录股票行情,"股票行情表"的数据结构如1表所示:

表1 "股票行情表"数据结构

字段名称 ID stockno stockname price swing maxprice minprice bargain 数据类型 长整型 文本 文本 双精度型 双精度型 双精度型 双精度型 长整型 说 明 序号 股票代号 股票名称 收盘价 涨跌 最高价 最低价 成交量

  如果要设计这样的一个报表,报表输出字段由用户自己决定,用Datareport窗体如何设计呢?下面一步一步地说明。

  1. 熟悉Datareport窗体和数据报表控件

  Datareport窗体是一个和普通窗体相似的窗体,最大的差别是该窗体上只能摆放数据报表控件,这种类型的控件只有六种,他们分别是:RptLabel,Rpt Text Box,RptImage,RptShape,RptLine,RptFunction。从名称上基本可以识别他们的用途,RptLabel用来显示非数据绑定的文本的标签;通常用来制作报表的页标题;Rpt Text Box显示数据绑定的文本的内容,即显示数据库的字段的内容;RptImage显示一个图形,例如一个公司的商标;RptShape能够画出许多图形,强调信息或增强视觉效果;RptLine能够在报表中画线,分割报表种不同的区域;RptFunction允许在报表标题或报表注脚区域摆放,它包含一个简单的数学统计函数。Datareport窗体和数据报表控件如图1所示。


图1 Datareport窗体和数据报表控件

  为了能够输出所有字段,必须在Datareport窗体不同的区域中摆放足够数量的相关报表数据控件,本例最多字段为八个,所以在"页标头"区域(section2)摆放了八个Rptlabel控件、九条竖分割线和上下两条横线,在"细节"区域(section1)摆放了八个Rpt Text Box 控件、九条竖分割线和下面一条横线,如图1所示。同时为了以后的编码方便,对各控件采用如下的命名方式:控件名称为控件类型+区域号+序号,例如,"页标头"区域(section2)八个Rptlabel控件分别命名为label21、label22、label23……label28,细节"区域(section1)的八个Rpt Text Box 控件分别命名为Text11、Text12、Text13……Text18,各区域的竖分割线采用同样的命名方式,但横分割线以控件类型+区域号来命名,如"页标头"区域中的上下两条横线分别命名为Line2和Line_2,在后面的代码里可以看出这种命名方式的好处。

  Datareport窗体中最重要的三种数据控件是Rpt Text Box、Rptlabel和RptFunction,必须分别设置它们的属性,Rpt Text Box最重要的属性是datafield,该属性指明了绑定记录的字段名称;Rptlabel最重要的属性是Caption,该属性指明要显示的文本内容;RptFunction最重要的属性是datafield和functiontype,前者指明要绑定且作统计的记录的字段名称,后者指明统计函数的类型。这三种控件有一共同属性是Gangrow,该属性值为True时,当显示的内容超过控件的宽度时可以换行。Datareport窗体也有很多属性,如LeftMargin、RightMargin 、TopMargin 、BottomMargin 、reportwidth 、DataSource 等,其中reportwidth 设置报表的纸面宽度(必须减去左右页边距的宽度),reportwidth 须与打印机设置的纸面大小相对应,DataSource设置Datareport窗体的数据源。需要说明的是Datareport窗体中的各个区域都是对象,如section1.section2等,他们也有很多的属性,其中重点提出Keeptogther属性,当Keeptogether为True时,如果某条记录处在一页的最下面,但又不能够完全的打印出来时,可强制这条记录换到下一页输出,从而保证数据的完整性。以上只是简单的说明了Datareport窗体中涉及到的一些重要属性,其它未加说明的属性可在相关书籍和MSDN中查阅。


[系统软件]Visual Studio 2005 Express Beta Products 下载链…  [系统软件]Visual FoxPro9.0中扩展报表系统功能
[系统软件]Visual FoxPro:我是旁观者  [系统软件]Visual Studio 2005 Express Editions Beta 2 下载…
[系统软件]Boost库在XP+Visual C++.net中的安装  [系统软件]Visual Studio 2005 Express Edition 正式版下载地…
[常用软件]Visual Foxpro通用报表打印程序  [常用软件]Visual FoxPro 6.0与大型数据库的无数据源连接
[常用软件]Visual Foxpro 的一个BUG  [VB.NET程序]Visual Basic 6 逆向工程与反逆向工程 (2)
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台