经过一个多月，终于敲完了第一次机房，这是在学生收费系统后的一次比较正规的系统，是我们练手的绝佳机会，因为每天进行计算机时间只有两个小时，就显得很珍贵，所以我就更加珍惜时间，能够更加合理得规划时间。但是有的时候就是感觉心有余而力不足，我判断就是方法出现了问题。
当我在做下机的时候和在结账的时候就感觉很困难。
那么下面我们就捋捋思路吧。
下机
结账
把握最重要的东西就是操作员汇总部分的
应收金额=注册输入+充值输入—退卡输出
这时候就要求我们在注册的时候不能只注意更新student_info表，还要注意更新recharge表。
当然还有一种解决办法就是把注册时候的充值金额写成0，这样就不用再更新一个表了。但是这样也是有弊端的，如果把他写成0的话，这个文本框就没有存在的意义了。
如果你再动一下你的聪明脑袋瓜，其实你可以让充值的窗体直接显示在你提示“充值成功！”后。一气呵成，又很简单。
但是我们在设计程序还是要从用户的角度看问题，不能只从程序员的角度看问题！！！
组合查询
这里要强调的就是尽量使用数组，在做项目之前可以和你认为水平比你高的人或者有项目经验的人先沟通，这样的话可以规避很多不必要的麻烦，但是在学习的初期自己学遇见的问题自己印象会更加深刻，毕竟错误才是最好的老师，这是与我们的认知常识相悖的，但是事实上只有错误才能让我们飞快地进步。
还有一个问题就是组合查询地逻辑一定要自己捋清，还是那句话，在逻辑没有捋清之前不要尝试写代码，因为我们要现有宏观再有微观，而不能一下子扎进微观里。
还有当你真的写到代码地时候还会有问题，我们选择地条件是日期或者是时间范围地时候，难道我们确定范围的时候我们还要让用户很精确的输入具体的时间吗？这个时候我们就要在我们确定条件名称以后改变后边的控件，不能只是使用一个简单的text控件，要换成一个时间控件，这都是细节，这些细节都是建立在宏观之上的，没有宏观就没有办法谈微观，还是要注意重要性。
Dim w As Integer For w = 0 To 2 If DTPicker1(w).Visible = True Then Text1(w).Text = DTPicker1(w).Value End If Next w
这段代码既显示出使用数组的好处，又能显示出使用时间控件的好处
