用户中心

资讯 > 嵌入式系统

嵌入复杂VB报表的实现方法

来源:传动网2006.03.14阅读 9005

      1. 概述
      在许多组态控制软件中,都提供了报表的功能CONTROL ENGINEERING China版权所有,可满足不了各种客户的报表需求,不可避免的碰到各种各样的报表。现在大多数组态软件支持嵌入VB程序,可以再VB平台下作出报表嵌入到组态程序中。在VB平台下制作报表大致有两种选择:使用VB自带的Data Report控件和借助第三方软件。使用Data Report控件有两点局限:第一DataReport本身提供的控件很少却功能很弱CONTROL ENGINEERING China版权所有,与数据环境邦定得太死。第二DataReport没用提供分栏等复杂的打印功能;借助第三方软件功能复杂多样需要学习,需要时间去理解掌握。利用VB本身提供的控件功能也可以轻松设计自己的复杂报表,简单明了,适用于简单和复杂报表,与大家共同探讨。


      2. 设计报表纸
     设计报表纸的容器(Form)也就是一张白纸CONTROL ENGINEERING China版权所有,它具有Form.PrintForm功能控制工程网版权所有,利用它作者可以任意发挥

,只要在窗体能显示的内容都可以打印出来,制作打印所见即所得的报表。众所周知,在窗体上可以放置VB提供的所有控件,如:Lable,TextBox,Line,Imge,MSHFGrid等各种控件,由用程序操作各种控件的结果,用数据库内的数据填充MSHFGrid,就可以作出图文并茂的报表。设定报表纸张(form4):
在工程中添加一窗体Form4。设定窗体的大小通与打印纸张大小相同、前景颜色、后景颜色、边框形式、控制按钮、滚动条、标题等项目,使窗体显示为一张“白纸”。程序如下:
Private Sub Form4_Load()

 With Form4
   .Appearance = 0           'Flat
   .AutoRedraw = 1           'True
   .BackColor = &H80000005   '背景颜色:白色
   .BorderStyle = 0            'None
   .Height = 15000            '设置页面的大小,即纸的大小,
   .Width = 11760            '15000控制工程网版权所有,11760相当于A3
   .Top = 0
   .Left = 0
   .ClipControls = 0           'False
   .FillStyle = 0              'Solid
   .Caption = "paper"
 End With
End Sub


      3. 表头的设计
      表头包括报表的页眉、页脚、页标题、日期、不规则表头等。用Lable控件设计报表的题目。用Line控件在纸上画出不规则表头。用Lable,TextBox,Imge填充表头的内容,将标头内的所有同类的控件选中设定统一属性。页眉、页脚、页标题、日期、都可以用控件TextBox设计,程序运行时控制控件的显示内容,可以做出复杂表头。


     4. 表体的设计
      在窗体上添加控件MSHFlexGrid(Micro





















版权声明:版权归控制工程网所有,转载请注明出处!

频道推荐

关于我们

控制工程网 & CONTROL ENGINEERING China 全球工业控制、自动化和仪器仪表领域的先锋媒体

CE全球

联系我们

商务及广告合作
任小姐(北京)                 夏小姐(上海)
电话:010-82053688      电话:18616877918
rendongxue@cechina.cn      xiashuxian@cechina.cn
新闻投稿:王小姐

关注我们的微信

关于我们 | 网站地图 | 联系我们
© 2003-2020    经营许可编号:京ICP证120335号
公安机关备案号:110102002318  服务热线:010-82053688