学生信息管理系统毕业毕业设计

1、 PAGE34 / NUMPAGES34目 录摘要 1Abstract2 应用背景 3 VB对数据库的操作 42.1 ADO简介42.2 ADO中Connection对象的属性 42.3 ADO中Connection对象的方法 52.4 ADO中Connection对象的事件 52.5 ADO中Connection对象的常数 5第三章 系统设计过程7 3.1 系统设计73.1.1 系统功能分析 73.1.2 系统功能模块设计 73.2 数据库设计83.2.1 数据库需求分析 83.2.2 数据库概念结构设计83.2.3 数据库逻辑结构设计103.3 学生信息管理系统主窗体的创建123.3.1

2、创建工程项目Student_MIS123.3.2 创建学生信息管理系统的主窗体 123.3.3 创建主窗体的菜单133.3.4 创建功用模块 143.4 系统用户管理模块的创建143.4.1 用户登录窗体的创建143.4.2 添加用户窗体的创建153.4.3 修改用户密码窗体的创建16 3.5 学籍管理模块的创建173.5.1 添加学籍管理模块的创建173.5.2 修改学籍管理模块的创建193.5.3查询学籍管理模块的创建21 3.6 班级管理模块的创建223.6.1 添加班级信息模块的创建223.6.2 修改班级信息模块的创建23 3.7 课程设置模块的创建233.7.1 添加课程信息窗体的

3、创建233.7.2 修改课程设置窗体的创建243.7.3 设置年级课程窗体的创建25 3.8 成绩管理模块的创建 263.8.1 添加成绩信息窗体的创建263.8.2 修改成绩信息窗体的创建273.8.3 查询成绩信息窗体的创建28参考资料 29附录30随着学校的规模不断扩大，学生数量急剧增加，有关学生的各种信息也成倍增长。面对庞大的信息量，有必要开发学生信息管理系统来提高学生管理工作的效率。通过这样的系统，可以做到信息的规管理、科学统计和快速查询，从而减少管理方面的工作量。本学生信息管理系统包括学籍信息管理、班级信息管理、课程信息管理、成绩信息管理四大模块。管理员可以拥有完全的权限管理系统，

4、而学生用户只拥有查询学籍信息和查询成绩信息的权限。本系统采用Visual Basic 6.0为开发工具，后台数据库采用Access 2000，操作系统为Windows98。关键词：学生信息、管理系统、VB、ADOAbstractWith the expanding of school and the sharp increasing of students, students information becomes larger and larger.Facing the huge number of information, it is necessary to develop an inf

5、ormation management system of students to improve the efficiency of work.It can provide standard management, science statistics and rapid inquiry of students information.This system includes four following modules: status information management, class information management, course information manag

6、ement and score information management.The manager owns the complete management of this system, while students can only own the access to the status information and score information.This system is designed for windows 98, the develop language is Visual Basic 6.0, and the database management system

7、is Access2000.Keywords:Students Information, Management System、VB、ADO应用背景管理信息系统就是我们常说的MIS（Management Information System），在强调管理，强调信息的现代社会中它变得越来越普与。MIS是一门新的学科，它跨越了若干个领域，比如管理科学、系统科学，运筹学、统计学以与计算机科学。在这些学科的基础上，形成信息收集和加工的方法，从而形成一个纵横交织的系统。管理信息系统起初应用于最基础的工作，如打印报表、计算工资、人事管理等，进而发展到企业财务管理、库存管理等单项业务管理，这属于电子数据处理（

8、EDP，Electronic Data Processing）系统。当建立了企业数据库，有了计算机网络从而达到数据共享后，从系统观点出发，实施全局规划和设计信息系统时，就达到管理信息系统的阶段。随着计算机技术的进步和人们对系统的需求进一步提高，人们更加强调管理信息系统能否支持企业高层领导的决策这一功能，更侧重于企业外部信息的收集、综合数据库、模型库、方法库和其他人工智能工具能否直接面向决策者，这是决策支持系统（DSS，Decision Support System）的任务。我国20世纪70年代末有少数企业开始MIS的局部应用。“六五”期间，选择一些大型企业进行MIS的开发试点，其中首都钢铁公司

9、、第一棉纺厂、第二汽车制造厂、宁江机床厂等取得了经验。20世纪80年代中后期，在全国性的计算机应用热潮中，许多企业纷纷从财务管理、人事管理等单项应用入手，尝试建立MIS。许多企业，如燃机厂、电视机厂、鼓风机厂、渤海无线电厂的MIS初具规模，建立了覆盖全厂的计算机网络。“八五”期间，企业逐步走向市场，MIS建设的目标和需求日益明确。一些企业的系统，如第一机床厂、经纬纺织机械厂、飞机制造公司等都达到了很高的水平，与企业中其他系统集成，形成了CIMS。目前，我国MIS已经有了相当的普与率，几乎覆盖了各个行业与各个部门。在学校，尤其是在各大高校，对于学生的管理是相当重要，而且也是相当麻烦的，它是学校管

