实例学生信息管理系统课件.ppt

1、 学生信息管理系统学生信息管理系统目目 录录n系统设计系统设计n数据库设计数据库设计n系统主窗体的创建系统主窗体的创建n院系设置模块院系设置模块n班级管理模块班级管理模块n学生管理模块学生管理模块n学生信息查询模块学生信息查询模块n学籍变更管理模块学籍变更管理模块n奖励、处罚管理模块奖励、处罚管理模块n系统的编译和发行系统的编译和发行n小结与提高小结与提高1系统设计在数据库系统开发的前期，一般要对系统的开发目的、使用对象、实现的功能等进行详细的分析，确定系统的开发方案。n系统功能分析n系统功能模块设计n操作流程图1 系统设计n开发目的：开发目的：学生信息管理系统的开发目的是管理全校学生的各种信

2、学生信息管理系统的开发目的是管理全校学生的各种信息，方便学生信息的查询。系统的使用对象是学生管理息，方便学生信息的查询。系统的使用对象是学生管理部门，如学生处工作人员、校院系领导、班主任、教师部门，如学生处工作人员、校院系领导、班主任、教师等。本章所开发的系统的主要使用对象是学生处。等。本章所开发的系统的主要使用对象是学生处。n主要功能：主要功能：学生基本信息的录入，包括：学号、姓名、性别、班学生基本信息的录入，包括：学号、姓名、性别、班级、出生日期、籍贯等；级、出生日期、籍贯等；学生基本信息的修改维护；学生基本信息的修改维护；学生学籍变动情况的记录，包括：休学、复学、转系、学生学籍变动情况的

3、记录，包括：休学、复学、转系、结业、毕业等；结业、毕业等；学生奖惩情况的记录和修改，包括：奖励和处罚；学生奖惩情况的记录和修改，包括：奖励和处罚；学生信息的查询；学生信息的查询；院系设置管理，包括院系的添加、修改和删除等；院系设置管理，包括院系的添加、修改和删除等；班级设置管理，包括班级的添加、修改和删除等。班级设置管理，包括班级的添加、修改和删除等。1 系统设计根据系统所要实现的功能，按照结构化程序设计的原则，可以将整个系统划分为若干个功能模块。学生信息管理系统学生基本信息管理教务管理学生信息查询学籍变更管理奖励管理处罚管理院系设置院系、班级管理班级管理1 系统设计通过操作流程分析，不但可以

4、具体化系统的功能模块的组成，还可以明确系统中的数据流程，明确系统中所要保存的数据以及数据间的关系，为下一步的数据库设计打好基础。本书中采用以下的符号表示操作流程。操作数据存储数据流向数据输出1 系统设计大家对学生大家对学生信息管理是比较熟信息管理是比较熟悉的，因此不难画悉的，因此不难画出右图所示的学生出右图所示的学生信息管理操作流程信息管理操作流程图。需要说明的是图。需要说明的是各所学校的实际情各所学校的实际情况可能有所不同，况可能有所不同，同学们可以根据自同学们可以根据自己学校的实际情况己学校的实际情况画出符合本校特点画出符合本校特点的操作流程图。的操作流程图。学生基本信息班级信息院系信息学

5、籍变更信息奖励信息处罚信息查询结果录入/修改/删除添加/维护添加/维护记录/管理记录/管理记录/管理提取提取提取提取奖励学籍变更班级管理信息维护院系管理处罚信息查询提取提取2 数据库设计 数据库是信息管理系统的基础，在系统中占有重数据库是信息管理系统的基础，在系统中占有重要的地位，数据库结构是否合理直接关系到系统功能要的地位，数据库结构是否合理直接关系到系统功能的实现和运行的效率。合理的数据库结构设计可以提的实现和运行的效率。合理的数据库结构设计可以提高数据存储的效率，保证数据的完整性和一致性，也高数据存储的效率，保证数据的完整性和一致性，也有利于系统的编程实现。有利于系统的编程实现。数据库系

6、统设计一般包括如下几个步骤：n需求分析；n概念结构设计；n逻辑结构设计；n物理结构设计；n应用程序设计及调试；n性能测试与确认。2 数据库设计需求分析是整个数据库设计过程中最重要的步骤之一，是后继各需求分析是整个数据库设计过程中最重要的步骤之一，是后继各阶段的基础。在需求分析阶段，需要从多方面对整个系统进行调查，收阶段的基础。在需求分析阶段，需要从多方面对整个系统进行调查，收集和分析系统对信息和处理两个方面的需求。集和分析系统对信息和处理两个方面的需求。收集资料是数据库设计人员和用户共同完成的。必须强调用户的收集资料是数据库设计人员和用户共同完成的。必须强调用户的参与，这是数据库应用系统设计的

