教务管理系统概要设计及详细设计

1、概要设计说明书1. 总体设计1.1 需求规定教务管理系统可分为学生信息管理系统和教师管理信息系统，系统开发的整体任务是实现学校教师和学生信息管理的系统化、规范化、自动化和智能化，从 而达到提高学校管理效率的目的。本阶段目的在于明确系统的数据结构和软件结构，此外总体设计还将给出内 部软件和外部系统部件之间的接口定义， 各个软件模块的功能说明，数据结构的 细节以及具体的装配要求。1.2运行环境软件基本运行环境为Windows XP环境。1.3基本设计概念和处理流程概要说明书的目的在于明确系统的数据结构和软件结构，设计外部软件和内部软件的接口，说明各个软件模块的功能说明，数据结构的细节等。系统的总体

2、 处理流程如图1-1所示:1.4系统体系结构用一览表及框图的形式说明本系统的系统元素（各层模块、子程序、公用程序等）的划分，扼要说明每个系统元素的标识符和功能，分层次地给出各元素之间的控制与被控制关系。本系统的体系架构如图1-2所示:图1-2系统体系架构本系统体系结构大致可以定义为：客户机层上的表示层主要是通过 Struts框架实现的，由显示视图产生一个请求。请求被ActionServlet （控制器）接收,它在struts-config.xml文件中寻找请求的URI，找到对应的 Action 类后,Action类执行相应的业务逻辑。Action类执行建立在模型组件基础上的业务逻辑，模型组件是

3、和应用程序关联的。一旦Action类处理完业务逻辑，它把控制权返回给ActionServlet , Action类提供一个键值作为返回的一部分，它指明了 处理的结果。ActionServlet 使用这个键值来决定在什么视图中显示 Action的类处理结果。当ActionServlet 把Action类的处理结果传送到指定的视图中,请求的过程也就完成了。中间业务层是通过Spring框架实现的，首先建立一个BaseAction,它继承了 Action类，而其他定义的 Action都要继承这个 BaseAction。 这个BaseAction需要导入 AppContext工具类，这个AppConte

4、xt需要导入Spring中 org.springframework.context.support.*;这样一个继承 BaseAction的Action，就可以getXXXServiceO的方法得到某一个service的实例服务定位器的设计模式。持久（P0）层是由hibernate架构 实现的，它包括关于整体数据库的hibernate.cfg.xml文件、每个表的JavaBean类 和每个表的hbm.xml文件，通过Spring集成模板HibernateTemplate提供DAO 来 使用 PO。在 Spring 的配置文件（applicationContext.xml）中配置 session

5、Factory的 bean来管理 hibernateo本系统组件图如图1-3所示2. 接口设计2.1 用户接口用户接口语法结构软件回答信息教务系统管理员登录以英文和汉字开头，不超过6个字符进入主界面信息管理相关操作进行相应的操作3. 运行设计3.1运行模块组合具体软件的运行模块组合为程序多窗口的运行环境，各个模块在软件运行过程中能较好的交换信息，处理数据。3.2运行控制软件运行时有较友好的界面，基本能够实现用户的数据处理要求。3.3运行时间系统的运行时间基本可以达到要求。4. 系统数据结构4.1逻辑设计教务管理系统E-R图班级信息表PK班级编号年级班级名称 班级简称 人数 班主任籍贯代码表PK

6、籍贯编号籍贯民族代码表PK民族编号民族成绩表PK编号学号课程编号成绩考试次数是否补考是否重考是否已确定成绩学生信息PK学号姓名 班级编号 性别 年级 政治面貌编号 民族编号 籍贯编号 身份编号 学籍编号政治面貌代码表PK政治面貌编号A政治面貌学籍代码表PK学籍编号学籍名称课程信息PK课程编号课程名称 课程简称 拼音码 本学期课程 教师开课系别 学分*课程表PK编号课程号 课程编号 上课时间天 上课时间节 上课地点选课表PK编号学号 课程号4.2逻辑结构设计表类型：约束表含义：班级报考表字段名称字段类型Null含义示例数据id整形否，自增主键列1n ame字符值八班1、表名称：bkb表类型：约束

