VB中制作报表问题

什么是报表呢？

以前我们经常把一些记录写在纸上，用纸来显示记录，这是报表的原始形式，在没有计算机出现以前，我们只能往纸上写，纸是显示数据的也是承载数据的，出现计算机以后，我们有人将数据显示在屏幕上，并规定出了特定的格式，慢慢的随着技术发展，报表一次才开始出现，并有了铭文规定。

现在，报表是企业管理的基本措施和途径，是企业的基本业务要求，也是实施 BI 战略的基础。报表可以帮助企业访问、格式化数据，并把数据信息以可靠和安全的方式呈现给使用者。深入洞察企业运营状况，是企业发展的强大驱动力。

报表在运赢公司中发挥着越来越大的作用，做机房收费系统过程中，我们首次，接触到报表的制作，这个报表虽然简单，也包括了报表的基本内容和原理，我看了很多人都总结了报表制作过程。

殷晶晶博客

王红红博客

万建凯博客

我说一下，制作中需要注意的。

1 声明Report对象时，应该声明时间对象如：

Option Explicit
Dim WithEvents Report As grproLibCtl.GridppReport

什么时候用WithEvents声明呢？

A 为了处理事件源所引发的事件，可以用WithEvents关键字 声明该对象类的变量，引发事件的对象即事件源。

B上面代码即： 指定Report变量对象将用于处理grproLibCtl.GridppReport类对象引发的事件，既然，我们已经指定了该变量需要处理的事件，它就不能是派生对象变量，即 As Object 之类，的声明，必须指明声明对象类型。

C 不能在标准模块中声明WithEvents变量，必须在类模块、窗体模块或其它定义的类模块中。

D 不能把WithEvents变量声明为As New,需要明确的创建事件源对象，如：

Private Sub Form_Load()
   
    Set Report = New grproLibCtl.GridppReport  '创建事件源对象

End Sub

2 怎样将VB中DTPicker控件时间传入到Grid Report 报表中去

主要就是先在报表中添加参数，然后，在处理报表的事件中，给参数赋值即可，详见崔成龙博客：

点击打开链接

做机房系统中，学会了很多功能的实现，做完报表机房系统也就差不多完工了，就是有些功能实现的并不完整，毕竟第一次做，能做完已经很好了。