管理信息系统》课程设计学生信息管理

1、管理信息系统课程设计设计报告设计名称：学生管理系统班 级：财管0901姓 名：i甚尧李亚黄卓李波指导老师：张居武日 期：2011年5月12日随着计算机技术的飞速发展，计算机在学生管理中应用的普及， 利用计算机实现管理势在必行。我作为一个信息管理专业的大学生， 希望能有所贡献。用我三年的所学编制了一个实用的程序来帮助教师 们进行更有效的学生信息管理。本系统采用面向对象的程序设计思想进行编制，整个系统数据存 在表格文件屮，由数据库文件进行管理。并且运用信息系统分析与设 计方法，应用access数据库，visual basic发工具等开发出来的基于 windows系列的学生管理系统。该系统面向学校和

2、学生，实现对学生成 绩管理、班级管理、奖惩管理、学籍管理。系统支持学生工作管理部 门和各系工作人员、全校学生使用，支持按权限管理的查询和数十种 统计报表的输出打印功能。减少了部门之间工作的中间环节，提高了 跨部门管理的效率。文章介绍了学生管理信息系统的系统分析部分，包括可 行性分析、业务流程分析等；系统设计部分主要介绍了系统 功能设计和数据库设计及代码设计；系统实现部分说明了几 个主要模块的算法，木系统界面友好，操作简单，比较实用。【关键字】：学生管理系统学生管理数据库信息系统 分析visual basic应用目录摘要ii1系统概述41.1系统及需求分析41. 1. 1系统需求41.1.2可行

3、性分析412系统设计的背景51.3系统的功能简介61.3. 1用户管理模块（ctrl+a） :61. 3. 2班级管理模块（ctrl+c） :61.3.3学生档案管理模块（ctrl+d）： 61.3.4课程管理模块（ctrl+e）： 61.3.5成绩管理模块（ctrl+f）： 71.3.6奖惩管理模块（ctrl+g）： 71.3.7报表打印模块（ctrl+j）： 71.3.8帮助模块714系统开发的目标72系统分析72. 1业务流程分析72. 2数据流程分析：82. 3数据存储分析：实体联系图92. 4功能分析：功能层次图113系统设计123.1软件模块结构设计123. 1. 1系统方案确定1

4、23. 1. 2软件结构设计1232数据库设计134系统的功能164. 1系统登陆界面：164. 2用户管理模块：184. 3学藉管理模块：245运行及调试276全文总结27参考文献281系统概述本学生信息管理系统可以说是一个综合性的学校学生管理系统，它集成了班级管 理、学生学籍管理系统、学生成绩管理系统、学生档案管理系统、学生奖惩管理，因 而具冇较强的实用性和先进性。1.1系统及需求分析1.1.1系统需求通过调查,要求系统需要有以下功能：（1）界而友好，易于操作；（2）针对不同的使用对象，要求有较好的权限管理；（3）能按学期、按班级完成对学生成绩的录入、修改；（4）能查询学生成绩，及学生名单

5、；（5）能对各班级信息进行录入修改；（6）能按班级输出学生的成绩；1.1.2可行性分析经济上可行性：现在，计算机的价格已经十分低廉，性能却有了长足的进步。而本系统的开 发，为学校的工作效率带来了一个质的飞跃，为此主耍表现冇以下几个方而：第一，本系统的运行可以代替人工进行许多繁杂的劳动；第二，本系统的运行可以节省许多资源；第三，本系统的运行可以大大的提高学校的工作效率；第四，本系统可以使敏感文档更加安全，等等。所以，本系统在经济上是可行的。技术上可行性：为本系统的开发我特对我校管理系进行了深入的调查研究。现我校管 理系冇33个班，其屮05级冇7个班，04级10个班，03级冇10个班,02级6个班

6、， 共有学生人数为1500多人。并且对用户的要求也都能够满足。本系统的开发我利用access作为本系统的数据库，它是一个支持多用户的新型 数据库，适用于中小规模的数据量需求。学校的硬件建设也为新系统提供了硬件的支 持。使用visual basic6.0作为系统开发的开发环境，它作为一种现代的编程语言，提 供完善的指令控制语句、类与对彖的支持及丰富的数据类型，给开发高性能系统捉供 的保障为开发满足客户要求的系统，保证了代码的模块化耍求，而代码模块化的提高, 非常有利于以后对新系统的扩展与修改。综上所述，木系统的设计与开发在技术上和硬件设备上的条件都是满足的， 因此，它在技术上是可行的。运行上可行

