- 博客(8)
- 收藏
- 关注
RSS订阅原创 机房收费系统之日结账，周结账--逻辑篇(日账单的各项金额代表什么？如何计算？)
日结账表和周结账表可谓是三大难题的最后一关了，既然是难题那就要好好的思考一番后再动手了，以下是我的日结账、周结账程序思路及代码集。 一、问题集 我们在做日结账单，周结账单之前需要考虑几个问题： 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关注的人