10、理中最基本的一项常规性工作。而长期以来，学校管理都是依赖人工来进行的，面对如此众多的学生信息，其工作量是相当相当巨大的。这样不仅仅浪费了大量的人力物力，而且由于人工管理存在着大量的不可预知性，造成学生信息管理的一些不规，使得信息管理陷入“事倍功半”的地步。开发本系统就是为了解决学校在管理中的一些不规，使学生信息的管理向着规化、简单化、有效化的方向发展。根据学生信息管理系统的基本流程和高校学生信息管理的实际要求，本系统需要实现以下功能：学生基本信息的录入，基本信息包括学生的基本情况、所在班级、所学课程和成绩等；要求在系统中能够对学生信息精心灵活的浏览和查询；要求在系统中能够对班级信息进行输入、查

11、询和修改等；要求能够对学校基本课程信息录入、修改和设置等；要求能够对学生成绩信息进行输入、修改和查询等；基于权限的管理，本系统可以提供给管理员或者学生本人使用。对学生类用户，只能查看信息；而对于管理员类用户而言，可以管理所有的学生信息。VB对数据库的操作Visual Basic（简称VB）是一种可视化的、事件驱动型的Windows应用程序开发工具，它在GUI设计、绘图、制表、运算、通信和多媒体开发方面都具有简单易行、功能强大等优点，所以越来越受到开发人员的亲睐。同时，VB在数据库开发方面也具有Foxpro所远不能与的强大功能。VB能够读取和访问Access、Excel、DbaseX、Foxpr

12、o、Btrieve和ODBC等多种数据库，并能利用VB自身所带的数据库引擎创建Access数据库。所以VB在管理信息系统（MIS）的开发和建设方面得到了是益广泛的应用。2.1 ADO简介ActiveX Data Objects(ADO)是微软公司最新的数据访问技术。它被设计用来同新的数据访问层OLE DB Privider一起协同工作，一提供通用数据访问（Universal Data Access）。OLE DB是一个低层的数据访问接口，用它可以访问各种数据源，包括传统的关系型数据库，以与电子系统与自定义的商业对象。最重要的三个ADO对象是Connection、Recordset和Commen

13、t。每个Connection的属性定义了与数据源的连接。Recordset对象接收来自数据源的数据。Recordset 可以与Connection一起使用，先建立一个连接，然后获取数据。尽管如此，Recordset也可以被单独创建，其Connection参数可以在Open属性定义。2.2 ADO中Connection对象的属性Connection对象的属性如下表：属性名称属性类型和用途Attributes可读写Long类型，通过两个常数之和指定是否使用保留事务（retainning transactions）。常数AdXactCommitRetaning表示调用CommitTrans方法时启动

14、一个新事务：常数AdXactAbortRetanin表示调用RollbackTrans方法时启动一个新事务。默认值为0，表示不使用保留事务。CommandTimeout可读写Long类型，指定终止某个相关Command对象的Execute调用之前必须等待时间。默认值为30秒。ConnectionString可读写String类型，提供数据提供者或服务提供者打开到数据源的连接所需要的指定信息ConnectionTimeout可读写Long类型，指定终止一个失败的Connection.open方法调用之前必须等待的时间，默认值为15秒CursorLocation可读写Long类型，确定是使用客互端

15、游标引擎，还是使用服务器端游标引擎。默认值是AdUseServerDefaultDatabase可读写String类型，如果ConnectString中未指定数据库名称，就使用这里指定的名称，对SQL Server而言，默认值是pubsIsolationLevel可读写Long类型，指定和其他并发事务交互时的行为或事务。Provider可读写String类型，如果ConnectionString中未指定OLB DB数据或服务提供者的名称，就使用这时指定的名称。默认值是MSDASQLState可读写Long类型，指定连接是处于打开状态，还是处于关闭状态或中间状态。Version只读String类

16、型，返回ADO版本号表1 Connection对象的属性表2.3 ADO中Connection对象的方法方法名称用途Begintrans初始化一个事务；其后必须有committrans和/或rollbacktrans相呼应Close关闭连接Committrans提交一个事务，以完成对数据源的永久改变（要求使用之前必须调用了begintrans方法）ExecuteSelect sql语句返回一个forward-only recordset对象，也用来执行那些不返回recordset语句，如insertupdatedelete查询或ddl语句Open用来连接字符串来打开一个连接Openschema