7、特点。收集资料的目的是明确用户的参与，这是数据库应用系统设计的特点。收集资料的目的是明确用户的需求。用户的需求主要包括第三个方面：需求。用户的需求主要包括第三个方面：，用户要从数据库获取的内容；，用户要从数据库获取的内容；，即完成什么处理功能以及采用何种处理方式；，即完成什么处理功能以及采用何种处理方式；。2 数据库设计分析的过程是对所收集的数据进行抽象的过程。抽象是对实际事物或事件分析的过程是对所收集的数据进行抽象的过程。抽象是对实际事物或事件的人为处理，抽取共同的本质特征，忽略细微末节，并用各种概念进行精确描的人为处理，抽取共同的本质特征，忽略细微末节，并用各种概念进行精确描述，这些概念组

8、成某种数据模型。在上节对学生信息管理系统操作流程分析的述，这些概念组成某种数据模型。在上节对学生信息管理系统操作流程分析的基础上，可以列出以下学生信息管理系统所需的数据项和数据结构：基础上，可以列出以下学生信息管理系统所需的数据项和数据结构：院系编号、院系名称、院系描述、院系领导、领导联系方：院系编号、院系名称、院系描述、院系领导、领导联系方式等；式等；：班级编号、班级名称、班级创建时间、班级描述、所属院系、：班级编号、班级名称、班级创建时间、班级描述、所属院系、班主任、班主任联系方式等；班主任、班主任联系方式等；：学号、姓名、性别、出生日期、籍贯、所属班级等；：学号、姓名、性别、出生日期、籍

9、贯、所属班级等；：记录号、学号、变更类别、记录时间、详细描述等；：记录号、学号、变更类别、记录时间、详细描述等；：记录号、学号、奖励类别、记录时间、详细描述等；：记录号、学号、奖励类别、记录时间、详细描述等；：记录号、学号、处罚类别、记录时间、详细描述等。：记录号、学号、处罚类别、记录时间、详细描述等。2 数据库设计E-RE-R模型（模型（Entity-Relationship ModuleEntity-Relationship Module）简称简称E-RE-R图，是描述概图，是描述概念世界，建立概念模型的实用工具。数据库设计工作比较复杂，将现实念世界，建立概念模型的实用工具。数据库设计工作

10、比较复杂，将现实世界的数据组织成符合具体数据库管理系统所采用的数据模型一般情况世界的数据组织成符合具体数据库管理系统所采用的数据模型一般情况下不可能一次到位，下不可能一次到位，P.P.S.ChenP.P.S.Chen于于19761976年提出形象的实体年提出形象的实体-联系方法。联系方法。通过绘制通过绘制E-RE-R图，可以描述组织模式，并可以进一步转化为任何一种图，可以描述组织模式，并可以进一步转化为任何一种DBMSDBMS所支持的数据模型。所支持的数据模型。E-RE-R图有三要素：图有三要素：用矩形框表示，框内标注实体名称；：用矩形框表示，框内标注实体名称；：用圆角矩形表示，并用连线与实体

11、连接起来，表示实体：用圆角矩形表示，并用连线与实体连接起来，表示实体的有关属性；的有关属性；：用菱形框表示，框内注明联系名称，并用连线：用菱形框表示，框内注明联系名称，并用连线将菱形框与有关实体连接，在连线上注明联系的类型。将菱形框与有关实体连接，在连线上注明联系的类型。2数据库设计在关系复杂在关系复杂的数据库系统的的数据库系统的设计中，设计中，E-RE-R图的图的设计包括局部设计包括局部E-RE-R图设计、综合图设计、综合E-RE-R图设计、图设计、E-RE-R图优图优化等步骤。学生化等步骤。学生信息管理系统的信息管理系统的功能比较简单，功能比较简单，其其E-RE-R图如右图所图如右图所示。

