机房收费系统——报表（2）

二、代码部分

跟之前写的excel相比，我觉得报表还是有点相同的。大体思路是这样的：

先定义。
1. （报表：Dim Withevents 对象变量 As 类名
这种用法是加载该类的事件，Withevents之后就能在代码编辑窗看到该类的事件了（如果有的话）。

因为类不像控件，双击控件就可以进入事件编辑。

使用WithEvents 变量时，应该注意下面这些限制条件：
1. WithEvents变量不能是派生对象变量。也就是说，不能把它声明为AsObject—当声明该变量时必须指定类名。
1. 不能把 WithEvents 变量声明为AsNew。必须明确地创建事件源对象，并将它赋给WithEvents变量。）

实例化报表，打开报表位置。

链接数据源。（由于报表里面已经连接了数据源，所以这句话我注释后程序依然可以正常的运行。在excel是写地址）

查询表并把表里面的内容显示出来

下面看一下代码：

<span style="white-space:pre">      <span style="color:#006600;"> </span></span><span style="color:#006600;">'定义</span>
<pre name="code" class="plain" style="font-size: 19px;">    Dim WithEvents report As grproLibCtl.GridppReport <span style="font-family: 华文楷体; font-size: 14pt;">                  </span><span style="font-family: 华文楷体; font-size: 14pt;">             </span>

<span style="color:#006600;"> <span style="white-space:pre">          </span>'加载一个新报表</span>Set report = New grproLibCtl.GridppReport<span style="color:#006600;">'载入报表模版文件</span>report.LoadFromFile (App.Path & "\日报表.grf")'设置数据连接串<span style="color:#006600;"> 'report.DetailGrid.Recordset.ConnectionString = ConnectString'链接数据源，由于在报表里面已经连接了。</span>txtsql = "select * from checkday_Info where date ='" & Date & "'"report.DetailGrid.Recordset.QuerySQL = txtsql '执行<span style="color:#006600;">'显示报表中的内容</span>grddayBill.report = reportgrddayBill.Start<span style="color:#006600;">'报表模板上的4个日期或时间赋值</span>report.ParameterByName("Date1").Value = Format(Date, "yyyy-MM-dd")report.ParameterByName("Datetime").Value = Nowreport.ParameterByName("username").Value = UserName

三、总结

所以很多新的东西只要理清好原理和思路，也没什么太难的。

还是特别感谢杨琛师哥的这两篇博客，巨详细。

机房收费系统之结账与报表（三）VB与报表代码《一学就会傻瓜版》

机房收费系统之结账与报表（二）周报表制作《一学就会傻瓜版》

机房收费系统——报表（2）相关推荐

机房收费系统-报表打印
机房收费系统也进行了有一段时间了,现在也接近了机房项目末尾的时间.在这一段时间自己学到了好多.像之前跟大家分享有关登录.上下机.跟MDI窗体的一些问题跟解决, 今天来跟大家分享下机房收费系统里面日结账 ...
合作版机房收费系统——报表
在个人版的时候,我的报表弄的也挺顺利的没出现什么问题,但是合作时,我按照以前的步骤一步步地进行,竟然在不停的报错,真是让人崩溃啊.所以就不停的重新建,不停的改-删-建-删,如此循环往复.借着合作我把报 ...
机房收费系统—报表建立
前两天就开始做机房收费系统的报表,刚开始我就通过看帮助来了解报表,后来也就按着帮助里的相关内容开始做,最后发现自己想的有点深,竟然用到了横向交叉表(做的不是很成功).问了一下其他同学 ...
机房收费系统———报表
这篇文章主要介绍一下机房收费系统中,报表的使用和制作. 提到报表,相信对于我们这些程序菜鸟来说,挺陌生的.原来基本上没有接触过,对它的了解和认识还停留在一个非常肤浅的阶段.甚至,脑子里根本就没有关于它 ...
VB.NET版机房收费系统---报表
报表,即报告情况的表格,简单的说:报表就是用表格.图表等格式来动态显示数据,可以用公式表示为:"报表 = 多样的格式 + 动态的数据". 在没有计算机以前,人们利用纸和笔来记录数据 ...
机房收费系统（VB.NET）——超具体的报表制作过程
之前做机房收费系统用的报表是Grid++Report,这次VB.NET重构中用到了VisualStudio自带的报表控件. 刚開始当然对这块功能非常不熟悉,只是探究了一段时间后还是把它做出来了. 以下 ...
机房收费系统（VB.NET）——超详细的报表制作过程
之前做机房收费系统用的报表是Grid++Report,这次VB.NET重构中用到了VisualStudio自带的报表控件.刚开始当然对这块功能很不熟悉,不过探究了一段时间后还是把它做出来了. 下面把在 ...
【机房收费系统】——傻瓜式报表设计器制作报表模板
一.下载安装Grid++Report5.0: 1.搜索下载Grid++Report5.0并安装:(附赠哟~但是建议大家自己去下载) 云盘分享:https://yunpan.cn/c6ggtnHFDsg ...
机房收费系统系列五：报表
在机房收费系统中还有两个地方用到了报表:日报表和周报表,在我看来日报表和周报表其实是一样的,日报表是统计一天的收入,支出,对每天金额做个统计,周报表就是记录从某个时间段到另一个时间段的净 ...

机房收费系统——报表（2）

机房收费系统——报表（2）相关推荐

最新文章

热门文章