17、返回一个recordset对象以提供数据源的结构信息（metadata）Rollbacktrans取消一个事务，恢复对数据源做的临时性改变（要求使用之前必须调用了begintrans方法）表2 Connection对象的方法表2.4 ADO中Connection对象的事件事件名称触发时机BeginTransCompleteBeginTrans方法执行以后CommitTransCompleteCommitTrans方法执行以后ConnectComplete成功建立到数据源的Connection之后DisconnectConnection关闭之后ExecuteComplete完成Connectio

18、n. Execute或Command. Execute之时InfoMessage一个Error对象被添加到ADODB.Connectuin.Error 集合之时RollbackTransCompeleteRollbackTrans方法执行之后WillConnect即将调用Connection.open方法之时WillExecute即将调用Connection.Execute或Command.Execute方法之时表3 Connection对象的方法表2.5 ADO中Connection对象的常数在ADO中Connection对象的常数包括IsolationLevel常数、Mode常数、Stat

19、e常数、Execut方法中lngOption参数用到的常数和ADODB事件处理子过程参数adStatus所用的常数。IsolationLevel常数的含义如下表：常数含义AdXactCursorStability只允许读其他事务已提交的改变AdXactBrowse允许读其他事务未提交的改变AdXactChaos本事务不会覆盖其他位于更高隔离程度的事务所做的改变AdXactIsolated所有事务相互独立AdXactReadCommitted只允许读其他事务已提交的改变AdXactReadUncommitted允许读其他事务未提交的改变AdXactSerializable本事务不会覆盖其他位于更

20、高隔离程度的事务所做的改变AdXactUnspecified不能确定提供者的事务隔离程度表4 IsolationLevel常数表Mode常数的含义如下表：常数含义AdModeUnknown未指定数据源的连接许可权（默认值）AdModeRead连接是只读的AdModeReadWrite连接是可读写的AdModeShareDenyNone不拒绝其他拥护的读写访问AdModeShareDenyRead拒绝其他拥护打开到数据源的读连接AdModeShareDenyWrite拒绝其他拥护打开到数据源的写连接AdModeShareExclusive以独占方式打开数据源AdModeWrite连接是只写的表5

21、 Mode常数表State常数的含义如下：常数含义AdStateClosedConnection是关闭的AdStateConnecting正在连接数据源的状态AdStateExecutingConnection或Command对象的Execute方法已被调用AdStateFetching返回行到Recordset对象AdStateOpenConnection是打开的表6 State常数表Execute方法中lngOption参数用到的常数含义见下表：常数含义AdCmdUnknown类型未定，由数据提供者去判断Command语法AdCmdFile是和对象类型相应的文件名称AdCmdStoredP

22、roc是存储过程名称AdCmdTable是能产生北部SELECT*FROM TableName查询的表名称AdCmdTableDirect是能直接从表中获取行容的表名称AdCmdText是一条SQL语句表7 Execute方法中lngOption参数的常数表ADODB事件处理子过程参数adStatus所用的常数的含义见下表：常数含义AdStatusCancel操作被用户取消AdStatusCnatDeny操作不能拒绝其他用户对数据源的访问AdStatusErrorsOccurred操作导致错误并已送到Errors集合中AdStatusOK操作成功AdStatusUnWantedEvent操作过

23、程中一个未预料到的时间被激活表8 ADODB事件处理子过程参数adStatus的常数表 系统设计过程3.1 系统设计3.1.1系统功能的分析系统开发的总体任务是实现学生信息管理的系统化、规化和自动化。系统功能分析是在系统开发的总体任务的基础上完成的。学生信息管理系统需要完成的功能主要有：有关学籍等信息的输入，包括输入学生基本信息、所在班级、所学课程和成绩等。学生信息的查询，包括学生基本信息、所在班级、已学课程和成绩等。学生信息的修改。班级管理信息的输入，包括输入班级设置、年级信息等。班级管理信息的查询。班级管理信息的修改。学校基本课程信息的输入。基本课程信息的修改。学生课程的设置和修改。学生成

24、绩信息的修改。学生成绩信息的查询。学生成绩信息的统计。3.1.2 系统功能模块设计对上述各项功能进行集中、分块，按照结构化程序设计的要求，得到下图所示的系统功能模块图。学生信息管理系统成绩信息管理课程信息管理班级信息管理学籍信息管理系统管理成绩信息查询成绩信息修改成绩信息添加年级课程设置课程信息修改课程信息添加班级信息修改班级信息添加学籍信息查询学籍信息修改学籍信息添加密码管理用户管理图1 系统功能模块图3.2 数据库设计数据库在一个信息管理系统中占有非常重要的地位，数据库结构设计的好坏将直接对应用系统的效率以与实现的效果产生影响。合理的数据库结构设计可以提高数据存储的效率，保证数据的完整和一