12、示。学籍变更记录奖励记录学生班级处罚记录院系从属奖励变更处罚从属1nnnnn1111班级编号班级名称所属院系.院系编号院系名称院系描述.记录号学号.学号姓名性别出生日期班级.记录号学号.记录号学号.2 数据库设计概念结构设计的结果得到一个与计算机、软硬件的具体性能无关概念结构设计的结果得到一个与计算机、软硬件的具体性能无关的全局概念模式。数据库逻辑设计的任务是将概念结构转换成特定的全局概念模式。数据库逻辑设计的任务是将概念结构转换成特定DBMSDBMS所支持的数据库模型。从所支持的数据库模型。从E-RE-R图所表示的概念模型可以转换成任何一种图所表示的概念模型可以转换成任何一种具体具体DBMS

13、DBMS所支持的数据模型。本系统采用关系模型，转换的原则是：所支持的数据模型。本系统采用关系模型，转换的原则是：每个实体转化成一个关系模式（即数据表），实体的属性就是每个实体转化成一个关系模式（即数据表），实体的属性就是关系的属性，实体的关键字就是关系的关键字；关系的属性，实体的关键字就是关系的关键字；每个每个1 1：1 1的联系转换成一个关系模式。每个实体的关键字都是的联系转换成一个关系模式。每个实体的关键字都是该关系模式的候选关键字；该关系模式的候选关键字；每个每个1 1：n n的联系转换成一个关系模式。多方的实体的关键字是的联系转换成一个关系模式。多方的实体的关键字是该关系模式的关键字；

14、该关系模式的关键字；每个每个m m：n n的联系转换成一个关系模式。联系中各实体关键字的的联系转换成一个关系模式。联系中各实体关键字的组合组成该关系模式的组合关键字；组合组成该关系模式的组合关键字；具有相同关键字的关系可以合并具有相同关键字的关系可以合并。2 数据库设计在进行完概念结构的转化以后，还需要进行规范化处理，通过在进行完概念结构的转化以后，还需要进行规范化处理，通过模式合并和模式分解，优化数据逻辑结构，使数据库既能有效减少冗余模式合并和模式分解，优化数据逻辑结构，使数据库既能有效减少冗余信息，又能提高数据库的查询、操纵性能。信息，又能提高数据库的查询、操纵性能。根据学生信息管理系统的

15、根据学生信息管理系统的E-R图，通过简单的优化，可以设计图，通过简单的优化，可以设计6个关系模式（即数据表）来存储所有的信息。为了操作的简便，系统中个关系模式（即数据表）来存储所有的信息。为了操作的简便，系统中DBMS选用选用Access 2000。6个数据表的结构如表所示。个数据表的结构如表所示。2 数据库设计表1 院系设置信息表（Department）字段名 数据类型(长度)必添字段说 明DepartID文本（2）是院系编号（主关键字）DepartName文本（20）是院系名称DepartHead文本（8）否院系领导Telephone文本（13）否领导联系电话Description备注否院

16、系描述2 数据库设计表2 班级设置信息表（Class）字段名 数据类型(长度)必添字段说 明ClassID文本（6）是班级编号（主关键字）ClassName文本（20）是班级名称DepartID文本（2）是所属院系（外关键字）BeginDate短日期是班级创建日期Master文本（8）否班主任MasterTel文本（13）否班主任联系电话Description备注否班级描述2 数据库设计表3 学生基本信息表（Student）字段名 数据类型(长度)必添字段说 明StudentID文本（8）是学号（主关键字）Name文本（8）是姓名Sex文本（2）是性别ClassID文本（6）是班级编号Birt

17、hday短日期否出生日期Native文本（16）否籍贯2 数据库设计表4 学籍变更记录表（Change）字段名 数据类型(长度)必添字段说 明CID自动编号是记录号（主关键字）StudentID文本（8）是学号Change文本（4）是学籍变更类型RecDate短日期是记录日期Description备注否说明2 数据库设计表5 奖励记录表（Reward）字段名 数据类型(长度)必添字段说 明RID自动编号是记录号（主关键字）StudentID文本（8）是学号Reward文本（20）是奖励类型RecDate短日期是记录日期Description备注否奖励具体说明2 数据库设计表6 处罚记录表（Pu

18、nish）字段名 数据类型(长度)必添字段说 明PID自动编号是记录号（主关键字）StudentID文本（8）是学号Punish文本（8）是处罚类型RecDate短日期是记录日期Description备注否处罚具体说明2 数据库设计数据库逻辑结构设计完成以后，就可以在DBMS上创建数据库和数据表了。一般情况下可以根据DBMS的SQL语法建立相应的SQL语句，相对于直接操作建立数据库而言，通过SQL创建数据库的好处是便于数据库的重复创建。2 数据库设计在某些数据库系统的开发中，需要录入一些初在某些数据库系统的开发中，需要录入一些初始据。在完成数据库的创建以后，便可以在始据。在完成数据库的创建以后

