历经了一个月的时间,我的第一次机房终于完成了。第一次机房不像学生一样有源代码直接调bug,而是自己写代码,根据自己的想法和逻辑来实现它的功能。好了话不多说,来展示我的流程图吧!
第一次机房自我觉得有三大难点:上机、下机、结账。我们主要看这三部分的流程图
上下机是机房收费系统最基本的操作,没有上下机,以后的操作都是根据上下机操作的,以及为上下机服务的,所以我们在弄第一次机房的时候,一定要对这个操作的思路整理清楚!
1、上机
上机就是你去网吧去了,在网管那里刷一下身份证,挑选自己的机子,然后输入身份证号,密码,进入主界面,此时,系统开始计时,同时在用户界面,你也可以看到余额、上机时间等一系列你帐号的信息!
简单清晰的流程图奉上
2、下机
下机和上机的步骤大致差不多,多的就是金钱和时间的计算(时间就是金钱嘛)!
废话不多说,流程图奉上!
还有一个就是查看上机的人数,这时就需要一个Timer控件
1. '查询数据库的人数 2. Dim mrc As ADODB.Recordset '连接上机表 3. Dim txtSQL As String 4. Dim MsgText As String 5. 6. 7. txtSQL = "select COUNT(cardno) from OnLine_Info;" 8. Set mrc = ExecuteSQL(txtSQL, MsgText) 9. 10. Label17.Caption = mrc.Fields(0) 11. 12. mrc.Close
3、结账
在做结账的时候,操作员用户名我选择的是管理员,在软件的使用过程中,管理员也有操作员的全部功能,所以在这选择了管理员。
汇总需要计算,该操作员售卡张数、退卡金额、退卡张数、总售卡数、充值金额、应收金额、临时收费金额。所以在这时,我们的逻辑就要清楚。
操作流程
点击操作员用户名的ComboBox控件,会出现所有操作员用户以上用户ID,选中ID下面显示操作员姓名,显示购卡、充值等界面的记录,最后计算出各个售卡退卡张数以及金额,进行结账
使用的数据库表
user_info(存放用户信息)
student_info(存放学生信息)
recharge_info(存放充值记录信息)
cancelcard_info(存放退卡信息)
checkday_info(日结账单)
计算公式
充值金额=此用户为学生注册的金额+此用户为学生充值的金额
收费金额=固定用户的消费金额+临时用户的消费金额
退卡金额=此用户操作的为学生退卡的金额
总售卡数=售卡数—退卡数
应收金额=充值金额+消费金额—退卡金额
总结
第一次机房到这里就告一段落了,下个项目走起~!