25、致。同时，合理的数据库结构也将有利于程序的实现。设计数据库系统时应该首先充分了解用户各个方面的需求，包括现有的以与将来可能增加的需求。 3.2.1 数据库需求分析用户的需求具体体现在各种信息的提供、保存、更新和查询，这就要求数据库结构能充分满足各种信息的输出和输入。收集基本数据、数据结构以与数据处理的流程，组成一份详细的数据字典，为后面的具体设计打下基础。数据流程图：学生注册基本信息输入班级设置学籍信息管理成绩信息输入班级管理班级课程设置课程基本信息班级课程管理图2 系统数据流程图数据项和数据结构：学生基本信息：包括的数据项有：学生学号、学生、性别、出生日期、班号、联系、入校日期、家庭住址、备

26、注等。班级信息：包括的数据项有：班号、所在班级、班主任、所在教室等。课程基本信息：包括的数据项有：课程号、课程名称、课程类别、课程描述等。课程设置信息：包括的数据项有：年级信息、所学课程等。学生基本信息：包括的数据项有：考试编号、所在班级、学生学号、学生、所学课程、考试分数等。3.2.2 数据库概念结构设计在得到数据项和数据结构以后，就可以设计出满足用户需求的各种实体，以与他们之间的关系，为逻辑设计打下基础。实体有：学生实体、班级实体、年级实体、课程实体。学生实体E-R图：学生学生基本信息学生班级信息学生课程信息学生成绩信息图3 学生实体E-R图班级实体E-R图：班级班号所在年级班主任所在教室

27、图4 班级实体E-R图课程实体E-R图：课程课程编号课程名称课程类别课程描述图5 课程实体E-R图年级实体E-R图：年级年级名称包括班级设置课程图6 年级实体E-R图实体和实体之间的关系E-R图：学生学生学生班级设置年级设置考核过程课程设置学生图7 实体之间的关系E-R图3.2.3数据库逻辑结构设计现在需要将上面的数据库概念结构转化为Assecc 2000数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。在上面的实体以与实体之间关系的基础上，形成数据库中的表以与各个表之间的关系。学生信息管理系统数据库中各个表格的设计结果如下所示：学生基本信息表（student_Info）:列名数据类型说

28、明Student_IDINT(4)学生学号（主键）Student_NameCHAR(10)学生Student_sexCHAR(2)学生性别Born_DateDATETIME(8)出生日期Class_noINT(4)班号Tele_NumberCHAR(10)联系Ru_DateCHAR(8)入校时间AddressVARCHAR(50)家庭住址CommentVARCHAR(200)注释表9 学生基本信息表班级信息表格：列名数据类型说明Class_NoINT(4)班号（主键）gradeCHAR(10)年级directorCHAR(10)班主任Classroom_NOCHAR(10)注释表10 班级基本

29、信息表课程基本信息表：列名数据类型说明Course_NoINT(4)课程编号（主键）Course_NameCHAR(10)课程名称Course_TypeCHAR(10)课程类型Course_DesCHAR(10)课程描述表11 课程基本信息表年级课程设置表：列名数据类型说明gradeCHAR(10)年级Course_NameCHAR(10)课程名称表12 年成设置表学生成绩信息表：列名数据类型说明Exam_NoCHAR(10)考试编号Student_IDINT(4)学生学号Student_NameCHAR(10)学生Class_NOINT(4)学生班号Course_NameCHAR(10)课程

30、名称resultFLOAT(8)分数表13 学生成绩信息表系统用户表：列名数据类型说明User_IDCHAR(10)用户名称（主键）User_PWDCHAR(10)用户密码User_DESCHAR(10)用户描述表14 系统用户表3.3 学生管理系统主窗体的创建 3.3.1 创建工程项目Student_MIS为了用Visual Basic创建应用程序，应当使用工程。一个工程是用来建造应用程序的文件的集合，它包括：跟踪所有部件的工程文件（.vbp）每个窗体的文件（.frm）每个窗体的二进制数据文件（.frx）,它含有窗体上控件的属性数据。对含有二进制属性的任何.frm文件都是不可编辑的，这些文件