7、性：本系统为一个小型的学生管理系统，所耗费的资源非常的小，学校的屯 脑无论是硬件还是软件都能够满足条件，因此，木系统在运行上是可行的。 法律可行性：木系统纯为私人设计，在开发过程中没有涉及合同、责任等与法律相抵触的方面。 因此，本系统在法律上是可行的。由于木系统管理的对象单一，都是在校学生，且每个数据内容具有较强的关联性, 涉及的计算过程不是很复杂。因此，比较适合于采用数据库管理。11学校用于学生管 理的微机都是piii以上的机器，在存储量、速度方面都能满足数据库运行的耍求。 在技术难度方面，曲于冇指导老师的指导和相关参考文献，特别是网上资料，特别是 参考其它程序的功能，因此完全可以实现。1.

8、2系统设计的背景本系统的设计是在windows 98中文版操作系统环境下，使用visual basic 6. 0 中文版开发成功的。数据库是mis中的重要支持技术，在mis开发过程中，如何选 择数据库管理是一个重要的问题，目前，数据库产品较多，每种产品都具冇各自的特 点和适用范围，i大i此，在选择数据库时，应考虑数据库应用的特点及适用范围，本系 统选用的数据库语言介绍如下：visual basic 语言visual basic是一种可视化的、面对对象和条用事件驱动方式的结构化高级程序 设计，可用于开发windows坏境下的多种应用程序。它简单易学、效率高，ii功能 强大，口j以与windows

9、的专业开发工具sdk相媲美，而11程序开发人员不必具有 c/c+编程基础。在visual basic坏境下，利用事件驱动的编程机制、新颖易用的可 视化设计工具，使用windows内部的应用程序接口(api)函数，以及动态链接库(dll)、 动态数据交换(dde)、对象的链接与嵌入(ole)、开放式数据访问(odbc)等技术，可 以高效、快速地开发出windows环境下功能强大、图形界面丰富的应用软件系统。电脑已经成为挂在我们嘴角的一句口头禅，它已经深入到日常工作和生活的方方 面面，比如文字处理、信息管理、辅助设计、图形图像处理、教育培训以及游戏娱乐 等。windows系统的推出使电脑从高雅的学

10、术殿堂走入了寻常百姓家，各行各业的人 们无须经过特别的训练就能够使用电脑完成许许多多复杂的工作。然而，虽然现在世 界上已经充满了多如牛毛的各种软件，但它们依然不能满足用户的各种特殊需要，人 们还不得不开发适合口己特殊需求的软件。我们都知道，学生管理系统是一个教育单 位不可缺少的部分，它的内容对于学校的决策者和管理者来说都至关重要，所以学生 管理系统应该能够为用户提供充足的信息和快捷的杳询手段。但一直以來人们使用传 统人工的方式管理文件档案，这种管理方式存在着许多缺点,如:效率低、保密性差, 另外时间一长，将产生大量的文件和数据，这对于杳找、更新和维护都带來了不少的困 难。而使用计算机对学生信息

11、进行管理，具冇手工管理所无法比拟的优点例如:检索 迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成木低等。这些优点能 够极大地提高学生管理的效率,也是企业的科学化、正规化管理的重要途径。因此开发这样一套管理软件很有必要，在下面的各章屮我将就这i套学生档案管 理系统的开发，谈谈其开发过程和所涉及到的问题及解决方法。1.3系统的功能简介木系统主要可以实现以下的管理功能：学生档案管理、课程管理、成绩管理、奖 惩管理等。学生管理系统是一个典型的数据库应用程序，由学生档案管理、课程管理、成绩 管理、奖惩管理等模块组成，特规划如下：1.3. 1用户管理模块(ctrl+a):该模块的主耍任务是维护系

12、统的正常运行和安全性设置，包括添加用户、修改密码、删除用户 等等。1.3.2班级管理模块(ctrl+c):该模块的功能是实现对全系班级的管理工作，包括：班级信息添加、班级信息修改、班级信 息删除，这三个功能模块各自独立，完成班级信息的管理。1.3.3学生档案管理模块(ctrl+d)：该模块的主要功能是实现对学生的个人信息的管理工作，包插档案添加、档案修 改、档案查询、删除等功能，从而方便学校管理部门对学校的基木情况的快速查询和 了解。1.3.4课程管理模块(ctrl+e)：该模块对各个班级的课程进行设置，方便了学校教务处的教学管理人员的工作。 该模块包括基木课程添加和班级课程设置两个模块。1.

