今天把機房收費系統的最後一塊整完了.也就是日結賬,和周結賬這塊，現在總結一下。先理一下大概思路。
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
這時你就用到了剛剛設定的兩個參數這在社河師哥的部落格中有寫到。
如何做的問題就寫到這裡。