机房结账（一）

        今天把机房收费系统的最后一块整完了.也就是日结账,和周结账这块，现在总结一下。先理一下大概思路。

1、首先你要把数据库中的表数据整理好

              你要做的是在结账窗体时把汇总做好，然后把数据总结到日结账表中。

             在汇总时我用到了两个比较麻烦的问题

问题1、查询数据库中一个字段数据的总和，这里我给出代码

             Select Sum(l列名)  as 别名 from 表名 where 条件

             在查询所得到的的记录集中 Fields(0)即为所得到的和

Eg :txtsql ="select Sum(ChargeCash) as Sum from Charge where  checkStatus='未结账' andChargeTeacher ='" & Trim(Txtusername.Text) & "'"

问题2、如果在上面列名（ChargeCash）中都是0或没有所查询条件的记录哪么你的查             询结果将为NULL这时你将用到IsNull函数来判断（If IsNull(mrc4.Fields(0)) 

2、 接着你要做的就是做一个模板报表。

  你可以先下载一个制作报表的工具，然后进行制作。

  下载安装制作工具grid++report http://www.onlinedown.net/soft/44547.htm

   接着制作模板这部分我是参照九期师哥、师姐们做的

   吴利昌师哥

     http://blog.csdn.net/wlccomeon/article/details/8269917

如果你做周结账是有个查询时间：日期1至日期2这部分我补充一下。这时你要添加两个参数添加方法，右击鼠标—插入—参数，然后命名参数就可以了。

3、 到VB这部分了报表和VB的结合报数据库相应表中的数据显示出来。

这部分吴利昌师哥也作了总结，我就站在巨人的肩膀上了一下。

http://blog.csdn.net/wlccomeon/article/details/8296679

但是在周结账部分刷新功能在代码部分借鉴了一下九期社河师哥的博客

http://blog.csdn.net/lishehe/article/details/7961025

 

这时你就用到了刚刚设置的两个参数这在社河师哥的博客中有写到。

如何做的问题就写到这里。