自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

努力提高自己

  • 博客(3)
  • 收藏
  • 关注

原创 机房收费系统之下机过程

下机过程涉及到的对表的处理要比上机过程多,最重要的一点是对上机消费的计算。首先需要先计算出上机持续的时间onlinetime,然后再用基本数据表中的rate(价格)乘以onlinetime算出消费的金额,再让学生表student_info中的cash减去消费的金额,得到新的余额newcash。在此之前,需要先做一些判断。 '下机 Private Sub cmdDown_Click() o

2013-11-24 20:23:08 1065 17

原创 机房收费系统之上机过程

上机流程图如上所示。这是判断是否能上机的过程。以下是代码:'上机 Private Sub cmdOn_Click() '保证输入了卡号 If Trim(txtCardID.Text) = "" Then '没有输入卡号,提示 MsgBox "请输入卡号", vbOKOnly + vbExclamation, "警告" txtCardID.

2013-11-16 20:50:44 996 17

原创 机房收费系统中各个表的应用

之前刚刚接触机房收费系统的时候,感觉特别无从下手,但是就是听了师哥的话,做就行了,做着做着就有感觉了。就开始闷头往前走了,但是感觉特别的乱,尤其各个表的用途,各个窗体用到了那些表的操作。于是,就做了一个分析,这样在做系统的时候就会比较有个清晰的思路。

2013-11-10 20:19:19 885 17

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除