7、表含义：班级成绩表（打印表）字段名称字段类型Null含义示例数据id整形否，自增主键列1cjb id整形否外键列12、表名称：cjb字段名称字段类型Null含义示例数据id整形否，自增主键列1n ame字符1值八班表类型：约束表3、表名称：jhcjbn ame字符1值八班含义：班级计划成绩表（显示和打印）字段名称字段类型Null含义示例数据id整形否，自增主键列1fan ggua nsuo id整形否外键列1n ame字符值长三表类型：约束表含义：班计划学期考试课程表4、表名称：hks字段名称字段类型Null含义示例数据id整形否，自增主键列1n ame字符值英语fen shu整形分数4表类型

8、：约束表含义：班计划学期课程开设表5、表名称：hxq6、表名称：xjh表类型：约束表含义：班教学计划信息表参见bkb表7、表名称：xxb表类型：约束表含义：班注册和档案表参见bkb表8、表名称：kbp dfb表类型：约束表含义：报考编排登分表参见bkb表9、表名称：ctdmkb_t mp表类型：约束表含义：毕业课程替代免考表参见cjb表10、表名称：ctdmkb表类型：约束表含义：毕业课程替代免考表参见cjb表11、表名称：ysmdb表类型：约束表含义：毕业生名单参见cjb表12、表名称：ycymdb表类型：约束表含义：毕业预审审核差异名单表参见cjb表13、表名称：yyshsdfb表类型：约

9、束表含义：毕业预审审核得分表参见ycymdb）表14、表名称：yyshsdfb_t mp表类型：实体表含义：毕业预审审核得分表字段名称字段类型Null含义示例数据id整形否，自增主键列zhaidihao字符宅第号zhuanghao字符幢号diquleibie字符地区类别限定：一类/二 类/三类cha nbie字符产别限定：直管/自 管/托管chanquanzhenghao字符产权证号jiuqu整形旧区约束表：qujiuxiaoqu整形旧小区约束表：xiaoqujiulouhao字符旧楼号xin qu整形新区约束表：quxin xiaoqu整形新小区约束表：xiaoquxinlo uhao字符新

10、楼号jiegou整形结构约束表：jiegouzongcengshu整形总层数15、表名称：gdw类型：约束表含义：采购单位16、表名称：gdwdhzz类型：约束表含义：采购单位到货总账17、表名称：gdwzz类型：约束表含义：采购总账18表名称：gdhmxb类型：约束表含义：采购到货明细表19、表名称：gdhmxml类型：约束表含义：采购到货明细目录20、表名称：gmxb类型：约束表含义：采购明细表21、表名称：gzb类型：约束表含义：采购总表22、表名称：cjdmb类型：约束表含义：成绩代码表23、表名称：cjgdb类型：约束表含义：成绩更动表24、表名称：cjtjb类型：约束表含义：成绩统

11、计表25、表名称：cjzb类型：约束表含义：成绩总表26、表名称：cjzb_c opy类型：约束表含义：成绩总表27、表名称：dgdw类型：约束表含义：订购单位28表名称：dgdwmxb类型：约束表含义：订购单位明细表29、表名称：dgmxb类型：约束表含义：订购明细表30、表名称：dgzb类型：约束表含义：订购总表31、表名称：fxzyb类型：约束表含义：辅修专业表32、表名称：jhkkkcb类型：约束表含义：计划开考课程表33、表名称：jhkkkcb类型：约束表含义：计划开考课程传递表34、表名称：jljb类型：约束表含义：奖励级别表35、表名称：jlqkjzb类型：约束表含义：奖励情况记

12、载表36、表名称：jccgfdml类型：约束表含义：教材采购分单目录37、表名称：jccgjsb类型：约束表含义：教材采购计算表38表名称：jccgmxb类型：约束表含义：教材采购明细表39、表名称：jccgshb类型：约束表含义：教材采购审核表40、表名称：jcch类型：约束表含义：教材册号41、表名称：jcdgzb类型：约束表含义：教材订购总表42、表名称：jclxbmdz类型：约束表含义：教材类型编码对照43、表名称：jcsmmb类型：约束表含义：教材说明模板44、表名称：jcthzt类型：约束表含义：教材替换状态45、表名称：dgdwzb类型：约束表含义：教材征订订购单位总表46、表名

