《学生信息管理系统论文.doc》由会员分享，可在线阅读，更多相关《学生信息管理系统论文.doc（56页珍藏版）》请在三一办公上搜索。
1、 毕 业 论 文 论文题目 学生信息管理系统 学 院 资源环境学院 专 业 信息管理与信息系统 年 级 2006级061班 姓 名 指导教师 段永红 职 称 （2010年6月）山西农业大学教务处制学生信息管理系统摘要：随着信息技术在管理上越来越深入而广泛的应用，管理信息系统的实施在技术上已逐步成熟。管理信息系统是一个不断发展的新型学科，任何一个单位要生存要发展，要高效率地把内部活动有机地组织起来，就必须建立与自身特点相适应的管理信息系统。本文介绍了在Visual Basic6.0环境下采用“自上而下地总体规划，自下而上地应用开发”的策略开发一个管理信息系统的过程。通过分析某一学校学生管理的不足
2、，创建了一套行之有效的计算机管理学生的方案。文章介绍了学生管理信息系统的系统分析部分，包括可行性分析、业务流程分析等；系统设计部分主要介绍了系统功能设计和数据库设计及代码设计；系统实现部分说明了几个主要模块的算法， 本系统界面友好，操作简单，比较实用。【关键字】：管理信息系统、学生管理、Visual Basic应用。毕业设计论文外文摘要学生信息管理系统Abstract：With more and more widespread and profound application of information technology in management, the implement of m
3、anagement information system has become mature in technology step by step. Managing information system is a new subject. Enterprise needs existence and development, so enterprise activities should be organized efficiently and organically, which means tightening up the enterprise management and stren
4、gthening effective management of any resource (staff, finance, property, etc.) internal the enterprise, and also establishing a management information system fitting in with its own characteristics.This article introduces the detailed process of exploring a management information system under the en
5、vironment of visual foxpro, utilizing “Top-Bottom” overall plan and a strategy according to “Bottom-Top” application and exploitation. That is to establish a set of effective scheme for student management by computer, through analyzing disadvantages of student management by human resources. This art
6、icle emphasizes on three sections. The system analysis section of student management information includes feasible analysis, management function analysis.The system design section mainly focuses on system function design and data base design and data number design. And the system realization section
7、 has provided several major function , together with the main windows and programs.This economical and pragmatic system has explicit interface, with simple operation.Keywords ：MIS、student management、visual basic application目 录摘 要IAbstractII第1章 绪论12.系统概述32.1现有系统分析32.2可行性分析32.3 开发工具简介42.3.1 Visual Bas
8、ic 6.0 简介42.3.2 Microsoft SQL 2000 简介52.4 系统的功能简介52.5系统开发的目标63. 系统分析73.1业务流程分析73.2 数据流程分析83.3数据存储分析94.系统设计114.1软件模块结构设计114.1.1 系统方案确定114.1.2 软件结构设计114.2 数据库设计114.2.1 系统E-R图124.2.2 各表的物理结构145.系统的实现175.1 系统登陆界面175.2系统主界面195.3用户管理模块295.4学生缴费管理模块34结 论43致 谢44参考文献45第1章 绪论 信息管理系统（MIS）1的概念是1961年美国人J.D.GALLA
9、GHER首先提出来的，是一门新兴的、集管理科学、信息科学、系统科学及计算机科学为一体的综合性学科，研究的是企业中信息管理活动的全过程，以便有效的管理信息，提供各类管理决策信息，辅助企业进行现代化管理。信息管理系统，具备数据处理、计划、控制、预测和辅助决策功能，用统一标准处理和提供信息，排除使用前后矛盾的不完整的数据。完整、及时提供在管理及决策中需要的数据。向各级管理机构提供不同详细程度的报告，缩短分析和解释时间。用最低的费用最短的时间提供尽可能精确、可靠的信息。国外状况:据统计，目前，美国在财务会计上占有90%的工作由计算机完成；人事管理中80-100%的信息处理由计算机完成；计划管理是809
10、0%；在计算机应用发展较快的国家中，计算机应用于经济管理的占80%；用于科技计算的占8%，用于生产过程控制的占12%；由此可以看出，信息管理是计算机应用的主要领域。国内状况:由于种种原因，我国的信息资源建设水平远远落后于信息基础设施的建设的水平。长期以来，我国信息资源的开发管理未能与信息资源的增长同步进行。我国有丰富的原始信息资源，但在此基础上再生的二次信息系统和数据库产业的规模和市场占有率、使用率相当低，大量的有价值的信息未能进一步加工成商品使其增值。我国的计算机应用要比西方国家落后十几年，人事管理等信息系统的开发应用是从1973年开始的，83年以后才开始了大量的实际的开发和研究工作。因此，
11、信息资源的开发和利用已被确立为国民经济信息的核心内容，信息数字化，传输的网络化是缩小发展中国家与发达国家差距的捷径，世界信息化浪潮正以不可阻挡之势席卷全球时，我国要迎头赶上，就必须利用现有的信息基础设施，重点开发和推广应用于各类科技经济等数据库和网络资源服务系统，以便取得巨大的社会效益和经济效益。由于物业管理在社会大生产中占用重要地位，其计算机化在发达国家已达到95%以上，而我国在全国范围内推广计算机在管理中的应用，是在80年代初开始的。起步虽晚，但发展快。特别是微型计算机的出现和普及，为信息处理提供了物美价廉的手段，对于推动我国管理信息处理现代化起到了重要作用。学生信息管理系统是用于校园内部
12、管理学生基本信息的一个不可缺少的部分，它的功能对于校内学生信息管理部门和管理者，组织和管理学生信息至关重要，所以学生信息管理系统应该能为管理者提供有效和快捷的管理方式。一直以来学校内部使用传统的人工录入学生信息的管理方式，这种方式存在着许多缺点，如：效率低、不准确，而且时间长了，对于查找、更新和维护这些学生信息都带来一定的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已被人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分,使用计算机对学生信息进行管理，具有手工管理所无法比拟的优点。例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命
13、长、成本低等。这些优点能够极大地提高学生信息管理部门的工作效率，也是校园的科学化、正规化管理信息,与时代接轨的重要条件。因此，开发这样一套管理软件成为很有必要的事情。系统设计采用功能模块化设计，结合当前的数据库技术，使得管理系统虽然功能强大，但操作并不复杂，这正迎合了软件发展的需求，即简单易用。使得信息管理者从以前的繁忙工作中解脱出来，轻松完成学生信息的管理。2.系统概述2.1现有系统分析1 工作负荷由于数据量越来越大，现有的系统已明显不能适应目前的庞大数据量，系统工作负荷过大。2 费用支出由于现有系统的工作负荷严重超载，在现有系统上投入的人力，设备，空间，材料，等等与其他的一系列支持性服务越
14、来越大，导致开发费用支出巨大，严重影响系统的可用性，急需改进。3 人员和设备鉴于原有系统的技术性含量比较低，故不需要多少高技术人员的操作，只是由于数据量的日益扩大，所需要的操作人员数量不断增大。这一点已不再适应目前信息化时代的步伐。设备的科技含量也比较低，没有达到大量的计算机普及程度。 4 局限性经过严谨的分析，可知原有的系统存在很大的局限性，比如技术的过于陈旧，人员工作负荷大，系统维护及费用支出巨大，人员与设备技术含量低等等一系列缺点，所有这些都明确了需要一个新的适应新的信息化时代的高科技的系统。所以开发这样一个系统还是很有必要的。2.2可行性分析考虑到项目时间、资源等因素，在实际开发该计算
15、机系统时，常常要为资源不足和交付日期难以完成而苦恼，因而需要慎重地尽可能早地估价研制课题的可行性。可行性研究包括：经济可行性、技术可行性、法律可行性、操作可行性等等。(1) 经济可行性分析经济可行性分析中最重要的内容之一是成本效益分析。对于一个基于计算机系统的研制项目要在经济方面评价其是否合理，成本效益分析要估计出系统研制开发的花费并与收益（包括有形的可以用货币计数的及无形的利益）衡量比较。作为毕业设计，我们所受到的效益，应该说是收益终生，而花费则寥寥无几，因为学校提供实验室。(2) 技术可行性分析就目前使用的开发技术来说,系统的功能目标能够达到；利用现有的技术在规定的期限内开发工作基本能够完
16、成。(3) 法律可行性分析法律可行性是考虑要开发系统是否存在任何侵犯、妨碍和责任问题，用户操作可行性考虑待开发软件的运行方式在用户组织内是否行得通，现行管理制度、人员素质、操作知识是否可行。作为毕业设计所需要的仅仅是人员素质和操作知识的要求。(4) 操作可行性分析操作可行性主要是指用户使用的舒适性，因此界面设计时要充分考虑管理人员的习惯，使得操作简单便宜；数据录入迅速、规范、可靠；统计准确，制表灵活，适应力强，容易扩充。具有易用性、灵活性、开放性与可视性等，这些可以实现。由以上经济、技术、法律、操作四方面的分析可以看出，本系统的开发时机成熟，从多种角度考虑，都是可行的，采用本系统，能够使整个系
17、统内部所有信息的工作简化，提高工作效益。由于采用统一的数据信息，使相关资料能够快速地查询所需的数据、资料及其它信息的，使信息快速高效运行。2.3 开发工具简介2.3.1 Visual Basic 6.0 简介Visual Basic 6.0是Microsoft公司开发的面向对象程序设计平台，它简单易学，继承了Basic语言的优点，采用窗体截面和事件驱动，深化了程序设计计者对windows环境下程序设计的理解。可视化的用户界面设计功能，可以使得程序设计人员从烦琐复杂的界面设计中解脱出来。它支持win32下所有的API函数，可以方便的为windows开发程序，而且提供了代码优化技术，使得代码更加简
18、洁。还可以用它来开发自己的ActiveX组件。Visual Basic 6.0的数据库处理能力也很强大，虽然它不是专门的数据库开发系统，但在数据库设计方面也提供了强大的功能和丰富的工具，可以满足编程人员的需求。它提供的DAO、RDO、ADO等多种与数据库相联系的方法并可与SQL Server、Access、Sybase2等多种数据库系统想关联，使之为数据库编程，以及操纵数据库。并且支持Web开发。2.3.2 Microsoft SQL 2000 简介SQL Server2000是由Microsoft公司开发的关系数据库管理系统。区别于FoxPro、Access小型数据库，SQL Server是
19、一个功能完备的数据库管理系统。它包括支持开发的引擎、标准的SQL语言、扩展的特性(如复制、OLAP3、分析)等功能。而像存储过程、触发器等特性，也是大型数据库才拥有的。SQL Server提供了在服务器系统上运行的服务器软件和在客户端运行的客户端软件，连接客户和服务器计算机的网络软件则由Windows NT/2000提供。SQL Server建立于Microsoft Window NT的可伸缩性和可管理性之上，提供了功能强大的客户服务器平台，高性能客户服务器结构的数据库管理系统可以将Visual Basic、Visual FoxPro、Visual C+作为客户端开发工具，而将SQL Serv
20、er作为存储数据的后台服务器软件。本学生信息管理系统可以说是一个综合性的学校学生管理系统，这它集成了学生学籍管理系统、学生成绩管理系统、学生档案管理系统、学生缴费管理系统等多种功能，因而具有较强的实用性和先进性。2.4 系统的功能简介本系统主要可以实现以下的管理功能：班级管理、学生档案管理、学生交费管理、课程管理、成绩管理等等。项目规划学生信息管理系统是一个典型的数据库应用程序,由班级管理、学生档案管理、学生交费管理、课程管理、成绩管理等模块组成,特规划如下:系统管理模块(CTRL+O)该模块的主要任务是维护系统的正常运行和安全性设置,包括添加用户(快捷键：CTRL+A)、修改密码(快捷键：C
21、TRL+B)、重新登录(快捷键：CTRL+F1)等等。班级管理模块（CTRL+P）：该模块的功能是实现对全校班级的管理工作，包括：班级游览、班级添加、班级查询等，这三个功能模块各自独立，完成学校的全部班级的管理。学生档案管理模块（CTRL+T）：该模块的主要功能是实现对学生的个人信息的管理工作，包括档案添加、档案浏览、档案查询等功能，从而方便学校管理部门对学校的基本情况的快速查询和了解。课程管理模块（CTRL+R）：该模块对各个班级的课程进行设置，并可在其中设置各门课程的教材选用情况，方便了学校教材管理部门和教务处的教学管理人员的工作。该模块包括基本课程设计和班级课程设置两个模块。成绩管理模块
22、（CTRL+F）学校的成绩管理工作是检验学生学习情况的一个主要手段，本模块包括考试类型设置，共有期中考试和期未考试两种类型，还设置了成绩添加、成绩游览、成绩查询等功能模块。2.5系统开发的目标出于本系统是学校学生管理的一个综合性的系统，本系统的设计目标将最终定位于完成以上所述的系统主要业务的基本模型上。3. 系统分析3.1业务流程分析班级管理业务流程图：教务处输入计算机班主任教务处学生班级班级输出档案管理业务流程图：教务处输入计算机班主任教务处学生档案档案输出课程管理业务流程图：教务处输入计算机教师教务处学生课程输出课程成绩管理业务流程图：教务处输入计算机教师教务处学生成绩教师输出教务处输入计
23、算机班主任教务处学生班级班级输出3.2 数据流程分析3.2.1数据流程图由于本系统的数据模块较多，下面仅以学生成绩管理模块为例来进行编制。学籍管理部门教师学生成绩管理系统教务处学生教师教师学生情况学生成绩查询统计分析学生成绩管理系统0层数据流程图管理部门教务处教师1.0学生管理2.0课程管理3.0成绩管理4.0统计分析D1D2D3查询者管理者学生课程成绩学生成绩管理系统1层数据流程图3.3数据存储分析1、数据模型设计。首先来做出学生成绩管理系统的E-R图，分析这个问题的实体，从系统分析可以知道，学生的成绩是由任课教师按照课程给出的，学生、课程、教师组成了这个系统的三个实体。2、再分析三个实体之
24、间的联系。首先，这三个实体不是一个统一体，学生成绩与教师没有内在联系，教师必须通过课程实体才能与学生建立联系，因而先不考虑。课程与学生这两个实体是多对多联系；一位学生要学习多门课程，一门课程有多位学生共同学习。而学习成绩是这两个实体“学生”和“成绩”共有的属性，应填在二者的联系“学习”边。因为成绩既不是学生独有的，也不是课程独有的；“学生甲70分”或“英语70分”是不完全的，说“学生甲英语70分”才是正确的，因为70分是学生甲和英语课二者共有的。这个E-R图可画成下图。学生课程成绩学习mn学生成绩管理系统中学生与课程的E-R图教师与课程这两个实体之间，是一对多联系；一位教师可以都多门课程，而一
25、门课程对于学生成绩来说只能有一位教师(英语、高等数学有多位教师教，但对某个固定的学生来说只能有一位教师)。其E-R图，如下所示。n教师课程教学l教师与课程的E-R图组合到一起，得到最后的E-R图，有了E-R图，就可以设计数据库。下图为数据模型图。学生课程教师学习学习课程学生教师实体模型数据模型数据库学习lnmm4.系统设计4.1软件模块结构设计4.1.1 系统方案确定通过对系统的调研与分析，系统主要应完成的功能有：班级管理、学生成绩管理、学生交费管理、课程管理、成绩管理、系统管理等功能。4.1.2 软件结构设计本系统在执行时，先根据不同的操作人员的需要来进行相应的模块，然后可以输入数据或者进行
26、其它的查询或浏览等操作；总体来说，本系统属于一个事务型管理系统。接受数据处理中心班级管理档案管理交费管理课程管理成绩管理打印报表 图4-1 4.2 数据库设计数据库采用了Microsoft推出的SQL Server数据库，使用SQL Server的好处还在于，如果你的系统扩展到Client/Server模式的时候，可以使用Microsoft的数据库服务器软件SQL Server，此时，程序只需要简单的修改一下链接（ADO的数据源）就可以，这样，为程序的平滑扩展提供了非常有力的条件。4.2.1 系统E-R图本系统中所涉及到的主要实体共有8个数据表allkecheng表：课程名称，教材cj表：学号
27、，学期，类型，课程名称，分数class表：年级，班级，教室，年制，专业，班主任，备注classkecheng表：年级，专业，年制，学期，课程名称jf表：学号，学期，交费，欠费，日期，操作员kaoshileixing表：类型use表：username,password,admin,readonly,qx1,qx2,qx3,qx4xj表：学号，姓名，性别，班级，出生年月，家庭住址，邮政编码，联系电话，入学时间，备注suefei表：年级，专业，年制，学期，学费系统各E-R图：课程表课程名称教材图4-2 课程表E-R图成绩表学号学期类型课程名称分数图4-3 成绩表E-R图班级年级班级教室年制专业班主任
28、备注图4-4 班级E-R图班级课程表年级专业年制学期课程名称图4-5班级课程表E-R图交费表学号学期交费欠费日期操作员图4-6交费表E-R图学籍学号姓名性别班级出生年月家庭住址E-Mail码联系电话联系电话 入学时间备注图4-7学籍E-R图学费表年级专业年制学期学费图4-8学费表E-R图4.2.2 各表的物理结构allkecheng表：字段名称类型宽度小数位课程名称文本20教材文本30Cj表：字段名称类型宽度小数位学号文本10学期文本50类型文本16课程名称文本20分数单精度型数字自动Class表：字段名称类型宽度小数位年级文本16班级文本20教室文本5年制文本8专业文本16班主任文本8备注备
29、注Classkecheng表：字段名称类型宽度小数位年级文本16专业文本12年制文本8学期文本50课程名称文本20Jf表：字段名称类型宽度小数位学号文本5学期文本50交费货币自动欠费货币自动日期日期/时间操作员文本10Kaosileixing表：字段名称类型宽度小数位类型文本10Use表：字段名称类型宽度小数位username文本20password文本20Admin文本2Readonly文本2Qx1文本2Qx2文本2Qx3文本2Qx4文本2xj表：字段名称类型宽度小数位学号文本9姓名文本8性别文本2班级文本10出生年月日期/时间家庭住址文本30邮政编码数字（长整型）联系电话数字（长整型）入学
30、时间日期/时间备注备注xuefei表：字段名称类型宽度小数位年级文本16专业文本50年制文本20学期文本40学费货币自动5.系统的实现本部分主要内容为本系统的运行界面以及主要界面的源代码。5.1 系统登陆界面本界面的主要功能是为了对系统进行安全性管理，本系统的用户名和密码保存在USE表中，本系统根据不同的用户而设置了不同的权限。 Private Sub Command1_Click()Dim mrc As ADODB.Recordsettxtsql = select username from use where username= & Trim(Text1.Text) & Set mrc =
31、 ExecuteSQL(txtsql)If mrc.EOF = True Then MsgBox 用户名错误！, vbExclamation + vbOKOnly, 警告 Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Exit SubEnd Ifusername = mrc.Fields(0)txtsql2 = select username from use where password= & Trim(Text2.Text) & Set mrc = ExecuteSQL(txtsql2)If mrc.
32、EOF = True Then MsgBox 密码错误！, vbExclamation + vbOKOnly, 警告 Text2.SetFocus Text2.SelStart = 0 Text2.SelLength = Len(Text2.Text) Exit SubEnd Iftxtsql = select username from use where username= & Trim(Text1.Text) & and password= & Trim(Text2.Text) & Set mrc = ExecuteSQL(txtsql)If mrc.EOF = True Then Ms
33、gBox 用户名称和密码不匹配！, vbExclamation + vbOKOnly, 警告 Exit SubEnd IfMDIForm1.Showfrmcpass.Text1.Text = Text1.TextUnload MeEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Text2.SetFocusEnd IfEnd SubPrivate
34、Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Command1.SetFocusEnd IfEnd Sub5.2系统主界面本模块是本系统的应用界面，在本界面上集成了本系统的所有功能，共有5个功能菜单和19个子菜单（功能模块），从而实现了本系统从班级管理、档案管理、课程管理、成绩管理等系统的具体功能，同时，在系统管理模块中可以完成对本系统的安全性管理。Private Declare Function SetWindowPos Lib user32 (ByVal hwnd As Long, ByVal hWndInsert
35、After As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As LongDim find1 As IntegerDim liulan1 As IntegerPrivate Sub add_Click()qxstr = Executeqx(2)If qxstr = false Or qxstr = readonly Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKO
36、nly, 警告) Exit SubEnd If Form1.Show modi = False Form1.ZOrder (0)End SubPrivate Sub cjadd_Click()fenshumodi = Falseqxstr = Executeqx(4)If qxstr = false Or qxstr = readonly Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd Iffrmcj2.Showfrmcj2.ZOrder 0End SubPrivate S
37、ub cjbrowse_Click()qxstr = Executeqx(4)If qxstr = false Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd Iffrmcj1.Showfrmcj1.ZOrder 0End SubPrivate Sub claasfind_Click()qxstr = Executeqx(2)If qxstr = false Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation +
38、 vbOKOnly, 警告) Exit SubEnd If Form4.Show Form4.ZOrder (0) i = SetWindowPos(Form4.hwnd, -1, 0, 0, 0, 0, 3)End SubPrivate Sub classapp_Click()qxstr = Executeqx(2)If qxstr = false Or qxstr = readonly Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd IfFormclass1.Show
39、classmodi = False Formclass1.classload Formclass1.ZOrder (0)End SubPublic Sub clabrowse()txtsql = select * from classFormclass2.ZOrder (0)Formclass2.Caption = 浏览班级设置Formclass2.classshowtitleFormclass2.classshowdataEnd SubPrivate Sub classbrowse_Click()qxstr = Executeqx(2)If qxstr = false Then ss = M
40、sgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd IfFormclass2.ShowEnd SubPrivate Sub classfind_Click()qxstr = Executeqx(2)If qxstr = false Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd If Formclass3.Show Formclass3.ZOrder (0)End SubPriv
41、ate Sub find_Click() End SubPrivate Sub classkecheng_Click()qxstr = Executeqx(4)If qxstr = false Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd IfFrmclasskecheng1.ShowFrmclasskecheng1.ZOrderEnd SubPrivate Sub denglu2_Click()Frmdenlu.ShowUnload MeEnd SubPrivate S
42、ub jiaofeiadd_Click()qxstr = Executeqx(3)If qxstr = false Or qxstr = readonly Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd IfFrmjf1.ShowFrmjf1.ZOrder 0End SubPrivate Sub jiaofeibrowse_Click()qxstr = Executeqx(3)If qxstr = false Then ss = MsgBox(对不起，你没有管理本功能的权限，请与管理员联系！, vbInformation + vbOKOnly, 警告) Exit SubEnd Iffrmjf2.Showfrmjf2.ZOrder 0End SubPrivate Sub jiaofeifind_Click()qxstr = Executeqx(3)If qxstr = false Then ss =
