程序进度之2004-8-26

至今完成:

       基本资料的输入、修改与多项条件查询
       统计每天的收入
      可控制的打印签到
       …………

等待完成：

       费用图表显示（年、季度、月）--------------即日完成
       学员图表显示[类别、（年、季度、月）]-------择日完成
       …………

详细代码及^思路：

      每天的记录：
sqlString="Select sum(交费金额) from 表 Where 日期 =#" & 要查询的日期 & "#"

count最多为31
for i=0 to count
    adoPay.RecordSet=sqlString
    adoPay.Refresh
next i
社定数组 Myday(count)
把查询获得的记录（金额）相加

读取
把数据显示在网格控件