自定义博客皮肤VIP专享

*博客头图:

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

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

博客底图:

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

栏目图:

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

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(8)
  • 收藏
  • 关注

原创 机房收费系统之日结账,周结账--逻辑篇(日账单的各项金额代表什么?如何计算?)

      日结账表和周结账表可谓是三大难题的最后一关了,既然是难题那就要好好的思考一番后再动手了,以下是我的日结账、周结账程序思路及代码集。一、问题集      我们在做日结账单,周结账单之前需要考虑几个问题:1、我们做的日结账,周结账表是给谁看的?     管理员,只有管理员才有这个权限。2、日结账表和周结账表都包含什么内容?     内容:上期充值卡余额,本期充值金额...

2018-10-26 19:49:11 1310 13

原创 机房收费系统之日结账,周结账--下篇(VB报表的制作,Grid++Report与VB的交互、传参)

       上一篇博客分享了Grid++Report是如何创建初始表格,如何与数据库连接的,这篇重点分享一下Grid++Report是如何与VB交互的,以及VB是如何传参给Grid++Report的。一、Grid++Report的常用文本框       想要绘制出如下的表格(机房开放收入总汇表),我们需要通过Grid++Report报表设计器的插入菜单栏,进行插入,分别插入静态框,系统变...

2018-10-25 10:05:53 955 12

原创 机房收费系统之日报表,周报表--上篇(Grid++Report报表设计器的使用)

     我们在做机房收费系统的时候会遇到打印日结账单、周结账单的情况,而里面主要使用的部件是Grid++Report报表设计器,这个是什么部件呢,应该如何使用呢?今天我们就来简单的汇总一下吧。一、下载Grid++Report报表设计器Grid++Report下载链接http://www.rubylong.cn/gridreport/download.htm下载的文件里面Grid+...

2018-10-24 16:27:22 1038 14

原创 机房收费系统之操作员记录、正在值班人员记录(关闭窗口判断事件,MsgBox返回值,Queryunload与Unload区别)

      机房收费系统的操作员记录与正在值班人员记录的窗体比较简单,思路也差不多,在这里就汇总在一起进行总结。一、流程图①操作员工作记录窗体流程图②正在值班人员窗体流程图  二、查询集①MsgBox的返回值有哪些,如何获取返回值?     msgbox函数有两种格式,一种带返回值,一种不带返回值     代码如下:     MsgBox "提...

2018-10-23 19:31:55 830 15

原创 机房收费系统之基本信息维护优化篇(组合控件基础上卡号、姓名不同操作符的变更)

       小伙伴们在做机房收费系统组合查询时,字段名控件和操作符控件都会采用组合控件的方法吧,这样可以减少很多代码量、减少代码的冗余。但我们会遇到一个问题,那就是如何通过组合控件让字段名内容与操作符内容相对应呢?所谓相对应是指:当我们字段名为卡号时操作符内显示的可选项为四个符号(大于,等于,小于,不等于),而当字段名为姓名或性别时操作符就要只显示两个符号(等于,不等于),我们设计的...

2018-10-21 17:24:19 293 10

原创 机房收费系统之组合查询简化版-基本信息维护窗体(采用SQL交查询、并查询语句进行组合查询)

       第一次接触组合查询时感觉很内容很复杂,逻辑梳理就花费了很长时间,在第一个‘学生上机统计信息’的组合查询窗体中有很多代码冗余,导致代码篇幅很长,这次在做‘学生基本信息维护’窗体时又遇到了组合查询,这次的组合查询并未直接按照之前的那种方法,因为那个太长了,这次自己又研究出一个新的方法,即用SQL的交集、并集语句来进行组合查询,然而效果也是很明显的,代码量减少了很多,一眼就可以看出是什么逻...

2018-10-09 17:27:07 350 7

原创 机房收费系统之收取金额查询(TPicker控件时间段取值、SQL语句中单引号与双引号区别)

        收取金额查询窗体较组合查询而言就是小菜一碟,但即便是内容较少也有其精华之处,现在分享一下我的学习过程吧^_^一、收取金额查询窗体的流程图:二、问题集这是什么错误呢,为什么会出现这个类型的错误?产生此问题的代码部分是什么样子的呢?以下为问题代码: txtSQL = "select * from Recharge_Info where date ...

2018-10-07 19:08:49 359 5

原创 机房收费系统之组合查询(代码部分)

       最近的事情比较多,本该留出大块时间整理组合查询的代码部分,结果是分为一段一段的零散时间来整理的,最终整理的这些组合查询代码可能还是有很多冗余,本来不想拿出来的,但考虑到自己的不足就要展示给大家,这样自己才能进步嘛,所以还是厚着脸皮把我冗余的代码展示出来了,还望大家多多给予指导^_^Private Sub cmdquery_Click() Dim mrc As ADODB...

2018-10-05 14:37:15 345 6

空空如也

空空如也

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

TA关注的人

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