VB与数据库
文章平均质量分 71
张盟
这个作者很懒,什么都没留下…
展开
-
【机房收费系统】总览
机房收费系统算是告一段落了,也总结了一些问题与收获,但始终觉得差了点什么,于是画了张图,站在全局观上把机房收费系统过了一遍,方便以后的回顾。首先,这个系统是类似于教师端的一个东西,要配合学生端一起使用。一般用户:这个一般用户就好比平常我们去机房上课,而这个一般用户就是看着我们学习的老师一样,可以进行一般性的查询,比如看看都谁在上机学习啊,有哪个学生贪玩没来上课从而上机记录里没有他啊,学原创 2015-08-17 09:39:28 · 664 阅读 · 54 评论 -
机房收费之细节优化
登高望远,感觉机房收费系统也是如此,刚开始敲机房的时候就觉得会有很多细节去考虑和添加,自己也尽量边敲边完善,但毕竟身在此山中,云深不知处。有很多东西是当时所不曾考虑到的,所以越到后面问题所暴露出来的也就越多,下面是自己对部分细节的优化:1、临时用户下机相当于退卡 txtSQL = "select * from student_Info where type ='临时用户' and c原创 2015-08-12 11:03:18 · 581 阅读 · 54 评论 -
机房数据库之数据类型
前几天在敲组合查询中修改学生信息那个窗体时,遇到了小麻烦,本来在自己看来再简单不过一行代码,就是实现不了。当组合查询出来的学生信息状态为不使用时,确定修改和Frame都要不能修改,即If lblStatus.Caption = "不使用" Then Command1.Enabled = False Frame1.Enabled = False End If后原创 2015-08-08 15:50:39 · 617 阅读 · 50 评论 -
机房收费系统之报表
机房收费系统的报表窗体之前完全不懂如何去敲,因为涉及到了新的控件,总会有些抵触,不过通过问同学和百度对报表就有了一个大致的了解,也就没什么了。报表就是用表格、图表等格式来动态显示数据。首先,要下载一个报表设计器,来打开编辑报表 然后可以插入表头、表尾、网格、静态框、字段框、参数等,之后点击原创 2015-08-02 11:37:36 · 631 阅读 · 44 评论 -
【机房收费系统】上机时动态刷新余额
机房收费系统在敲完上下机后,在一次下机时,发现由于上机时间过长,卡号余额都成了负数,很显然,在真正机房上机时,这种情况是不允许发生的,所谓机房收费系统,那么就要做出一个尽量真实的机房模拟环境,所以就要再多写一个Timer事件来实现上机时动态检测卡号余额的功能了,代码如下:Private Sub viewdata() Dim mrc5 As ADODB.Recordset '定原创 2015-08-08 10:37:24 · 1168 阅读 · 50 评论