19、，便可以在DBMSDBMS中中录入初始数据。本章的数据库中不需要初始数据。录入初始数据。本章的数据库中不需要初始数据。数据库创建完毕以后，还需要对数据库的性能数据库创建完毕以后，还需要对数据库的性能进行一些测试，以确保数据库设计的合理性，避免进行一些测试，以确保数据库设计的合理性，避免在系统软件开发过程中发现数据库不合理而修改数在系统软件开发过程中发现数据库不合理而修改数据库。据库。3 系统主窗体的创建 数据设计完成后，下一步的工作就是使用某种程序开发语言实现系统的具体功能，本系统采用的语言为微软公司的中文版Visual Basic 6.0程序开发语言。本节内容包括如下几个方面：n创建工程文件

20、；n主窗体的设计；n主菜单设计；n部分程序的实现。3 系统主窗体的创建 启动Visual Basic 6.0，直接单击【打开】按钮，Visual Basic创建工程文件，并自动产生一个窗体文件。根据Visual Basic配置的不同，有时会出现不同的运行界面，系统会直接创建新的工程文件。3 系统主窗体的创建 为了构造便于用户操作的程序界面，需要在工程中添加相应的部件。单击【工程】【部件】菜单项，打开“部件”对话框，在“控件”选项卡的列表框中将下面所列控件前面的方框勾选，然后单击“确定”按钮。相应的控件就会被添加到工具箱上。本程序需要添加如下几个部件：Microsoft Data Bound G

21、rid Control 5.0(SP3)Microsoft Tabbed Dialog Control 6.0 Microsoft Windows Common Controls-2 6.0 3 系统主窗体的创建在设计复杂的应用程序时，为了方便用户的操作，往往要考虑系统的界面框架结构，打开主窗体（文件名为FormMain），设置窗体的有关属性。属性名属性值说 明名称frmMain主窗体的名称Caption学生信息管理系统主窗体标题BackColor&H8000000C&主窗体背景颜色WindowState 2-Maximized主窗体启动后最大化3 系统主窗体的创建单击单击【工具工具】【菜单编

22、辑器菜单编辑器】菜单项，打开菜单编辑器设计窗体的主菜单项，打开菜单编辑器设计窗体的主菜单。为每个菜单项取一个比较有意义的名称。菜单。为每个菜单项取一个比较有意义的名称。在系统开发时，应该养成良好的命名习惯。在系统开发时，应该养成良好的命名习惯。推荐使用驼峰式格式，即每推荐使用驼峰式格式，即每个标识符开头字母要大写，内嵌单词的首字母也要大写，其他字母用小写。个标识符开头字母要大写，内嵌单词的首字母也要大写，其他字母用小写。在给控件命名时，每个控件名称前面加上该控件的缩写，一般取在给控件命名时，每个控件名称前面加上该控件的缩写，一般取2424个字母，个字母，采用小写，缩写时取控件名的主要辅音，以元

23、音开头的控件可以取第一个元采用小写，缩写时取控件名的主要辅音，以元音开头的控件可以取第一个元音字母。音字母。菜单项结构菜单项名称说 明系统维护(&S)mntSystem一级菜单（mnt是MenuItem的缩写）院系设置(&D)mntSysDepart二级菜单项班级管理(&C)mntSysClass二级菜单项-mntSysSP二级菜单项，分隔线退出系统(&Q)mntSysQuit二级菜单项学生管理(&t)mntStudent一级菜单学生管理(&M)mntStuManage二级菜单项-mntStuSP二级菜单项，分隔线学生信息查询(&Q)mntStuQuery二级菜单项教务管理(&E)mntEdu

24、Admin一级菜单学籍变更(&C)mntEduChange二级菜单项奖励情况(&R)mntEduReward二级菜单项处罚情况(&P)mntEduPunish二级菜单项3 系统主窗体的创建先实现退出功能。单击主窗体的“退出系统”菜单项，系统自动生成相应事件过程框架，并切换到代码窗口，添加退出过程代码如下：Private Sub mntSysQuit_Click()EndEnd Sub主窗体中其它菜单项功能的实现在后面介绍。4 院系设置模块 院系设置模块是学生信息管理系统的辅助功能模块，实现院系添加、删除以及院系信息浏览、修改等功能。本节内容包括如下几个方面：n模块功能分析；n窗体的创建；n模块