31、都是自动产生的。每个类模块的一个文件(.cls)，该文件是可选项。每个标准模块的一个文件（.bas）,该文件是可选项。一个或多个包含ActiveX控件的文件(.ocx), 该文件是可选项。单个资源文件(.res), 该文件是可选项。启动Visual Basic后，单击File/New Project菜单，在工程模板中选择Standard EXE, Visual Basic将自动产生一个Form窗体，属性都为缺省设置。删除窗体，单击File/Save Project菜单，将工程项目命名为Student_MIS。3.3.创建学生信息管理系统的主窗体Visual Basic创建的应用程序可以是SDI

32、（单文档界面）和MDI（多文档界面）。在SDI的程序中，每个窗体之间是独立的。而MDI的程序中，有一个窗体是主窗体，可以包含其他窗体，它的类型是MDI Form。本系统采用多文档界面，这样可以使程序更加美观、整齐有序。图8 学生信息管理系统主窗体单击工具栏中的“ADD MDI Form”按钮，生成一个窗体，属性设置如表。主窗体与其控件属性设置：控件属性属性取值FrmMain(Form)NameFrmMainCaption学生信息管理系统StartUpPositonCenterScreenWindowsStateMaximizedSbStatusaBar(statusBar)NameSbStat

33、usBar表15 主窗体与其属性表在主窗体中加入状态栏控件，可以实时反映系统中的各个状态的变化。状态栏控件需要在通常的属性窗口中设置一般属性，还需要在其特有的弹出式菜单中进行设置。选中状态栏控件，单击鼠标右键，选中Property菜单，在“General”属性页对一般属性进行设置，在“Panels”属性页对各个文本框进行设置，在“Font”属性页对文本字体进行设置，在“Picture”属性页可以添加图片。单击Insert Panel按钮，为状态栏添加3个面板，设置属性如下表：面板属性属性取值1styleSbrText2styleSbrDate3styleSbrTime表16 主窗体中面板属性设

34、置表面板1用来显示各种文本信息，面板2用来显示当前日期，面板3用来显示当前时间。3.3.3创建主窗体的菜单在主窗体中，单击鼠标右键，选择弹出式菜单中的“Menu Editor”命令，创建菜单结系统添加用户修改密码推出系统学籍管理添加学籍信息修改学籍信息查询学籍信息班级管理添加班级信息修改班级信息课程设置添加课程信息修改课程信息设置年级课程成绩管理添加成绩信息修改成绩信息查询成绩信息帮助使用说明构如下表：图9 主窗体菜单结构表3.3.4 创建公用模块在Visual Basic中可以用公用模块来存放整个工程项目公用的函数、全局变量等。整个工程项目中的任何地方都可以调用公用模块中的函数、变量，这样可

35、以极提高代码的效率。在项目资源管理器中为项目添加一个Module，保存为Module1.bas。下面就可以开始添加需要的代码了。由于系统中各个功能模块都将频繁使用数据库中的各种数据，因此需要一个公共的数据操作函数，用以执行各种SQL语句。添加函数ExecuteSQL。ExecuteSQL函数有两个参数：SQL和MsgString。其中SQL用来存放需要执行的SQL语句，MsgString用来返回执行的提示信息。函数执行时，首先判断SQL语句中包含的容：当执行查询操作时，ExecuteSQL函数将返回一个与函数同名的记录集对象（Recordset），所有满足条件的记录包含在对象中；当执行如删除、

36、更新、添加等操作时，不返回记录集对象。在ExecuteSQL函数中使用了Connect String函数，这个函数用来连接数据库。由于在后面的程序中，需要频繁检查各种文本框的容是否为空，这里定义了Txsttxt函数。如果文本框容为空时，函数将返回True,否则将返回False。由于学生信息管理系统启动后，需要对用户进行判断。如果登录者是授权用户，将进入系统，否则将停止程序的执行，这个判断需要在系统运行的最初进行，因此将代码放在公用模块中。系统需要知道登录用户的信息，定义全局变量UserName: Public UserName As String3.4 系统用户管理模块的创建系统用户管理模块主

37、要实现：用户登录。添加用户。修改用户密码。3.4.1 用户登录窗体的创建系统启动后，将首先出现用户登录窗体，用户首先输入用户名，然后输入密码。如果用户3次输入密码错误，将退出程序。图10 学生信息管理系统登录窗体用户登录窗体中放置了三个文本框（Textbox），用来输入用户名、密码和用户类型；两个按钮（CommandButton）用来确定或取消登录；四个标签（Label）用来标示窗体的信息。属性见下表：控件属性属性取值FrmLogin(form)NamefrmLoginCaption登录StartUpPositonCenterSreenWindowStateNoMaltxtUserNameNa

