VB
水田如雅
不生产代码,只是代码的搬运工
展开
-
ADODB.Connection对象的Execute方法
该方法用于执行SQL语句。根据SQL语句执行后是否返回记录集,该方法的使用格式分为以下两种: 1.执行SQL查询语句时,将返回查询得到的记录集。用法为:Set对象变量名=连接对象.Execute("SQL查询语言")Execute方法调用后,会自动创建记录集对象,并将查询结果存储在该记录对象中,通过Set方法,将记录集赋给指定的对象保存,以后对象变量就代表了该记录集对原创 2013-08-03 20:50:20 · 5150 阅读 · 5 评论 -
机房收费系统的上下机
机房收费系统的上下机,涉及到对多张表的操作,但是还是从数据库中取数据,读出来,处理,然后放回去。其中,如何上下机的逻辑感觉很重要。 一,上机 在上机时,首先(非空判断什么的不再提)用户是否是一个合法用户,这里的合法性,要求用户不仅要存在与这张表,而且用户不能是已经退卡的用户。 当合法性验证完后,还要看看用户是否是已经在原创 2013-11-15 20:15:26 · 2341 阅读 · 33 评论 -
关于报表
在机房收费系统的日结账单和周结账单里面,用到了报表,感觉这个东西只要按照步骤一步步来,比写一句错误百出的SQL语句容易的多。 以日结账单为例(只写了报表部分代码): Option ExplicitDim WithEvents Report As grprolibctl.GridppReport '实例化报表Dim SQL As StringPrivate Sub原创 2013-11-15 21:30:36 · 2288 阅读 · 30 评论 -
修改学生信息窗体——基本数据该从哪里读入
在学生基本信息查询的下面,有一个修改选中表格中的学生信息的按钮,比如,当选中学号是1,姓名为1.。。这一行中,然后点击下面的修改,就会弹出修改学生信息的窗体。在窗体刚出来时,各个文本框是有数据的,在设计代码时,我刚开始是表格中(也就是学生基本信息查询那个窗体)的数据直接读入修改学生信息的窗体,然后再进行修改等。 但是,这里有一个问题,如果我在学生信息查询的窗体中,先选择学号1的同学原创 2013-11-09 15:40:04 · 2660 阅读 · 10 评论 -
日结账单和周结账单
一,结账 在说周结账单和日结账单之前,得先做好结账的工作。在汇总里面,有个结账,其实这个结账的代码很简单,只是两个Update,值要把结账状态的标记改变一下就可以。这个结账好像平常都会有个老师负责收取充值的现金,也负责退卡的现金,在结他的账的时候,他要把手里的钱都上交。 周结账单和日结账单是对所有金额的汇总,包括学生的消费金额,而由于在上机时的消费金额是在下机时自动扣原创 2013-11-15 21:00:19 · 4914 阅读 · 21 评论 -
SQL server 创建自增列
一,企业管理器中创建自增列 选择要创建自增列的表,然后右击选择设计,创建一列 然后在下面的表属性里: 将标识规范里的(是规范)改为是,设置标识增量(每行增加多少)和标识种子(从多少开始增加),此处都写1就行。保存。 二,使用T-SQL语句alter table 表名 add 列名 int IDENTITY(1,1) NOT NULL原创 2013-11-08 17:04:46 · 11003 阅读 · 22 评论 -
学生上机信息统计——对两张表的联合查询
在学生上机信息统计中, 此处,因为要查询两张表,而且两张表查询的先后有时要严格表明,所以,在查询时,有两种思路: 1,定义两个Recordset对象,并根据字段,判断是先查询学生信息表,还是先查询学生上机表 2,两张表有一个共同的字段:卡号,所以,可以根据卡号将两张表连起来查询,这样比较方便。 因为第一种方式比较复杂,容易出错,所以,我选择了第二种方式,将原创 2013-11-08 15:22:49 · 2936 阅读 · 15 评论 -
退卡问题
虽然在写代价时犯过很多逻辑错误,出现了很多漏洞,但是改了几次,都基本找出来了,但是对于退卡问题,我是真心伤了。。。。。。。。 一,退过卡的人,不能再次上机。 二, 每人只能退卡一次。 三,退卡人员的记录不能删除,要保留,但是在注册新用户时,不能用退卡人员的主键。 四,退卡的金额:什么都不写,默认全部退还。 五,退过卡的人不能再次原创 2013-11-15 21:10:24 · 2348 阅读 · 23 评论 -
关于ADO对象的使用小结1
虽然做过了5个实例,做过了学生信息管理系统,但是,对ADO有点感觉,还是从这个中秋开始的。 一,3个对立对象和4个非独立对象的关系 ADO分为对立对象和非独立对象,非独立对象的使用必须依赖于独立对象,其中,具体对象的依赖关系如图。二,各个对象的功能作用Connection对象:用于创建和数据源的连接Command对象:用于执行查询操作Re原创 2013-09-22 19:43:24 · 1775 阅读 · 4 评论 -
删除选定的MSHFlexGrid控件中的一行
昨天晚上到今天上午,一直在弄那个添加删除用户的窗体。其实就纠结在一个问题上,如何点击一个网格,删除选中的Mshflexgrid控件中的一行。 由于对这个控件在学生信息管理系统时,学的很生疏,所以又从头学了一遍。 先来看一看常用属性: AddItem向网格中加入一新行 Clear清除网格中的内容原创 2013-10-04 17:50:44 · 3111 阅读 · 7 评论 -
利用Command创建执行SQL语句的模块
最近两天开始为机房收费系统编写代码了,在机房收费系统中,最核心的代码就是执行SQL语句,返回一个Recordset对象的过程,有这样功能的代码我们以前在学生信息管理系统中接触过:Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset '本函数的功能是执行SQL语句,并返回结果原创 2013-09-22 19:20:17 · 2650 阅读 · 10 评论 -
VB,打开文件时,出现名称冲突
今天一打开文件,出现了这个问题,检查了下发现,frmCheckShangJiInfo中,有个C是大小写不一样的。我确定之后,又为窗体在属性窗口中,粘贴了一遍窗体文件的名字,想把他们改成一样的,可是再打开窗体还是这样子。后来,找到了两种解决办法:一,为窗体重新命名 在属性窗口中,将frmCheckShangJiInfo改名为frmCheckShangJiInfo222,保存后,原创 2013-09-12 09:59:38 · 2131 阅读 · 5 评论 -
关于学生信息管理系统的改进问题
最近在大家验收时,我旁听了一点,很多师哥师姐提出了很多我们没有到过的东西,感觉长了不少知识。 一,界面的美化 在作品展的时候还能想到界面的美化,但是这次却没怎么注意,但是至少那些控件的摆放,对齐还是要有滴。 二,回车键不能使用 比如,在我们登陆学生信息管理系统的时候,敲完用户名和密码进入系统时,猛敲回车,根本不能像QQ那样,如我们所愿的进入系统,而是呆呆的毫无反应,原创 2013-08-14 15:17:22 · 3860 阅读 · 11 评论 -
Split函数
Split函数描述返回一个下标从零开始的一维数组,它包含指定数目的子字符串。语法Split(expression[,delimiter[,count[,compare]]])Split函数语法有如下几部分: 部分 描述 expression 必需的。包含原创 2013-08-03 17:09:22 · 2276 阅读 · 3 评论 -
SQL语句的两次执行问题
昨天下午,写充值窗口时,出现了SQL语句被执行两次的问题。头痛了一下午和一晚上。 充值的窗口要操作两张表,一张是学生的基本信息表,就是将充值金额写入。另一张表,是用来存放本次充值的信息,比如:充值时间日期,谁充的钱。。。对前一张表的操作很快就写好了。但是在修改第二张表时,却出现了问题。 先来看一下代码:'修改教师充值表 SQL3 = "insert int原创 2013-10-02 20:42:50 · 13073 阅读 · 10 评论