25、用户界面的设计；n模块功能的实现。4 院系设置模块n实现思路实现思路在窗体上添加控件和数据控件，将其它控件与数据控件绑定，就在窗体上添加控件和数据控件，将其它控件与数据控件绑定，就可以实现院系数据的显示和浏览。为了便于用户直观浏览院系设置信可以实现院系数据的显示和浏览。为了便于用户直观浏览院系设置信息，本系统采用数据表格的形式显示数据。数据的添加、删除、修改息，本系统采用数据表格的形式显示数据。数据的添加、删除、修改可以通过数据控件和数据绑定控件来实现。可以通过数据控件和数据绑定控件来实现。为了验证数据的有效性，为了验证数据的有效性，保持数据库的完整性，在添加、删除、保持数据库的完整性，在添加

26、、删除、修改数据时必须对数据进行验证，修改数据时必须对数据进行验证，可以在窗体上再添加一个数据控件，可以在窗体上再添加一个数据控件，通过它查询相关数据表来验证数据。通过它查询相关数据表来验证数据。在添加记录时，通过字段内容检验来实现域值和非空字段验证，在添加记录时，通过字段内容检验来实现域值和非空字段验证，通过对新添加的院系编号的查询，验证院系编号的唯一性（记录层验通过对新添加的院系编号的查询，验证院系编号的唯一性（记录层验证）。证）。在删除记录时，通过查询是否有属于该院系的班级来确保数据的在删除记录时，通过查询是否有属于该院系的班级来确保数据的完整性。完整性。4 院系设置模块n实现步骤添加、

27、保存窗体，设置窗体属性；添加控件，设置控件属性，构造窗体界面；编写代码，实现相应功能；和主窗体连接，测试模块功能。4 院系设置模块在Visual Basic中单击【工程】【添加窗体】（或者工具栏的“添加窗体”按钮），给工程添加一个新窗体，将窗体保存为FormDepartment.frm。窗体的主要属性设置如下表所示：属性名属性值说 明名称frmDepartment窗体名称Caption院系设置窗体标题BorderStyle1-Fixed Single窗体为固定边界，禁止用户改变大小StartUpPosition 1-所有者中心窗体启动后居于主窗体中央12.4 院系设置模块在窗体上添加若干标签、

28、文本框、按钮，并添加一个数据表格控件、两个数据控件。窗体布局如下图所示：txtTelephonetxtDepartHeadtxtDepartNametxtDepartIDdbgDepartLabel1Label2Label3Label4Label5txtDesccmdAddcmdModifycmdSavecmdCancelcmdDeletecmdQuitdataDepartdataValid4 院系设置模块其中其中dbgDepartdbgDepart是数据表格控件，如果看不到该控件，请参考相关操是数据表格控件，如果看不到该控件，请参考相关操作。将该控件绑定到数据控件上后（设置该控件的作。将该控

29、件绑定到数据控件上后（设置该控件的DataSourceDataSource属性），在属性），在该控件上单击右键，选择该控件上单击右键，选择【Retrieve FieldsRetrieve Fields】菜单项，将数据控件的所有菜单项，将数据控件的所有字段绑定到表格上。再次单击右键，选择字段绑定到表格上。再次单击右键，选择【PropertiesProperties】菜单项，打开属菜单项，打开属性对话框，对数据表格的各项属性进行设置。其中在性对话框，对数据表格的各项属性进行设置。其中在GeneralGeneral选项卡中可以选项卡中可以设置表格标题，去掉设置表格标题，去掉AllowUpdateAl

30、lowUpdate选项，如下图所示，在选项，如下图所示，在ColumnsColumns选项卡中选项卡中可以设置各列标题，如下图所示。可以设置各列标题，如下图所示。在该控件上单击右键，选择在该控件上单击右键，选择【EditEdit】菜单项，可以设置数据表格每列菜单项，可以设置数据表格每列的宽度以及行的高度。此外还可以在字体选项卡中设置表头和数据项的字的宽度以及行的高度。此外还可以在字体选项卡中设置表头和数据项的字体。去掉体。去掉AllowUpdateAllowUpdate选项的目的是禁止用户通过数据表格直接修改数据，选项的目的是禁止用户通过数据表格直接修改数据，从而通过程序代码更好地控制数据的有