38、meTxtUserNametxtPasswordNameTxtpasswordPasswordChar*txtUserSxNameTxtUserSxcmdOKNamecmdOKCaption确定cmdCancelNamecmdCanelCaption取消Lable1Caption学生信息管理系统Lable2Caption用户名Lable3Caption用户密码Lable4Caption用户类型表17 用户登录窗体中控件与其属性设置表文本框TxtPassword的PasswordChar属性是用指定字符来掩盖用户输入的密码。为窗体定义全局变量OK，用来判断登录是否成功；定义MiCount，用来记

39、载输入密码的次数。并且在载入窗体时初始化这两个全局变量。Option Explicit是用来规定所有变量使用前必须定义。这样可以避免由于输入错误而产生的新变量。当用户输入完用户名、用户密码和用户属性，单击CmdOK按钮将对用户输入信息进行判断。用户单击该按钮，将触发按钮cmdOK的Click事件。用户如果没有输入用户名、用户密码和用户属性，将出现消息框给予提示。如果输入的用户名在用户表格中没有找到，将提示重新输入用户名（默认的用户名和密码是aa），文本框TxtUserName，将重新获得输入焦点。如果用户输入的密码不正确，文本框TxtPassword将重新获得输入焦点。用户登录成功，全局变量O

40、K将被赋值为False。公用模块中的Main过程将根据OK的值决定是退出，或者进入管理员主模块，或者进入学生主模块。如果用户取消登录，单击“取消”按钮，将触发按钮的Click事件，代码如下： OK = False Me.HideMe是Visual Basic中常用的对象，用来指代当前对象本身。3.4.2 添加用户窗体的创建进入管理员主模块后，选择菜单“系统|添加用户”就可以添加用户，出现添加用户窗体。图11 添加用户窗体在添加用户窗体中放置了三个文本框，用来输入用户名和密码；两个按牛用来确定是否添加用户；三个标签用来标示文本框的提示。这些控件的属性见下表：控件属性属性取值FrmAdduser(

41、rorm)NameFrmAdduserCaption添加用户StartUpPositonCenterScreenwindowStateNomaltxtUserNameNameTxtUserNameTxtPassword1NameTxtpassword1PasswordChar*TxtPassword2NameTxtPassword2PasswordChar*cmdOKNamecmdOKCaption确定cmdCanelNamecmdCanelCaption取消Lable1Caption请输入用户名Lable2Caption请输入密码Lable3Caption请确认密码表18 添加用户窗体控件与

42、其属性设置表用户需要两次输入密码，用来确保输入密码的正确。用户输入信息完毕，单击“确定”按钮将触发Click事件。一旦输入完毕，系统将首先查询数据库中与新建用户名一样的记录，如果有一样记录将提示用户重新输入用户名。当确定数据库中没有一样的用户名，并且两次输入密码一致时，将把该条记录添加到数据库中。单击“取消”按钮将取消添加用户的操作。3.4.3 修改用户密码窗体的创建用户可以修改自己的密码，选择菜单“系统|修改密码”，出现“修改密码”窗体。图12 用户修改密码窗体在修改密码窗体中，放置了两个文本框，用来输入密码和确认密码；两个按钮用来确定是否修改密码；两个标签用来标示文本框的容。控件属性如下表

43、：控件属性属性取值FrmModifyuserinfo(Form)NamefrmModifyuserinfoCaption修改密码StartUpPositonCenterScreenWindowStateNomalTxtPassword1NameTxtPassword1PasswordChar*TxtPassword2NameTxtPassword2PasswordChar*CmdOKNameCmdOKCaption确定CmdCanelNamecmdCanelCaption取消Lable1Caption请输入密码Lable2Caption请确认密码表19 用户修改密码控件与其属性设置表两次输入密

44、码后，单击“确认”按牛，将触发Click事件判断是否修改密码。当两次输入密码一致时，数据库中的记录将更新。3.5 学籍管理模块的创建学籍信息管理模块主要实现以下功能：添加学籍信息修改学籍信息查询学籍信息 3.5.1 添加学籍信息窗体的创建选择“学籍管理|添加学籍信息”菜单，将出现“添加学籍信息”窗体。图13 添加学籍信息窗体在窗体上放置了多个文本框和下拉式文本框，用来输入学籍信息；两个按钮用来确定是否添加学籍信息；多个标签用来提示文本框需要输入的容。属性见下表：控件属性属性取值FrmAddsinfo(Form)NameFrmsinfoCaption添加学籍信息MDIChildtrueTxtSI

45、DNameTxtSIDTxtNameNameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdOKNameCmdOKCaption确定添加CmdcanelNameCmdCan