13、3.5成绩管理模块(ctrl+f)：学校的成绩管理工作是检验学生学习情况的一个主耍手段，本模块包括成绩添加、成绩修改、 成绩查询、删除等功能模块。1.3.6奖惩管理模块(ctrl+g)：奖惩管理工作是检验学生在校综合表现的一个方式，本模块包括奖项添加、学生获奖 设直等到功能模块。1.3.7报表打印模块(ctrl+j)：该模块是方便管理人员打印相关信息，包括打印班级信息、学生学藉信息、学生成绩、 学牛获奖情况等模块。1.3.8帮助模块该模块为首次操作该系统的人员提供了方便，它提供了有关操作的信息以及系统的版权。1.4系统开发的目标出于木系统是学校学生管理的一个综合性的系统，系统开发的总体任务是实

14、现学 生管理系统化、规范化，系统设计目标将最终定位于完成以上所述的系统主要业务的 基木模型上。以提高工作效率为目的。2系统分析2.1业务流程分析班级管理业务流程图：学牛图21档案管理业务流程图:学牛图22课程管理业务流程图：学生图23 成绩管理业务流程图：学生图242. 2数据流程分析：数据流程图：由于本系统的数据模块较多，下面仅以学生成绩管理模块为例来进行编制。学生成绩管理系统0层数据流程图：图25学生成绩管理系统1层数据流程图:1、数据模型设计。首先来做出学生成绩管理系统的er图，分析这个问题的实 体，从系统分析可以知道，学生的成绩是曲任课教师按照课程给出的，学生、课程、 教师组成了这个系

15、统的三个实体。2、再分析三个实体之间的联系。首先，这三个实体不是一个统一体，学生成绩 与教师没有内在联系，教师必须通过课程实体才能与学生建立联系，因而先不考虑。 课程与学生这两个实体是多对多联系；一位学生要学习多门课程，一门课程冇多位学 生共同学习。而学习成绩是这两个实体“学生”和“成绩”共有的属性，应填在二者 的联系“学习”边。因为成绩既不是学生独有的，也不是课程独冇的而是学生和课程 二者共有的。这个e-r图可画成下图。学生管理系统中学生与课程的e-r图：成绩7学生与班级的er图:教师与课程的e-r图:图29实体z间关系er图:图 210教师与课程的e-r图组合到一起,得到最后的e-r图，有

16、了 er图，就可以设计数据库。下图为数据模型图。实体模型数据模型数据库图 2112. 4功能分析：功能层次图图 2123系统设计3.1软件模块结构设计311系统方案确定通过对系统的调研与分析，系统主要应完成的功能有：班级管理、学生成绩管 理、学生交费管理、课程管理、成绩管理、系统管理等功能。3. 1. 2软件结构设计系统总体设计：cc班级课程（各班相关课程）；cf班级信息（各班的资料）；cuf课程信息（各门课程资 料）；pf奖惩信息（奖惩信息）；ps奖惩情况（获奖人员情况）；sf成绩（学生成绩）；stf 学生信息（学生的资料）；uf用户信息（用户名和密码）1用户 管理课程成绩奖惩打印管理筲理符

17、理报表帮 助班级管理学藉 倉理输入数据输入数据更新信息输入数据更新信息输入数据更新课程输入数据更新成绩输入数据更新信息输入数据打 印帮助信息更新用户图31代码设计：学号：xx xx xxx班级编号：-xt t t'年级专业编号年级编号输出设计:乩确定输出内容：输出的内容主要是系统给出对用户进行的分析结果，其中包括用户的基木信息， 选课情况，成绩单，成绩趋势表等。b. 确定输出设备及介质：我们拟定采用打印机为主要输出设备，打印出来的内容可以供以后用户随时随地 查阅分析。c. 确定输出格式：采用类似报表的形式输出，分表头，表体和表尾。报表的输出，可以根据用户的 需求采用不同形式。对于单个用