31、效性和数据库的完整性。其他各项从而通过程序代码更好地控制数据的有效性和数据库的完整性。其他各项的设置可以根据需要设置。的设置可以根据需要设置。4 院系设置模块表格控件属性设置：4 院系设置模块n 通用变量、通用模块定义通用变量、通用模块定义本模块在同一个用户界面上实现数据的浏览、添加、删除、修改等功本模块在同一个用户界面上实现数据的浏览、添加、删除、修改等功能，为了避免用户操作不当而错误修改数据，在浏览数据时应禁止数据的能，为了避免用户操作不当而错误修改数据，在浏览数据时应禁止数据的修改；在添加、修改数据时允许用户输入数据并禁止移动记录集指针，可修改；在添加、修改数据时允许用户输入数据并禁止移

32、动记录集指针，可以设置一个通用过程来实现界面的切换。单击以设置一个通用过程来实现界面的切换。单击【工具工具】【添加过程添加过程】，添加一个名为添加一个名为ToggleEditModeToggleEditMode的私有子过程，代码如下：的私有子过程，代码如下：（有关代码参见教材）（有关代码参见教材）其中其中InEditModeInEditMode是一个模块级变量，用于标识用户界面是否处在修改是一个模块级变量，用于标识用户界面是否处在修改模式。另外还需要定义一个模块级变量模式。另外还需要定义一个模块级变量BookMKBookMK用于表示数据控件的书签。用于表示数据控件的书签。这两个变量的定义放在模

33、块的通用变量定义部分。这两个变量的定义放在模块的通用变量定义部分。Dim BookMKDim InEditMode As Boolean4 院系设置模块n窗体加载过程窗体加载过程在窗体加载时需要进行初始化处理。首先，为了保证应用程序在任何在窗体加载时需要进行初始化处理。首先，为了保证应用程序在任何路径下都可以访问到数据库，必须修改数据控件的路径下都可以访问到数据库，必须修改数据控件的DatabaseNameDatabaseName属性，使属性，使其能自动定位到应用程序所在的路径。其次，确保窗体加载时界面处在浏其能自动定位到应用程序所在的路径。其次，确保窗体加载时界面处在浏览模式下，不允许修改数