46、elCaption取消添加Lable1Caption学号Lable2CaptionLable3Caption性别Lable4Caption出生日期Lable5Caption班号Lable6Caption联系Lable7Caption入校日期Lable8Caption家庭住址Lable9Caption备注表20 添加学籍信息窗体控件与其属性设置表在载入窗体时，程序将自动在两个下拉式文本框中添加容，这样可以规化输入容。在班号选择的下拉式文本框中，将出现所有班级，用户不用输入容。用户输入容完毕后，单击cmdOK按钮将触发Click事件。程序首先对是否输入容进行判断，然后进行格式判断，使用了下面两个函

47、数：判断数据是否日期格式IsDate(txtBorndate.text)判断数据是否日期格式IsDate(txtRudate.text)判断是否有重复记录是很重要的，否则数据库中将发生错误。单击按钮cmdCanel取消添加学籍信息。3.5.2 修改学籍信息窗体的创建选择“学籍管理|修改学籍信息”菜单，将出现“修改学籍信息”窗体。图14 修改学籍信息窗体这个窗体在“添加学籍信息”窗体的基础上添加了两排按钮，所有控件的属性见下表：控件属性属性取值FrmAddsinfo(Form)NameFrmsinfoCaption添加学籍信息MDIChildtrueTxtSIDNameTxtSIDTxtName

48、NameTxtNameTxtBorndateNameTxtBorndateTxtTelNameTxtTelTxtRudateNameTxeRudateTxtAddressNametxtAddressScrollbarsVerticalMultilineTrueTxtCommentNameTxtCommentScrollbarsVerticalMultilinetrueComboGenderNamecomboGenderComboClassNoNameComboClassNoCmdFirstNameCmdOKCaption第一条记录CmdPreviousNameCmdPreviousCaptio

49、n上一条记录cmdNextNamecmdNextcaption下一条记录CmdLastNamecmdLastcaption最后一条记录CmdEditNameCmdEditCaption修改记录cmdUpdateNameCmdUpdatecaption更新记录CmdcanelNameCmdCanelCaption取消修改记录cmdDeleteNameCmdDeleteCaption删除记录Frame1Caption查看学籍信息Frame2caption修改学籍信息Lable1Caption学号Lable2CaptionLable3Caption性别Lable4Caption出生日期Lable5C

50、aption班号Lable6Caption联系Lable7Caption入校日期Lable8Caption家庭住址Lable9Caption备注表21 修改学籍信息窗体控件与其属性设置表第一排按钮用来方便的浏览数据库中各条记录，第二排按牛用来修改记录。由于记录集为整个窗体公用，需要将记录集对象定义为全局变量。程序在窗体载入时自动加入各条记录。由于程序中各处需要显示数据，定义函数viewDate。单击“第一条记录”按钮，将显示第一条记录。单击“最后一条记录”按钮，将显示最后一条记录。单击“上一条记录”按钮，将显示上一条记录。单击“下一条记录”按钮，将显示下一条记录。单击“修改记录”按钮，将进入修

51、改状态，各个文本框将都有效。此时，移动记录按钮将失效，可以避免误操作。修改完毕后，单击“更新记录”按钮，将触发Click事件。单击“取消修改记录”按钮时，将取消所作的修改。单击“删除记录”按钮时，将删除当前记录。3.5.3 查询学籍信息窗体的创建选择“学籍管理|查询学籍信息”菜单，将出现“查询学籍信息”菜单。图15 查询学籍信息窗体在这里可以按照各种方式以与他们的组合进行查询。查询学籍信息窗体包括的控件与其属性设置见下表：控件属性属性取值FrmInquiresinfo(Form)NamefrmInquiresinfoCaption查询学籍信息MDIChildTrueCheck1Caption按

52、学号Check2Caption按Check3Caption按班号CmdInquireNameCmdInquireCaption查询CmdExitNameCmdExitCaption退出查询MyFlexgrit(MSHFlexgrid)nameMyFlexgrid表22 查询学籍信息窗体与其控件属性设置表在窗体中添加了一个表格控件（MSHFlexgrid）,用来显示查询后得到的结果。首先选择查询方式，然后输入查询容。单击“查询”按钮，触发Click事件进行查询。程序首先判断查询方式，如果没有设置查询方式将提示；然后对查询容进行组合，组成SQL语句，进行查询。查询到数据集以后，需要正常显示在表格控

53、件中。运用循环将每一条记录的每一个字段显示出来。单击“退出查询”按钮，将退出查询。3.6 班级管理模块的创建班级管理模块主要实现如下功能：添加班级信息修改班级信息3.6.1 添加班级信息窗体的创建选择“班级管理|添加班级信息”菜单，将出现“添加班级信息”菜单。图16 添加班级信息窗体窗体中各个属性见下表：控件属性属性取值FrmAddclassinfo(Roem)NameFrmAddclassinfoCaption添加班级信息MDIChildTrueTxtClassnoNameTxtClassnoComboGradeNameComboGradeTxtDirectorNameTxtDirector