18、户一次性使用的表格，因为没有保留价值，可以在显 示终端上输出。对于个用户需要多次使用的表格，可打印输岀。需要长期保留的输出 的报表，可采用磁盘文件形式输出，以便保存。输入设计：输入设计的目的是保证向系统输入正确的数据。在此前提下，应做到输入方法简 单，迅速，经济，方便。所以，因该遵循最小量原则，也就是保证满足处理要求的前 提下，使输入量最小，这样出错几率小；简单性原则，输入的准备，输入的过程应尽 量容易，以减少错误发生。早检验原则，对数据的检验尽量接近原数据发生点，使错 误能及吋得到改正；少转换原则，输入数据尽量用其处理所需形式记录，以避免数据 转换介质吋发生错误。3. 2数据库设计在关系数据

19、库屮的关系必须满足一定的耍求。满足不同程度耍求的为不同范式。 口前主要有六种范式：第一范式、第二范式、第三范式、bc范式、第四范式和第五 范式。在这六种范式屮，一般只用前三种，对于常用系统就足够了。而且这五种范式 是“向上兼容”的，即满足第五范式的数据结构自动满足一、二、三、四范式，满足 第四范式的数据结构自动满足第一、二、三范式，依此类推。简单的介绍前三 种范式。第一范式(first normal form,简称1 st nf)就是指在同一表屮没冇重复项出现，如 果有则应将重复项去掉。这个去掉重复项的过程就称z为规范化处理。在本文所讨论 的开发方法里，istnf实际上是没有什么意义的。因为我

20、们按规范化建立的指标体系 和表的过程都口动保证了所有表都满足1st nfo第二范式(second normal form,简称2nd nf)是指每个表必须冇一个(而11仅一个)数 据元素为主关键字(primary key),其它数据元素与主关键字一一对应。即表中其它 数据元索都依赖于主关键字，或称该数据元索唯一地被主关键字所标识。第三范式(third normal form,简称3rd nf)就是指表中的所有数据元素不但耍能 够唯一地被主关键字所标识，而且它们之间还必须相互独立，不存在其它的函数关系。 也就是说对于一个满足了 2nd nf的数据结构來说，表中有可能存在某些数据元素依 赖于其它非

21、关键字数据元索的现象，必须加以消除。此外，在这过程中耍注意好表的主键、外键、用户自定义约束的条件，在模式分解过 程中要尽量的保持函数依赖和无损联接。遵循上述说明，就可以设计出一个良好的关 系数据库模式。考虑到我们暂时制作的是一个简单的桌面数据库系统，不需耍网络的支持，因此 我们采用的是access的数据库，他功能强大，简单易用。我们整个程序只需一个数据 库(db.dbf),库中有8张物理表。student 表字段名类型宽度限制student_no文本20不能为空student_name文本1()不能为空student_sex文本2不能为空student_bir短日期不能为空student_ci

22、a文本20不能为空student_tel文本13不能为空student_esd短日期不能为空student_add文本60不能为空student_rem备注不能为空class_cour 表字段名类型宽度限制class_no文本20不能为空course_name文本20不能为空class 表字段名类型宽度限制class_no文本20不能为空course 表prize 表score 表prize_stud 表user 表class name文本10不能为空class_teacher文本10不能为空class_remarks文本不能为空字段名类型宽度限制course_name文本20不能为空cour

23、se_rem备注60不能为空字段名类型宽度限制prize name文本20不能为空prize rem备注60不能为空字段名类型宽度限制score_no文本14不能为空score_per文木20不能为空score_cla文本20不能为空score_stu文本20不能为空score_cou文木20不能为空score_sco文本20不能为空字段名类型宽度限制prize no文本14不能为空prize stu文木20不能为空prize dat短ii期10不能为空prize nam文本20不能为空字段名类型宽度限制user_id文本20不能为空user pwd文本20不能为空user_date短日期不能

24、为空4. 系统的功能本部分主要内容为本系统的运行界面以及主要界面的源代码。4. 1系统登陆界面：本界面的主要功能是为了对系统进行安全性管理，本系统的用户名和密码保存在 user表中，本系统根据不同的用户而设置了不同的权限，可以用为用户名 和密码来登陆本系统。option explicitprivate declare function getusername lib "advapi32.dll" alias "getusernamea" (byvai lpbuffer as string, nsize as long) as longpublic ok

25、as booleandim txtsql as stringdim mrc as adodb.recordsetdim msgtext as stringdim micount as integerprivate sub form_load()dim i as integeri = 0txtsql = hselect * from user_formnset mrc = executesql(txtsql, msgtext)with txtusernamedo while not mrc.eofi = i + 1 additem trim(mrc !user_id)mrc.movenextlo