34、据库中的数据。代码如下：览模式下，不允许修改数据库中的数据。代码如下：Private Sub Form_Load(Private Sub Form_Load()dataDepart.DatabaseNamedataDepart.DatabaseName=App.Path&=App.Path&Student.mdbStudent.mdb dataValid.DatabaseNamedataValid.DatabaseName=App.Path&=App.Path&Student.mdbStudent.mdb dataValid.VisibledataValid.Visible=False=Fal

35、se InEditModeInEditMode=False=False ToggleEditModeToggleEditModeEnd SubEnd Sub其中其中App.PathApp.Path表示应用程序运行时所在的绝对路径，本系统中将数据表示应用程序运行时所在的绝对路径，本系统中将数据库文件和应用程序的可执行文件放在同一个文件夹下。窗体加载以后就可库文件和应用程序的可执行文件放在同一个文件夹下。窗体加载以后就可以通过数据控件的按钮和数据表格浏览数据库中的数据了。以通过数据控件的按钮和数据表格浏览数据库中的数据了。4 院系设置模块n数据添加功能的实现数据添加功能的实现数据添加功能比较容易实

36、现，通过数据控件的数据集的数据添加功能比较容易实现，通过数据控件的数据集的AddNewAddNew方法可方法可以添加一条空记录，同时将界面切换到编辑模式下供用户输入数据。为了以添加一条空记录，同时将界面切换到编辑模式下供用户输入数据。为了在操作完成以后数据控件能回到添加前的记录位置，需要设置数据控件的在操作完成以后数据控件能回到添加前的记录位置，需要设置数据控件的书签。添加功能的代码如下：书签。添加功能的代码如下：Private Sub Private Sub cmdAdd_ClickcmdAdd_Click()()If If dataDepart.Recordset.RecordCountd

37、ataDepart.Recordset.RecordCount 0 Then 0 Then BookMKBookMK=dataDepart.Recordset.BookmarkdataDepart.Recordset.Bookmark Else Else BookMKBookMK=Null=Null End If End If dataDepart.Recordset.AddNewdataDepart.Recordset.AddNew 添加记录添加记录 InEditModeInEditMode=True =True 设置编辑模式设置编辑模式 ToggleEditModeToggleEditMo

38、de 切换模式切换模式End SubEnd Sub4 院系设置模块n数据数据记录删除功能的实现记录删除功能的实现记录删除功能通过数据控件的数据集的记录删除功能通过数据控件的数据集的DeleteDelete方法实现。为了保证数据库方法实现。为了保证数据库的完整性，在删除院系设置记录前应确保数据库中没有属于该院系的班级。保的完整性，在删除院系设置记录前应确保数据库中没有属于该院系的班级。保证数据库的完整性，一般可以采取证数据库的完整性，一般可以采取“层级更新层级更新/级联删除级联删除”或者或者“拒绝操作拒绝操作”的方法，本系统中采用的方法，本系统中采用“拒绝删除拒绝删除”的办法，同时向用户显示警告

39、信息。的办法，同时向用户显示警告信息。SQLSQL语句语句SELECT*FROM Class WHERE DepartID=用于从班级数据表用于从班级数据表ClassClass中选择属于指定院系编号的班级的信息。过程中中选择属于指定院系编号的班级的信息。过程中通过通过SQLSQL语句打开语句打开dataValiddataValid数据集，如果数据集不为空则数据集，如果数据集不为空则“拒绝删除拒绝删除”，并将，并将属于该院系的班级名称显示出来。属于该院系的班级名称显示出来。注意，在修改了注意，在修改了dataValiddataValid的的RecordSourceRecordSource属性以后

40、，必须调用属性以后，必须调用RefreshRefresh方方法才能刷新数据集里的数据。记录删除后，需要修改数据集的指针位置，处理法才能刷新数据集里的数据。记录删除后，需要修改数据集的指针位置，处理可能出现的异常情况。可能出现的异常情况。4 院系设置模块n数据修改功能的实现数据修改功能的实现调用数据控件的数据集的调用数据控件的数据集的EditEdit方法可以使数据集处于编辑状态，供用方法可以使数据集处于编辑状态，供用户修改各个字段，同时应将界面切换到编辑模式下，并设置好数据控件的户修改各个字段，同时应将界面切换到编辑模式下，并设置好数据控件的书签。书签。如果用户修改了如果用户修改了Departm

41、entDepartment数据表中的院系编号，而数据表中的院系编号，而ClassClass数据表中相数据表中相关班级的院系编号不作修改，数据库的完整性就会遭到破坏，这里采用关班级的院系编号不作修改，数据库的完整性就会遭到破坏，这里采用“拒绝修改拒绝修改”的办法，通过设置的办法，通过设置txtDepartID.LockedtxtDepartID.Locked=True=True，使用户不能使用户不能修改院系的编号。这种处理限制了用户的操作，给用户使用造成一定的不修改院系的编号。这种处理限制了用户的操作，给用户使用造成一定的不便，下一章中将采用便，下一章中将采用“级联更新级联更新”的办法保证数据库

42、的完整性。的办法保证数据库的完整性。4 院系设置模块n数据保存功能的实现数据保存功能的实现添加新记录或者修改记录字段值以后需要保存数据，保存通过调用数据控添加新记录或者修改记录字段值以后需要保存数据，保存通过调用数据控件的件的UpdateRecordsUpdateRecords方法实现。保存数据前必须对数据进行有效性验证。方法实现。保存数据前必须对数据进行有效性验证。首先要对用户输入的数据进行规范化处理。这个步骤很重要，必须确保用首先要对用户输入的数据进行规范化处理。这个步骤很重要，必须确保用户输入的数据是有效的。先利用户输入的数据是有效的。先利用TrimTrim函数去掉数据前后的多余空格，然

43、后利用函数去掉数据前后的多余空格，然后利用ReplaceReplace函数去掉数据中的非法字符函数去掉数据中的非法字符“”，请思考为什么要去掉字符，请思考为什么要去掉字符“”（提示：（提示：“”会破坏会破坏SQLSQL语句而造成语法错误）。语句而造成语法错误）。其次要对用户输入的数据进行验证，如果用户没有给非空字段输入数据，其次要对用户输入的数据进行验证，如果用户没有给非空字段输入数据，则提示用户必须输入该字段，并通过控件的则提示用户必须输入该字段，并通过控件的SetFocusSetFocus方法直接将焦点定位到该方法直接将焦点定位到该相关控件，便于用户的操作。相关控件，便于用户的操作。最后在

44、添加新记录的情况下还需要通过数据控件最后在添加新记录的情况下还需要通过数据控件dataValiddataValid验证输入的院验证输入的院系编号是否唯一。判断当前是添加状态还是修改状态可以通过系编号是否唯一。判断当前是添加状态还是修改状态可以通过txtDepartIDtxtDepartID控控件的件的LockedLocked属性确定（参考属性确定（参考“数据修改功能的实现数据修改功能的实现”）。）。5 班级管理模块 班级管理模块实现班级添加、删除以及班级信息班级管理模块实现班级添加、删除以及班级信息浏览、修改等功能。浏览、修改等功能。本节内容包括如下几个方面：本节内容包括如下几个方面：n模块功

45、能分析；模块功能分析；n窗体的创建；窗体的创建；n模块用户界面的设计；模块用户界面的设计；n模块功能的实现。模块功能的实现。5 班级管理模块n实现思路实现思路班级管理模块的实现和院系设置模块的实现类似，班级管理模块的实现和院系设置模块的实现类似，本模块中需要设置班级所属院系的编号，为了防止用户本模块中需要设置班级所属院系的编号，为了防止用户输入不存在的院系编号，可以通过将输入不存在的院系编号，可以通过将Department表中所表中所有院系的编号取出填充到有院系的编号取出填充到ComboBox控件中供用户选择来控件中供用户选择来实现。本模块采用实现。本模块采用DTPicker控件来输入班级创建

46、日期值，控件来输入班级创建日期值，保证用户输入的日期是有效日期。保证用户输入的日期是有效日期。5 班级管理模块n实现步骤添加、保存窗体，设置窗体属性；添加控件，设置控件属性，构造窗体界面；编写代码，实现相应功能；和主窗体连接，测试模块功能。5 班级管理模块在工程中新建一个窗体，将窗体保存为FormClass.frm。窗体的主要属性设置如下表所示：属性名属性值说 明名称名称名称frmClassfrmClassfrmClassBorderStyle1-Fixed Single窗体为固定边界，禁止用户改变大小StartUpPosition1-所有者中心窗体启动后居于主窗体中央5 班级管理模块在窗体上

47、添加若干标签、文本框、按钮、组合框，并添加一个日期选择框、一个数据表格控件、两个数据控件。窗体布局如下图所示：其中dtpBeginDate是日期选择框。数据表格dbgClass的设置可以参考“院系设置模块”中对dbgDepart的操作。Table1Table2Table3Table4Table5Table6Table7txtDesctxtMasterTeltxtMasterdtpBeginDatetxtClassNametxtClassIDtxtDepartIDdbgClasscmdModifycmdSavecmdCanceldataClassdataValidcmdQuitcmdDelete

48、cmdAdd5 班级管理模块n 通用变量、通用模块定义通用变量、通用模块定义为模块添加通用变量为模块添加通用变量InEditModeInEditMode、BookMKBookMK和和私有过程私有过程ToggleEditModeToggleEditMode。注意日期选择控件没有注意日期选择控件没有LockedLocked属性，可以使用属性，可以使用EnabledEnabled属性禁止用户操作该属性禁止用户操作该控件，禁止操作组合框控件使用控件，禁止操作组合框控件使用EnabledEnabled属性比较好。属性比较好。此外再添加一个私有过程此外再添加一个私有过程FullDepartFullDepa

49、rt，该过程将该过程将DepartmentDepartment数据表中所数据表中所有的院系编号添加到有的院系编号添加到cmbDepartcmbDepart组合框中供用户选择，过程代码如下：组合框中供用户选择，过程代码如下：Private Sub FullDepart()dataValid.RecordSource=SELECT*FROM Department dataValid.Refresh cmbDepart.Clear While Not dataValid.Recordset.EOF cmbDepart.AddItem dataValid.Recordset(DepartID)data

50、Valid.Recordset.MoveNext WendEnd SubEnd Sub 5 班级管理模块n窗体加载过程窗体加载过程和院系设置模块相比，本模块在窗体加载时还需要调用和院系设置模块相比，本模块在窗体加载时还需要调用FullDepartFullDepart过程填过程填充充cmbDepartcmbDepart组合框。代码如下：组合框。代码如下：Private Sub Form_Load()dataClass.DatabaseName=App.Path&Student.mdbdataValid.DatabaseName=App.Path&Student.mdbdataValid.Visi