54、txtClassroomNameTxtClassroomCommand1NameCommand1Caption确定添加Lable1Caption班号Command2NameCommand2Caption退出添加Lable2Caption年级Lable3Caption班主任Lable4Caption教室表23 添加班级信息窗体控件与其属性设置表输入完容，单击“确定添加”按钮，触发Click事件，添加容到数据库。添加记录到数据库以前，需要判断输入容是否为空，格式是否满足需要。然后判断是否为重复记录，最后将满足要求的记录添加到数据库。单击“退出添加”按钮，将退出程序。3.6.2 修改班级信息窗体的创

55、建选择“班级管理|修改班级信息”菜单，将出现“修改班级信息”窗体。图17 修改班级信息窗体窗体中的控件与其属性详表21。窗体中“查看班级信息”中的按钮，可以浏览数据库中的各条记录。“修改班级信息”框架中的按钮用来修改记录。3.7 课程设置模块的创建课程设置模块主要实现如下功能：添加课程信息修改课程设置设置年级课程 3.7.1 添加课程信息窗体的创建选择“课程设置|添加课程信息”菜单，将出现“添加课程设置”窗体。图18 添加课程信息窗体窗体中的各个控件的属性设置见下表：控件属性属性取值FrmAddcourseinfo(Form)NamefrmaddcourseinfoCaption添加课程信息M

56、DIChildTrueTxtCoursenoNameTxtcoursenoTxtCoursenameNameTxtcoursenameComboCoursetypenameCombocoursetypeTxtcoursedesNameTxtcoursedesCommand1NameCommand1Caption确定添加Command2NameCommand2Caption退出添加Lable1Caption课程编号Lable2Caption课程名称Lable3Caption课程类型Lable4Caption课程描述表24 添加课程信息窗体控件与其属性设置表单击“确认添加”按钮，触发Click事件

57、并添加记录到数据库。单击“取消添加”按钮，将退出程序。3.7.2 修改课程信息窗体的创建选择“课程设置|修改课程信息”菜单，将出现“修改课程信息”窗体。图19 修改课程信息窗体窗体中各个控件与其属性详见表21。“查看课程信息”框架中的4个按钮用来移动的数据集中记录的位置，“修改课程信息”框架中的4个按钮用来修改数据集中的记录。3.7.3 设置年级课程窗体的创建选择“课程设置|设置年级课程”，将出现“设置年级课程”窗体。图20 设置年级课程窗体窗体中各个控件的属性设置见下表：控件属性属性取值Frmsetcourseinfo(Form)NameFrmsetcourseinfoCaption设置年级

58、课程MDIChildTrueCombogradeNameCombogradeListallcourse(listbox)NameListallcourselistselectcourse(listbox)NameListselectcourseCmdSetNameCmdsetCaption设置课程CmdModifyNameCmdModifyCaption确认设置CmdAddNameCmdAddCaption-CmdDeleteNameCmdDeleteCaption-Lable1Caption选择年级Lable2Caption所有课程Lable3Caption已经选择课程表25 设置年级课程窗

59、体中控件与其属性设置表程序开始执行时，选择年级，将在“已经选择课程”列表框中显示容。单击“年级”下拉式文本框，将触发Click事件，显示所选择年级的课程。程序根据选择的年级查询获得相应的信息，并显示在列表框中。单击“设置课程”按钮，将进入设置状态，“所有课程”列表框中将显示所有课程。单击“添加”和“删除”按钮，可以添加和删除课程。列表框中的LisIndex属性用来指示当前选择项，-1说明没有被选中的数据项。单击“确认设置”按钮，将课程设置数据保存到数据库中。单击“退出课程设置”按钮，将退出程序。3.8 成绩管理模块的创建成绩管理模块主要实现如下功能：添加成绩信息修改成绩信息查询成绩信息 3.8

60、.1 添加成绩信息窗体的创建选择“成绩管理|添加成绩信息”菜单，将出现“添加成绩信息”窗口。图21 添加成绩信息窗体“添加成绩信息”窗体中控件的属性设置见下表：控件属性属性取值FrmAddresult(Form)NameFrmAddresultCaption添加成绩信息MDIChildTrueComboExamtypeNameComboExamtypeComboClassnoNameComboClassnoComboCourseNameComboCourseTxtResultNameTxtResultComboSIDNameComboSIDTxtNameNameTxtNameCmdOKName