26、oplistindex = i - 1end withmrc.closeok = falsemicount = 0end subprivate sub cmdcancel_click()ok = falseme.hideend subprivate sub cmdok_click()txtsql= nselect * from user_form where user_id = h, & txtusername.text & ntnset mrc = executesql(txtsql, msgtext)if mrc.eof = true thenmsgbox ”没冇这个用户，

27、请重新输入用户名!”, vbokonly + vbexclamation," 嚳告”txtusername.setfocuselseif trim(mrc.fields( 1) = trim(txtpassword.text) thenok = truemrc.closeme.hideusernanie = trim(txtusername.text)elsemsgbox "输入密码不正确，请重新输入！ ”, vbokonly + vbexclamation, 艸警告汁txtpassword.setfocustxtpassword.text = n"end ife

28、nd ifmicount = micount + 1if micount = 3 thenme.hideend ifexit subend subprivate sub txtpassword_keydown(keycode as integer, shift as integer)entertotab keycodeend subprivate sub txtpassword_keypress(keyascii as integer)if keyascii = 13 thencall cmdok_clickend ifend subprivate sub txtusername_click(

29、)txtpassword.text =end subprivate sub txtusername_keydown(keycode as integer, shift as integer)entertotab keycodeend sub4. 2用户管理模块：本模块是本系统的安全性设置模块，根据学校不同部门以及不同使用人员对本系 统的要求和需要，从而实行了分级管理，对用户的权限和类别进行了分类管理。private sub command 1 _click()dim txtsql as stringiftextl(0) = nn thenmsgbox ”用户名称不能为空vbokonly, ”提

30、示”text 1(0).setfocusexit subend ififtextl(l) = hh thenmsgbox ”用户密码不能为空!n, vbokonly, “提示”text 1(1).setfocusexit subelseif textl (1)<> text 1(2) thenmsgbox ”两次密码输入不同!”, vbokonly, ”提示”textl(l) = ,h,textl(2) = ”text 1(1).setfocusexit subend ifend iftxtsql = "select * from user_fonn where user