13、称：jczb类型：约束表含义：教材总表47、表名称：jxbm类型：约束表含义：教学部门表4&表名称：jxdg类型：约束表含义：教学大纲49、表名称：jxhjdy类型：约束表含义：教学环节定义50、表名称：kkdw类型：约束表含义：开课单位表51、表名称：kcqkb类型：约束表含义：考场情况表52、表名称：kdxxb类型：约束表含义：考点代码表53、表名称：kslb类型：约束表含义：考生类别代码表54、表名称：ksdmb类型：约束表含义：考试代码表55、表名称：ksdmcd类型：约束表含义：考试代码传递表56、表名称：ksdxb类型：约束表含义：考试对象表57、表名称：ksfsdm类型：约束表含

14、义：考试方式代码表5&表名称：kslxdmb类型：约束表含义：考试类型代码表59、表名称：kccc类型：约束表含义：课程层次代码表60、表名称：kcgldw类型：约束表含义：课程管理单位61、表名称：kcjsfs类型：约束表含义：课程建设方式62、表名称：kcjsjb类型：约束表含义：课程建设级别表63、表名称：kcjslb类型：约束表含义：课程建设类别64、表名称：kcjcdzb类型：约束表含义：课程教材对照65、表名称：kclb类型：约束表含义：课程类别代码表66、表名称：kctdb类型：约束表含义：课程替代表67、表名称：kcxz类型：约束表含义：课程性质代码表68表名称：kczb类型：

15、约束表含义：课程总表69、表名称：Ijhkcb类型：约束表含义：类计划课程表70、表名称：Ijhxqks类型：约束表含义：类计划学期开设课程表71、表名称：Ijhxqksb类型：约束表含义：类计划学期考试课程表72、表名称：Ijxjhb类型：约束表含义：类教学计划表73、表名称：mzdmb类型：约束表含义：民族代码表74、表名称：ndszb类型：约束表含义：年度收支表75、表名称：njdmb类型：约束表含义：年级代码表76、表名称：njkcb类型：约束表含义：年级课程表77、表名称：njzyb类型：约束表含义：年级专业表78表名称：xkkcb类型：约束表含义：新开课程表79、表名称：xszcb

16、类型：约束表含义：新生注册表80、表名称：xflydmb类型：约束表含义：学费来源代码表81、表名称：xjbddmb类型：约束表含义：学籍变动代码表82、表名称：xjbdjzb类型：约束表含义：学籍变动记载表83、表名称：xjztdmb类型：约束表含义：学籍状态代码表84、表名称：fzjbytj类型：约束表含义：学生非在籍和毕业生统计表85、表名称：xsjbqkb类型：约束表含义：学生基本情况表86、表名称：xsjhcjb类型：约束表含义：学生计划成绩表87、表名称：xslbdmb类型：约束表含义：学生类别代码表8&表名称：xslxdmb类型：约束表含义：学生类型代码表89、表名称：xslxd

17、yb类型：约束表含义：学生类型代码对应表90、表名称：bjxx表类型：约束表含义：班级信息表字段名称字段类型Null含义示例数据Jgbh整形否，自增主键列1Jg字符值郑州表类型：约束表含义：籍贯代码表字段名称字段类型1 Null含义示例数据Bjbh整形否，自增主键列1Nj字符值英语Bjmc字符名称信管八班Bjjc字符简称8班Rs整形人数80Bzr字符1班主任王91、表名称：jgdmb字段名称字段类型Null含义示例数据Mzbh整形否，自增主键列1Mz字符1值汉表类型：约束表含义：民族代码表92、表名称：mzdmb字段名称字段类型Null含义示例数据Zzmmbh整形否，自增主键列1Zzmm字符1

