VB
关注
分享
扫一扫
追寻_无憾
这个作者很懒，什么都没留下…
展开
-
第一次机房收费系统之操作员收取金额查询
操作流程：根据自己的意愿，操作员选择起止日期，点击查询，连接数据库表recharge_info表，并显示数据使用数据库表：recharge_info（存放充值记录）具体代码如下：显示数据：Private Sub cmdInquery_Click() '对recharge_info表操作 Dim mrcrecharge As ADODB.Recordset '用于存放记录...原创 2019-07-30 09:51:41 · 281 阅读 · 7 评论 -
第一次机房收费系统之操作员组合查询
对于学生信息维护、查询上机记录、以及操作员工的记录三个窗体都用了组合查询的方法，操作相同，因此在这就不全部介绍了，仅仅介绍一下组合查询的方法，以及代码等，对这三个窗体的具体操作也不做过多的介绍。这三个窗体的组合查询我是这样理解的，最开始只有条件一可以输入，另外两个条件不可输入，之后两个条件时，条件1、2可用，条件3不可输入，三个条件的时候都可输入，之后根据条件进行查询记录。这里有一个优化的内容...原创 2019-07-30 10:08:19 · 229 阅读 · 5 评论 -
第一次机房收费系统之管理员结账
操作流程：点击操作员用户名的combox控件，会出现所有操作员用户以上用户ID，选中ID下面显示操作员姓名，显示购卡，充值等界面的记录，最后计算出各个售卡退卡张数以及金额。进行结账。使用的数据库表：user_info（存放用户信息）student_info（存放学生信息）recharge_info（存放充值记录信息）cancelcard_info（存放退卡信息）checkday_in...原创 2019-07-30 10:28:23 · 214 阅读 · 4 评论 -
第一次机房收费系统之管理员删除添加用户
操作流程：根据用户级别的不同，显示不同的数据，可点击右方的添加，显示添加用户窗体进行添加，可以选中MSHFlexGrid控件中的内容，点击删除键进行删除，更新是为了添加删除用户后进行重新显示内容。使用的数据库表：user_info（存放用户信息）具体代码如下：显示信息的操作：Private Sub comboUserLevel_Click() '对user_info表操作 ...原创 2019-07-30 10:40:37 · 334 阅读 · 8 评论 -
第一次机房收费系统之管理员基本数据设定
操作流程：窗体显示之前的记录，点击修改进行修改记录，修改完毕后点击确定，进行保存数据库表中，之后进行使用，当不想修改时，在点击确定之前点击重置，则记录恢复之前，不会变化。使用数据库表：basicdata_info（存放基本数据）具体代码如下：显示操作：Private Sub Form_Load() '对basicdata_info表操作 Dim mrcbasicdata...原创 2019-07-30 10:53:00 · 204 阅读 · 5 评论 -
第一次机房收费系统之管理员显示值班教师
操作流程：在窗体加载时直接显示数据。使用数据库表：worklog_info（存放用户上下机记录）具体代码如下：Option ExplicitDim H As Single '定义窗体高的变量 '定义窗体高的变量Dim W As Single '定义窗体高的变量 '定义窗体宽的变量Private Sub cmdOFF_Click() Unload frmDutyTeache...原创 2019-07-30 10:59:24 · 192 阅读 · 6 评论 -
第一次机房收费系统之管理员日结账单
对于这个窗体利用报表设计器去进行设计具体使用见一下博客：https://blog.youkuaiyun.com/LZ15932161597/article/details/84667604操作流程：显示当前日期的结账账单情况，进行打印，打印预览等。使用数据库表：checkday_info（存放每日的结账记录）程序Dim H As Single '定义窗体高的变量 '定义窗体高的变量Dim W...原创 2019-07-30 11:08:33 · 282 阅读 · 4 评论 -
第一次机房收费系统之周结账单
对于这个窗体利用报表设计器去进行设计具体使用见一下博客：https://blog.youkuaiyun.com/LZ15932161597/article/details/84667604操作流程：如果不选择日期将显示，时间控件1里的日期到当前日期的记录，进行总和，选择日期，按日期进行总和使用的数据库表：checkweek_info（存放周结账单）具体代码如下：Option Explicit...原创 2019-07-30 11:16:54 · 259 阅读 · 8 评论 -
第一次机房收费系统之操作员学生信息维护
学生信息维护这个窗体单拿出来是为了修改其中的记录而做的介绍。其中将详细列出代码请参考代码具体的代码添加字段名Private Sub Form_Load() H = Me.Height W = Me.Width '为字段添加选项 comboFieldName1.AddItem "卡号" comboFieldName1.AddItem "学号" c...原创 2019-07-30 11:30:01 · 306 阅读 · 9 评论 -
第一次机房收费系统优化总结
这次的机房持续了很长一段时间，也正是由于时间间隔较长，系统上的一些问题也显露了出来，因此优化也用了挺长的一段时间。但总体上没遇上什么大麻烦。以下是对这次机房系统的一个优化的总结，其实之前的总结中也包含了一些，但不太完整，以下是我在此次机房中的一些优化的内容：一.限制字符类型(在KeyPress事件中编辑)1.只输入数字和删除键If KeyAscii <> 8 And (KeyAs...原创 2019-07-30 15:13:18 · 323 阅读 · 8 评论 -
第一次机房收费系统问题和感受
在找师傅之前，先找小伙伴们挑了两边错，出了很多的问题之后又找了师傅还是出了问题，下面是我出的问题得总结。在验项目之前1.上下机逻辑问题之前我一直将系统的初衷理解错了，所以我在设计的时候时在上机了一个号之后就不可以上机了（cmdOK.Enabled=True）（下机亦是如此）,后来发现理解错了，后来删除了这一行程序。2.查看上机状态的窗体中下机后仍然可查询产生这个问题的原因是将选中或者全部...原创 2019-07-30 16:19:07 · 310 阅读 · 10 评论 -
第一次机房收费系统之登录界面
对于第一次机房这个项目，早就开始了，但是由于学校课程紧张的问题，一直没有跟进，后来弄完了机房了，又快考试了没来的进行总结，现在对此进行总结一下：对于登录界面的流程如下：输入用户名----判断是否输入（未输入提示）-----输入密码------判断输入是否为空（为空提示）-----连接数据库表User_Info、onwork_Info和worklogInfo-----与表中数据比对-----隐藏...原创 2019-07-28 16:57:34 · 321 阅读 · 10 评论 -
第一次机房收费系统之上下机界面
上下机界面流程如下：上机：输入卡号-----判断是否输入（否提示请输入卡号）-----连接student_info、online_info和line_info表-----进行数据比对-----满足条件的上机下机：输入卡号-----判断是否输入（否提示请输入卡号）-----连接student_info、online_info和line_info表-----进行数据比对-----满足条件下机...原创 2019-07-28 17:40:56 · 279 阅读 · 7 评论 -
第一次机房收费系统之操作员充值
操作流程：输入考号和充值金额，判断卡号是否存在，然后更新student_info、recharge_info表，添加新记录或改变金额。使用的数据库表：student_info（存放学生信息表）recharge_info（用于存放充值记录）具体代码：Private Sub cmdOFF_Click() Unload MeEnd SubPrivate Sub cmdOK_Cl...原创 2019-07-30 09:41:18 · 190 阅读 · 4 评论 -
第一次机房收费系统之操作员注册
操作流程：存盘输入卡号、学号、姓名等不为空的内容，判定卡号是否在student_info表中存在，是则提示已存在此用户，否则为student_info添加新记录清空清空文本框里的所有内容查找弹出查询余额窗体使用数据库表：student_info（存放学生信息记录）recharge_info（存放充值记录）具体代码：存盘：Private Sub cmdOFF_Click()...原创 2019-07-30 09:31:16 · 199 阅读 · 7 评论 -
学生信息管理系统模块问题篇
这个窗体可是出现了很多个问题，例如实时错误91错误，实时错误3021错误，这些就是比较常见的错误，下面对于这些错误有了一些认识，来分享一下一、实时错误91错误1.引起的原因1.ODBC连接没成功2.VB模块中连接数据库的代码，用户名，密码和ODBC不同步3.代码中语句出错，连接不到数据库中所要连接的表2.具体的解决方法：第一个原因在前面已经说过了，可以参照前一篇博客https://...原创 2019-01-25 08:47:16 · 1231 阅读 · 15 评论 -
学生信息管理系统——用户登录模块问题篇
终于进入了“学生”的优化调试阶段了，这第一个窗体就出了错误，以下是有关这个错误，我的解决办法，这个错误的原因是由于通过ADO控件连接ODBC数据源连接出了问题，导致模块代码产生了错误，以下是问题的的解决办法：调试显示如下1.添加一个ADO控件，具体步骤是打开VB6.0的“工程”----&gt;“部件”----&gt;选中“Microsoft ADO Data Control 6.0”,之后...原创 2019-01-22 18:42:51 · 4408 阅读 · 11 评论 -
学生信息管理系统优化篇
这个模块没有了实时错误，但是有的地方还需要优化，因此，我们对这个模块进行优化。1. 输入日期麻烦，用DTPicker控件代替由于我们输入日期麻烦，而且由于格式限制，经常错误，因此我们可以用一个DTPicker控件代替，具体的添加的方法是单击工程，部件，在控件中选中Microsoft Windows Common Controls-2.6.0，之后直接添加即可。2.ComboBox控件只能...原创 2019-01-25 09:55:41 · 544 阅读 · 16 评论 -
数据库视频之数据表的管理与SQL语句基本操作
管理数据表字段数据类型：数字：整型（int等）、高精度小数类型（decimal和numeric）、用于存储货币（money和smallmoney）、浮点型、bit字符：char 、Varchar（智能长度）、text、nchar、ntext、nvchar（带N的占两个字节）时间：datetime、smalldatetime（范围小）二进制：binary（固定）、varbinary、ima...原创 2019-02-15 11:50:00 · 621 阅读 · 10 评论 -
数据库视频之操作查询与TSQL的介绍
操作查询连接：基本连接:原则:SELECT子句中每个列加上基表、FROM子句包括所有例句、where 内连接：SELECT 列名 FROM 表1 INNER JOIN 表2 (ON 连接条件) WHERE 条件 ORDER BY 列名（ ON和WHERE意义外连接：左外连接 ：SELECT 列名 FROM 表1 LEFT OUTER JOIN 表2 (ON 连接条件) WHERE ...原创 2019-02-16 15:46:09 · 390 阅读 · 12 评论 -
数据库视频之存储过程触发器以及SQLServer2008安全机制
存储过程基础：定义：为了完成特定的SQL语句集种类：用户自定义、系统、扩展存储过程系统存储过程：具体过程介绍在软件中存在临时存储过程：#（局部，只能用于一个表），##（全局，可用于整个连接（数据库））操作：创建：create procedure 过程名 （变量 类型） as 语句 用“EXEC 过程名 变量=值”进行调用过程使用带默认值的参数：设置变量的值（给参数值时，参...原创 2019-02-17 15:21:54 · 319 阅读 · 10 评论 -
学生信息管理系统优化窗体控件本身
一、学生信息管理系统中在运行时当窗体的大小改变时控件不会改变，这个可以通过代码优化，但是一些控件时不可以的例如combox控件，frame控件等等，下面时代码：‘第一种。就是最实用的,就是所有控件的width和height按比例随窗体变化,位置也是当然是按比例哦。控件的字体不变。如下复制到代码:‘改比例,字体不该。最实用Option ExplicitPrivate FormOldWidth...原创 2019-02-12 08:17:55 · 321 阅读 · 9 评论 -
数据库视频之SQLServer产品简介与数据库的管理
SQL Server 产品入门数据库系统模型：层次、网状、关系完整性规则：实体、参照、用户定义三范式：第一范式 数据表中属性不可重复，某个属性不可多值；第二范式 满足第一范式，非主键字段依赖于主键字段；第三范式 满足第二范式，两个非主键字段不存在函数依赖关系。SQL Server2008体系结构：安装与卸载管理工具：集成开发：SQL Server Management ...原创 2019-02-14 15:44:15 · 250 阅读 · 8 评论 -
数据库视频之数据库备份恢复以及数据库的集成报表分析服务
第十二章 备份与恢复数据库备份1、类型：完整、差异数据库、事务日志、文件组2、恢复模式：简单、安全、大容量日志记录 （数据库属性，“选项”选项下的恢复模式）3、创建备份设备：服务器对象打开，新建备份设备，输入名称，保存即可4、创建完整备份：右击表，找到任务，备份进行操作，添加保存地址，之后确定即可。5、创建其他备份：以上操作同上（改变类型），在选项上不同。6、其他备份选项：将一个表...原创 2019-02-20 10:07:37 · 545 阅读 · 15 评论 -
数据库视频之用NET和SMO访问SQLServer2008及其监视和其他操作
第十七章 使用NET访问SQL Server2008ADO.NET基础知识1、概述2、组成SQLConnection1、属性与方法2、使用：新建控制台程序，引用命名空间“system.Data.SqlClient”SQLCommand1、属性2、方法3、使用：操作同上SQLDateAdapter1、属性2、方法3、使用：操作同上，设计界面，编辑代码（VB6.0界面差不多）...原创 2019-02-20 10:45:24 · 306 阅读 · 12 评论 -
第一次机房收费系统之一般用户查看上机记录
执行流程：输入卡号-----判空（空则提示）-----连接line_info表-----显示数据信息使用数据库表：line_info（存放上下机记录）具体流程：输入卡号，连接line_info表，将数据显示至MSHFlexGrid控件中，导出Excel表格中具体代码如下：显示数据的操作：Private Sub cmdInquery_Click() '对Line_Info表操...原创 2019-07-30 08:55:15 · 339 阅读 · 7 评论 -
第一次机房收费系统之一般用户查询上机状态
对于一般用户的充值记录与查询上机记录的过程相同，唯一不同的时将表line_info换成了recharge_info表，其他的相同，就不重复说明了，下面时一般用户查询上机状态的总结：操作流程：点击查询-----弹出条件查询的窗体进行查询点击显示全部-----则显示所有正在上机的用户完成第二步可以点击全部用户下机和选中下机------根据不同的方式进行操作连接数据库进行下机使用数据库表：s...原创 2019-07-30 09:08:13 · 260 阅读 · 5 评论 -
第一次机房收费系统之一般用户修改密码
执行操作入下：输入原密码，查询是否正确，不正确提示，否则输入新密码，确认密码，两者对比是否相同，相同则将密码设置为新密码，退出系统重新登陆，否则提示两者不同，无法修改。使用数据库表：user_info（存放用户信息）具体代码如下：Private Sub cmdCancel_Click() Unload MeEnd SubPrivate Sub cmdOK_Click() ...原创 2019-07-30 09:17:50 · 315 阅读 · 7 评论 -
第一次机房收费系统之一般用户查看余额
本界面的操作流程：输入卡号-----判断卡号是否输入（未输入提示）-----连接数据库表student_info-----点击查询显示数据本界面涉及到数据库表：student_info（存放学生信息）本界面操作内容：输入卡号，判断是否为空，为空则提示，否则点击查询，连接student_info数据表，搜索数据，若不存在则提示不存在，否则显示数据具体代码如下：查询的操作代码：Priv...原创 2019-07-28 17:55:56 · 174 阅读 · 5 评论