31、_id=,n & trim(textl(o) &set mrc = executesql(txtsql, msgtext)if mrc.eof = false thenmsgbox ”此用户名已经存在!h, vbokonly, ”警告”text 1(0).setfocusexit subend ifmrc.closetxtsql = "select * from user_formnset mrc = executesql(txtsql, msgtext)mrc.addnewmrc.fields(o) = trim(textl(0)mrc.fields(l) = tr

32、im(textl(l)mrc.fields(2) = nowmrc. updatemrc.closefor i = 0 to 2textl(i) = nnnextmsgbox ”用户信息添加成功!n, vbokonly,h提示”listappend subprivate sub command2_click()textl(0) = ,m,textl(l) = ,m,text 1(2) =,nend subprivate sub command3_click()dim txtsql as stringiftextl(3) = nn thenmsgbox ”请你选择用户名称vbokonly, ”提

33、示”listlsetfocusexit subend ififtextl(4) = ,h, thenmsgbox ”修改密码要旧密码!h, vbokonly,n警告,textl(4).setfocusexit subend ififtextl(5) = nn thenmsgbox ”新的密码不能为空vbokonly, ”提示”textl(5).setfocusexit subelseif text 1(5) <> text 1(6) thenmsgbox ”两次密码输入不同!h, vbokonly,n提示”textl(5) = ,htextl(6) = ,h,textl(5).se

34、tfocusexit subend ifend iftxtsql = "select * from user_form where user_id=,h & trim(textl(3) & '"and user_pwd=,h & trim(textl(4) &set mrc = executesql(txtsql, msgtext)if mrc.eof = false thentxtsql = "delete from user_form where user_id=n, & trini(textl(3) &

35、elsemsgbox ”用户密码输入错误vbokonly, ”警告”textl(4).setfocusexit subend ifset mrc = executesql(txtsql, msgtext)txtsql = "select * from user_formnset mrc = executesql(txtsql, msgtext)mrc.addnewmrc.fields(o) = trim(textl(3)mrc.fields(l) = trim(text 1(5)mrc.fields(2) = nowmrc.updatemrc.closefor i = 3 to 6t

36、extl(i) = ,h,nextmsgbox ”用户信息修改成功vbokonly, ”提示”end subprivate sub command4_click()textl(3) = ,m,textl(4) = ,m,textl(5) = ,m,textl(6) = ,m,end subprivate sub command5_click()dim txtsql as stringiftextl(7) = ,h, thenmsgbox ”请你选择用户名称!h, vbokonly, ”提示”listl.setfocusexit subelseif text 1(7) = username th

37、enmsgbox ”不可以删除正在使用的用户vbokonly, ”警告”textl(7) = ,h,text 1(8) = ,m,listl.setfocusexit subend ifend ififtextl(8) = nn thenmsgbox ”删除用户需要密码!”, vbokonly, ”警告“textl(8).setfocusexit subend iftxtsql = "select * from user_form where user_id='" & trim(textl(7) & '"and user_pwd=,

38、h & trim(textl(8) &set mrc = executesql(txtsql, msgtext)if mrc.eof = false thentxtsql= "delete from user_form where user_id=n, & trini(textl(7) & elsemsgbox ”用户密码输入错误vbokonly, ”警告”textl(8).setfocusexit subend ifset mrc = executesql(txtsql, msgtext)textl(7) = ,ntext 1(8) =msgbox

39、”用户信息已经删除!h, vbokonly,n提示”listappend subprivate sub command6_click()textl(7) = ,ntext 1(8) =end subprivate sub form_load()me.caption = ”用户信息>添加”picture 1( l).top = picture l(0).toppicture 1(1).left = picture 1(0).leftpicture l(2).top = picture l(0).toppicture i (2).left = picture 1(0).leftlistapp

40、for i = 0 to 2label2(i).backcolor = & he0e0e0picture i (i). visible = falsenextlabel2(0).backcolor = &hffffffpicture 1(0). visible = trueend subprivate sub label2_click(index as integer)me.caption = n 用户信息”me.caption = me.caption & "->n & trim(label2(index).caption)for i = 0

41、to 2label2(i).backcolor = & he0e0e0picture l(i). visible = falsenextlabel2(index).backcolor = &hffffffpicture 1 (index). visible = truefori = 0to8textl(i) = ,h,nextend subprivate sub listappodim txsql as stringdim mrcc as adodb.recordset txsql = ''select * from user_form" set mr

42、cc = executesql(txsql, msgtext)list 1.cleardo while not mrcc.eoflistl.additem trim(mrcc!user_id) mrcc.movenextloopmrcc.closeend subprivate sub listl_click()if picturel(l).visible = true thentext 1 (3) = listl .textend ifif picture 1(2). visible = true thentext 1(7) = listl.textend ifend subprivate s

43、ub list 1 _keydown(keycode as integer, shift as integer) entertotab keycodeend subprivate sub text 1 _gotfocus(index as integer)text 1 (index).selstart = 0text 1 (index).sellength = len(textl (index)end sub4. 3学藉管理模块:因为木系统中有些功能模块具有相似z处，因此在本文只用此模块进行一个简单 的说明。其它的相似模块的代码可以参阅本模块的设计思路。private sub textl_ch

44、ange(index as integer)if index = 0 thentxtsql = "select * from student_form where student_no=n, & trim(textl(o)&set mrc = executesql(txtsql, msgtext)if mrc.eof = false thenfor i = 1 to 6textl(i) = mrc.fields(i)nextpicture 1. visible = trueelsepicture 1. visible = falsefor i = 1 to 6text

45、l(i)二”nextend ifmrc.closetxtsql = "select * from prize_stud where prize_stu='" & trim(textl(o) & n,n set mrc = executesql(txtsql, msgtext)if mrc.eof = false thenwith msflexgridl.rows = 1do while not mrc.eof.rows = .rows + 1for i = oto mrc.fields.count - 1select case mrc.fields(

46、i).typecase addbdate.textmatrix(.rows - 1, i) = format(mrc.fields & ”"，"yyyy-mm-ddn)case else.textmatrix(.rows - 1, i) = mrc.fields(i) & ”"end selectnext imrc.movenextloopend withmrc.closemsflexgrid 1 .visible = trueelsemsflexgrid 1 .visible = falsewith msflexgrid 1 clear cols

47、 = 4.colwidth(o) = 0.colwidth(l) = 0.colwidth(2) = 1700.colwidth(3)= 1700.textmatrix(0, 2)二”奖惩日期”.textmatrix(0, 3)二”奖惩名称”.rows = 1end withend iftxtsql = "select * from score_form where score_stu=m' & trim(textl(0) & ”set mrc = executesql(txtsql, msgtext)if mrc.eof = false thenwith m

48、sflexgrid2.rows = 1do while not mrc.eof.rows = rows + 1for i = oto mrc.fields.count - 1select case mrc.fields(i).typecase addbdatetextmatrix(.rows - 1, i) = format(mrc.fields(i) & ”"，"yyyy-mm-dd")case else.textmatrix(.rows - 1, i) = mrc.fields(i) & ”"end selectnext imrc.m

49、ovenextloopend withmrc.closemsflexgrid2. visible = trueelsemsflexgrid2. visible = falsewith msflexgrid2.clear.cols = 6.colwidth(o) = 0.colwidth(l)= 1550.colwidth(2) = 1550.colwidth(3) = 0.colwidth(4) = 1550.colwidth(5)= 1550.textmatrix(0, 1)二”考试期号”.textmatrix(0, 2)二”学生班号”.textmatrix(0, 4)二”考试课程”.tex

50、tmatrix(0, 5)二”考试分数”.rows = 1end withend ifprivate sub showdata()set mrc = executesql(txtsql, msgtext)with msflexgridl.rows = 1do while not mrc.eof.rows = .rows + 1for i = 0 to mrc.fields.count - 1select case mrc.fields(i).typecase addbdatetextmatrix(.rows - 1, i) = format(mrc.fields(i) & ”，&quo

51、t;yyyy-mm-ddn)case else.textmatrix(.rows l,i) = mrc.fields & ”end selectnext imrc.movenextloopend withmrc.closeend sub5. 运行及调试学生管理系统建立后，应装入数据，进入试运行及调试阶段。装入数据：往数据库屮装入数据乂称为数据库加载。由于数据库屮通常包含着不同格式、规 格的数据，所以在加载z前要对这些数据作严格地检验、整理，并建立严格的数据登 录和校验规范，设计出完善的数据检验和校正程序，尽可能在加载之前把不合格的数 据排除掉。然后，将数据装入数据库。试运行及调试：这个

52、阶段的工作主要是实际运行学生管理应用程序，进入学生管理系统登录界 面，输入正确的用户名和口令，单击确定进入主菜单。在前一阶段，虽然也作了性能预测，但是仅仅做了性能估计，冃在估计过程屮， 做了许多简化和假设，忽略了许多次要因索，因而估计是粗糙的，并可能失真。在试 运行阶段，必须进行实际测量和评价，测试数据尽可能覆盖现实世界的各种情况。如果实际测试结果不符合设计目标，则需返回物理设计阶段，修改参数。有时也 许述需要返回初始阶段。程序运行成功。完成了课题题目所要求大部分功能但述有报表打印等部分功能尚 未实现。系统数据结构的设计比较适合查找。程序的界而友好能方便用户的操作。6. 全文总结本次课程设计是

53、本人第一次做较为大的系统，应用到了信息系统的设计思想，使 理论和实践能得以结合。同时在设计中也碰到了许多问题，为解决问题，我查了不少 资料，扩展了思路,对系统设计的全过程有了一个更为深入的认识和了解。系统要注意程序的结构化设计，功能模块化。进行设计的时候，应该首先分析问 题，设计数据结构。只有在数据结构都设计好了的基础上才可能实现各种操作。所以, 数拯结构的设计非常重要。系统分析和设计的思想在系统编写过程的应用要注意。这样的系统最好能采用结 构化的方法，这样做能让系统开发更加有条理，更有效率,并且不容易岀错。它是编写系 统要注意的问题分解和逐步求精方法。在这次的课程设计过程中，我得到了很好的锻炼。从一点点思想到流程图再到整 个系统编写，调试，无一不花费了我许多的糟力。看着自己的劳动成杲，感到十分的 欣慰，更认识到自己许多的不足。今后的学习过程中要不段的积累经验，开阔思维以 得到提高。尽管本管理系统存在着很多不足，但其功能全面、易于r后程序更新、数据库管 理容易、界面友好、操作方便、效率高、安全性好等优点是木管理系统所必需的。相 信本学生管理系统是一套学校在f1常管理中必不可少的管理软件，通过开发这个系 统，我掌握了的项木过程，了解了的基本知识巩固了我对visual basic 6.0的学习， 但在这次毕业设计中的最大收获并不是掌握这几门开发