18、值表类型：约束表含义：政治面貌代码表93、表名称：zzmmdmb字段名称字段类型Null含义示例数据Xjbh整形否，自增主键列1Xjmc字符值20097650表类型：约束表含义：学籍代码表94、表名称：xjdm字段名称字段类型Null含义示例数据Bh整形否，自增主键列1Xh字符值20097650111Kcbh整形课程编号4Cj整形值99Kscs整形值2Sfbx字符是否补修是Sfck字符是否重考是Sfqcj字符确定成绩是表类型：约束表含义：成绩表96、表名称：cjb字段名称字段类型Null含义示例数据Xh整形否，自增主键列20097650111Xm字符值张三Bjbh整形班级编号4Xb字符性别男N

19、j字符年级2009Zzmmbh整形政治面貌编号2Mzbh整形民族编号2Jgbh整形籍贯编号3Sfzh整形身份证jbh整形学籍编号2009表类型：约束表含义：学生信息表97、表名称：xsxx字段名称字段类型Null含义示例数据Kcbh整形否，自增主键列1Kcmc字符值英语Kcjc字符值英语Pym字符值Yin gyuBxqkc字符值Js字符1教师吴Kkxb整形开课系别1Xf整形学分3表类型：约束表含义：课程信息表98、表名称：kcxx字段名称字段类型1 Null含义示例数据Bh整形否，自增主键列1Kxh字符课序号2Kcbh整形课程编号4Sksjt整形上课时间

20、天Sksjj整形上课时间节Skdd字符1上课地点表类型：约束表含义：课程表99、表名称：kcb字段名称字段类型1 Null含义示例数据Bh整形否，自增主键列1Xh整形学号20097650111Kxh整形1课序号4表类型：约束表含义：选课表100、表名称：xkb4.2物理结构设计系统的物理结构具体由数据库来设计与生成，故此处略。5. 系统出错处理设计5.1 出错信息错误登录信息系统提示错误登录信息系统返回登录界面输入错误的数据系统提示数据错误信息提示重新输入数据打印不成功系统提示打印不成功信息进行重新打印操作5.2补救措施由于数据在数据库中已经有备份，故在系统出错后可以依靠数据库的恢复功 能，并

21、且依靠日志文件使系统再启动，就算系统崩溃数据也不会丢失或遭到破坏。 但有可能占用更多的数据存储空间，权衡措施由用户来决定第5章详细设计说明书1.引言1.1项目定义教务综合管理信息系统是为了适应现代化学校管理的需要，加快推进我校数字化 校园建设、充分利用校园网，利用网络、多媒体等计算机应用技术和手段，提高 办公效率、改善质量的高效管理信息系统。1.2编写目的本文档为“教务管理系统-详细设计说明书”，主要用于为实现系统的功能而进 行的系统详细设计说明，详细系统各软件组成模块的实现流程、功能、接口、编 译、测试要点等内容，便于对系统的编码进行指导和约束。1.3.参考资料教务管理系统_系统软件需求说明

22、书。教务管理系统_系统概要设计说明书。教务管理系统_数据库设计说明书（数据库字典）等。2.程序系统的结构2.1整个教务管理系统的结构可由以下图示来表明：3.系统功能实现从前面需求分析可以看出，系统功能庞杂，主要分为前台浏览器（B/S ）信息发布和数据查询，后台（C/S）数据管理和处理，教务管理功能部分数据分为四类：学生基本信息相关；教师基本信息相关；课程信息相关； 学生成绩综合查询相关。从使用和操作的功能上分，有三种用户：该校学生；业务数据管理人员（学生工作辅导员、教务干事）；系统管理员。为便于整个系统组织管理，把各个相对独立的数据或功能组织到整个大系统中来，我们把各个相对独立的功能完全独立设

