——【机房收费系统VB版】
文章平均质量分 61
半吊子的程序员
Your dream is not what you find in your sleep but what makes you not sleep.所谓梦想,不是你睡觉时梦到了什么,而是想到了什么令你激动得没法睡觉。
展开
-
数据库中如何求1-100以内的素数
数据库视频第八章关于表值函数的讲解中有一个例子,求100以内的素数。 在VB中程序可以这样写: Private Sub Form_Click() Dim i As Integer, j As Integer, x As Integer For i = 1 To 100 x = 0 ‘i是素数的标记 For j = 2 To i - 1 ‘如在此范围内都不能整除,i就是原创 2016-07-14 18:56:16 · 6867 阅读 · 22 评论 -
机房收费系统——上下机操作
按照顺序来讲到网吧的顾客,分为两种一是办卡充钱的会员,一种是交钱上网的临时用户。充完钱之后,一般用户(网管)就需要对顾客进行上机来记录时间,下机时进行收费。 上机:上机过程比较简单,涉及数据库中的三张表:online_info 、student_info、basicdata_info 上机的判断过程如下:1.从student表中判断卡号是否存在、此卡状态是否使用原创 2016-08-20 09:36:49 · 953 阅读 · 15 评论 -
机房收费系统——用户类型
按照顺序来讲到网吧的顾客,分为两种一是办卡充钱的会员,一种是交钱上网的临时用户。充完钱之后,一般用户(网管)就需要对顾客进行上机来记录时间,下机时进行收费。 上机:上机过程比较简单,涉及数据库中的三张表:online_info 、student_info、basicdata_info 上机的判断过程如下:1.从student表中判断卡号是否存在、此卡状态是否使用原创 2016-08-19 18:10:14 · 782 阅读 · 13 评论 -
机房收费系统——组合查询
对于组合查询一开始接触感觉很难下手,其实在之前的学生中已经有涉及过了,只是过程和联系没有这么复杂,因为当时对组合查询的理解不过深入,所以到这里才不知道如何组合。 在做完整个组合查询之后,梳理思路如下:首先在combo的下拉列表中,由于涉及combo比较多依靠additem逐个添加,结果就是累死,所以For……next语句可以将一个combo循环N次,这也是机房当中可以优化的代码有很多,因为涉及到原创 2016-08-22 10:29:06 · 568 阅读 · 21 评论