23、 计，编译成独立的目标（功能）模块（single Executable ），各功能模块最后被集成到一个称为虚拟桌面的控制台模块中。相应地将系统结构分为一个控制台程序和七个子系统，各子系统又分为若干各子模块。对应于每一个模块，几乎都有录入、查询、修改、删除、查看详细资料等这几个功能。整个业务流程就是由这几种基本功能实现的。在这里每个模块都要用到的功能没必要在每个子模块里重复阐述，在每个子模块里只列出区别于其它子模块的功能实现。3.1系统控制台模块功能:各子功能模块的组织和调用；统一的登陆界面实现到数据库服务器的登陆;显示教务主页 系统图标。设计:1.登陆数据库:输入数据库服务器名（Serverl

24、P）、用户账号（）UserlD、密码（PassWord）；登陆数据库服务器，检索系统权限表，根据权限设置相应功能模块: 无此用户或禁止权限En able = False; 浏览权限En able = True;修改 User ID=修改 Pass Word := 修改权限En able = True;修改 User ID =修改 Pass Word :=2.采用WinXP下程序组、程序项的原理组织各执行模块:登陆服务器基础维护 教学管理报表统计退出各程序组、程序项的显示分别可以是分层/树状/大图标/小图标等方式；各程序项或菜单项的名称命名为相应功能模块的目标代码文件名。3.2.各具体模块如下:

25、模块1名称：班级信息维护输入：班级信息维 护厂处理：维护管理该校各班级基本信息输出：各班级信息数据表：J班级信息表模块2名称：学生基本信息维护输入:学生基本信息厂处理：维护管理学生基本信息输出：学生基本信 息数据表：J学生信息表模块6名称：成绩输入输入：成绩输入厂处理：维护管理成绩输入信息输出:成绩数据表：J学生基本信息表 课程信息表模块7名称：教师信息为维护输入：教师信息为维护厂处理：维护管理教师信息输出：教师信息数据表：J教师信息表4.具体设计:设计功能实现*gg Eis藪黄営运至统曲淮护fW)報学管理(X)报施计co 返出锁包括：班级信息维护，学生信息维护，课程信息维护，学生选课，课表查

26、询，成绩输入，报 表统计，退出系统Public Class frmMainIn herits System.Wi ndows.Forms.FormPrivate Function GetlnstanceState(ByVal name As String) As Boolean获得frmMain窗体的子窗体的数量Dim i As Integer = Me.MdiChildren.Length循环判断是否有名为name的子窗体实例For i = 0 To Me.MdiChildren.Length - 1If Me .MdiChildren(i).Name = name Then存在名为name

27、的子窗体，是子窗体获得焦点并返回TrueMe.MdiChildre n(i).Focus()Return TrueEnd IfNext不存在名为Name的子窗体FalseReturn FalseEnd FunctionPrivate Sub mnClass_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Han dles mn Class.ClickIf GetInstanceState(frmClass) ThenExit SubEnd IfDim childFrm As frmClass = New fr

28、mClass childFrm.Mdi Parent = MechildFrm.Show()End SubPrivate Sub mnStudent_Click( ByValsender As System.Object, ByVal e AsSystem.Eve ntArgs) Han dles mn Stude nt.ClickIf GetInstanceState(frmStudent) ThenExit SubEnd IfDim childFrm As frmStude nt = New frmStude nt childFrm.Mdi Parent = MechildFrm.Show

29、()End SubPrivate Sub mnSubject_Click( ByValsender As System.Object, ByVal e AsSystem.Eve ntArgs) Han dles mn Subject.ClickIf GetInstanceState(frmSubject) ThenExit SubEnd IfDim childFrm As frmSubject = New frmSubjectchildFrm.Mdi Parent = MechildFrm.Show()End SubPrivate Sub mnSelect_Click( ByVal sende

30、r As System.Object, ByVal e As System.EventArgs) Han dles mn Select.ClickIf GetInstanceState(frmSelect) ThenExit SubEnd IfDim childFrm As frmSelect = New frmSelect childFrm.Mdi Parent = Me childFrm.Show()End SubPrivate Sub mnCourse_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)Ha

31、n dles mn Course.ClickIf GetInstanceState(frmCourse) ThenExit SubEnd IfDim childFrm As frmCourse = New frmCourse childFrm.Mdi Parent = Me childFrm.Show()End SubPrivate Sub mnResult_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)Han dles mn Result.ClickIf GetInstanceState(frmScore)

32、 ThenExit SubEnd IfDim childFrm As frmScore = New frmScore childFrm.Mdi Parent = Me childFrm.Show()End SubPrivate Sub mnReport_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Han dles mnRep ort.ClickIf GetInstanceState(frmReport ) ThenExit SubEnd IfDim childFrm As frmRe port = New

33、 frmRe port childFrm.Mdi Parent = MechildFrm.Show()End SubPrivate Sub mnExit_Click( ByVal sender As System.Object, ByVal e As System.EventArgs)Han dles mn Exit.ClickEnd SubEnd Class陽豳信.眸护5.基础维护:5.1班级信息维护实现的功能包括： 增，修改，删除等 可实现模糊搜索功能 如下所示：查看首记录：表中首个班级记录，上记录,即：输入班级编号可查询相关班级信息下记录， 查尾记录，新ll1卜1卜|D甜X首记录上址录下

34、记呆1屋记录新增退出II级倉称僧换简称人如卜ZUtlUlJ4lULJU ZUUU姙U1出工U1bS班壬任班级名秫班经简和203013*00001(|33(邸三体工口廂 班翼漏粤 I2DM13400Q0101迄录裁：1Public Class frmBaseIn herits System.Wi ndows.Forms.FormP rotected bmData As Bindin gMa nagerBaseP rotected dtData As DataTablebAdd = true 为新增bAdd = false 为修改Protected bAdd As BooleanPrivate S

35、ub frmBase_Load( ByVal sender As Object, _ ByVal e As System.EventArgs) Handles MyBase .LoadPrep are()SetDataGrid()SetTextBoxState(True)End SubPrivate Sub ToolBar1_ButtonClick( ByVal sender As Object, _ ByVal e As ToolBarButto nClickEve ntArgs) _Ha ndles ToolBar1.Butto nClickSelect Case e.Button.Tex

36、tCase首记录返回首记录bmData .Po siti on = 0Case上记录”If bmData.Position 0 ThenbmData .Po siti on -= 1End IfCase下记录If bmData.Position bmData.Count ThenbmData .Po siti on += 1End IfCase尾记录返回尾记录bmData. Po siti on = bmData.Co untCase 新增”Me.dgdList.E nabled = FalseSetTextBoxState(False)SetToolBarState(False)bAdd =

37、 TrueClear()Case修改”Me.dgdList.E nabled = FalseSetTextBoxState(False)SetToolBarState(False)bAdd = FalseCase 删除”弹出询问对话框Dim dlgResult As DialogResult = _MessageBox.Show(”你确认删除此数据？”删除, MessageBoxButtons.OKCancel)If dlgResult = DialogResult.OK ThenDeleteData()End IfCase保存”SetToolBarState(True)SetTextBoxS

38、tate(True)If bAdd = True Then为新增数据保存SaveForAddOElse为更新数据保存SaveF orUp date() End IfMe.dgdList.E nabled = TrueCase取消”SetTextBoxState(True)SetToolBarState(True)Me.dgdList.E nabled = TrueSearchResult()Case 退出”关闭本窗体Me.Close()End SelectTryMe .dgdList.Curre ntRow In dex = bmData .P ositi on SetData()Catch

39、ex As Exce pti onEnd TryEnd SubPrivate Sub btnSearch_Click( ByVal sender As System.Object, _ ByVal e As System.Eve ntArgs) Han dles btn Search.Click SearchResult()End SubPrivate Sub dgdList_CurrentCellChanged( ByVal sender As Object, _ ByVal e As System.Eve ntArgs) Han dles dgdList.Curre ntCellCha n

40、ged Try判断bmData是否为NothingIf bmData Is Nothing ThenExit SubEnd IfIf bmData .P osition dgdList.Curre ntCelI.RowNumber Then bmData .Po siti on = dgdList.Curre ntCelI.RowNumber SetData()End IfCatch ex As Exce pti onMessageBox.Show(ex.ToStri ng)End TryEnd SubPrivate Sub SetToolBarState(ByVal bState As Bo

41、olean) 设置Button的是否能够单击ToolBar1.Butto ns(0).E nabled = bStateToolBar1.Butto ns(1).E nabled = bStateToolBar1.Butt ons( 2).E nabled = bStateToolBar1.Butto ns(3).E nabled = bStateToolBar1.Butt ons(4).En abled = bStateToolBar1.Butto ns(5).E nabled = bStateToolBar1.Butt ons( 6).E nabled = bStateToolBar1.B

42、utto ns(7).E nabled = Not bStateToolBar1.Butto ns(8).E nabled = Not bStateEnd SubPublic Overridable Sub Prepare()End Sub设置DataGrid控件Public Overridable Sub SetDataGrid() End Sub查询函数Public Overridable Sub SearchResult() SetDataGrid()dgdList.DataSource = dtData.DefaultView End Sub新增函数Public Overridable

43、End SubPublic Overridable End Sub更新函数Public OverridableSub LoadDataOSub SaveForAdd()Sub SaveForU pdate()End Sub删除函数Public Overridable End Sub清除函数Public Overridable End Sub设置TextBox函数 Public Overridable End SubPublic OverridableSub DeleteData()Sub Clear()Sub SetTextBoxState(ByVal bState As Boolean)Su

44、b SetData()End SubEnd Class4卜1D 歸 X首记录上记录下祀录匡记录新增修改刪晾且11黑擢案I学号5.2学生信息维护学号1姓1班级輪寻唯別年级身份订号政治面貌编卜|aoaoi340300韩建军m0013400002000340104690301301 n20001340:)00陈庚2OOO13W0O再0003401eS06001Tfinnndmnn* 1%infinbvinn9nnn4nifM7ni9fifl1叮学号性別身证号pOOOlSWOOOOi1陈崖军1男zi|3-40104590205303班鍛漏号政治面貌编号民陪编号|：kioijJ詰懸扁号学髒号杠苏JI1衣

45、曙年级蛙名记录数:LME实现的功能包括:查看首记录，上记录， 下记录， 查尾记录，新增，修改，删除等可实现模糊搜索功能 如下所示：as学生信昌錐护H1勖Xe记录上记录下记录幅改I矚摟秦I字号I晌皿姓名f芋号姓若20001340000 議黎年簸 力证号I疏洽面貌缩I民族扌廉0 01 01记朿數：1I年级2030班级漏号I性别20001340000 鬼学号姓名住别年级身fW证号pOOO 3400000(|w1舅二J|000|340；070109101班级蝙县迪诰面临昙民協塢是畑11党员J13睛奚漏H寧藉娠益愎徴丄1毕业JPublic Class frmStudentInherits教务管理系统.f

46、rmBasePublic Overrides Sub Prepare()Me .Text =学生信息维护”Me.Label1.Text = 学号”Me.Label2.Text =姓名”Me.Label3.Text = 年级”设置ComboBox控件数据源Dim db As DataBase = New DataBaseDim dv As DataView = db.R un SelectSQL _(select班级编号，班级名称from 班级信息order by班级名称)Me.cbbClassId.DataSource = dvMe.cbbClassId.DisplayMember =班级名称

47、” Me.cbbClassId.ValueMember =班级编号” dv = db.R un SelectSQL _(select政治面貌编号，政治面貌from政治面貌代码表)Me.cbb Polity.DataSource = dvMe.cbbPolity.DisplayMember =政治面貌”民族代码表”)Me.cbbPolity.ValueMember =政治面貌编号” dv = db.RunSelectSQL( select 民族编号，民族 from Me.cbbNatio n.DataSource = dvMe.cbbNation.DisplayMember =民族Me.cbbNation.ValueMember =民族编号”籍贯代码表)dv = db.RunSelectSQL( select 籍贯编号 籍贯 fromMe.cbbBirth Place.DataSource = dvMe.cbbBirthPlace.DisplayMember =籍贯”from学籍代码表)Me.cbbBirthPlace.ValueMember =籍贯编号” dv = db.RunSelectSQL( sel