MIS系统设计实例.ppt
MIS系统设计实例,学生信息管理系统,课程目的,通过本课程学习使得同学们了解MIS系统的开发流程，掌握用VB语言开发基于Sql Server数据库的MIS系统开发技术。,课程内容,1、MIS系统概述2、系统功能设计3、数据库结构设计4、应用程序编制5、系统测试,MIS系统概述,问题1、什么是MIS系统？问题2、一个完整的MIS系统应该包括那些内容？问题3、MIS系统的开发流程？,什么是MIS系统,MIS系统（Management Information System）即管理信息系统，是一个由人、计算机及其其他外围设备等组成的能进行信息的收集、传递、存储、加工、维护和使用的系统。MIS系统的特点：一类日常事务操作的系统，通过人机交互界面录入数据、处理数据和输出数据。常见的MIS系统有：学生信息管理系统、工资管理系统、进销存管理系统、图书信息管理系统等等！,一个完整的MIS系统包括的内容,一个完整的MIS系统应包括：辅助决策系统（DDS）、工业控制系统（IPC）、办公自动化系统（OA）以及数据库、模型库、方法库、知识库和与上级机关及外界交换信息的接口。其中特别是办公自动化系统、与上级机关及外界交换信息的接口都是结合Intarnet的应用。传统的MIS系统是基于C/S构架的，目前在向基于B/S构架过渡。,MIS系统的开发流程,需求分析：系统分析师对企业所面临的管理问题进行分析。需求初步确定：软件系统分析师初步确定企业需求，作为合同确认的依据。系统调研：软件系统分析师对企业的初步需求进行详细调研，确定系统界面的设计和运行流程。需求说明书：将软件系统分析师对企业详细调研文档化，经双方讨论确定后，开始系统界面设计。界面设计：专业软件开发工程师及美工设计师完成系统界面设计，经用户确认，开始软件开发。开发及测试：专业软件开发工程师和测试工程师完成系统软件开发和测试，强大的测试力量和一对一软件测试体系，确保系统软件质量。使用培训：专业培训师对企业进行软件基础知识和系统软件运行流程全面培训。初始化试运行：专业软件工程师辅导用户使用系统，协助用户进行初始化工作；系统初始化完毕，进行试运行阶段，测试系统功能的完善和全面性。正式切换：双方共同测评系统，确保系统能够全面符合用户需求说明书定义的所有功能，正式切换系统。,系统功能设计,本课程我们以学生信息管理系统为例讲解此系统的功能设计。系统主要功能包括：（1）班级管理：班级增加，查询。（2）学生管理：学生增加，学生信息编辑，学生删除。（3）学生成绩管理：成绩维护和成绩统计。,系统结构图,学生信息管理系统,学生管理,班级管理,成绩管理,增加班级,查询班级,增加学生,编辑学生,删除学生,成绩维护,成绩统计,业务流程图,本例中的业务流程比较简单，我们以宾馆客房管理为例，说明业务流程图的使用。,客户,前台接待住宿登记,持牌入住,结帐,报表,退宿,客房预定,预定房费,预定房费查询,宿费提醒,追加押金,续住,调房,房态查询,挂帐,应收款,数据库结构设计,班级表class,学生表Students,界面设计,主界面,界面设计,班级管理,界面设计,增加班级,应用程序编码主窗体上登录窗体的显示,功能：在主窗体前显示Login窗体。定义一个变量LoginSucceded来控制是否显示Login窗体，此变量在两窗体（主窗体和login窗体上都使用）所以把它定义在公共模块中。Private Sub Form_Activate()If LoginSucceded=False Then 判断login是否成功 frmLogin.Show 显示login对话框End IfEnd SubPrivate Sub Form_Load()LoginSucceeded=False 初始化login控制变量End Sub,登录窗体代码设计,功能：验证用户登录。Private Sub cmdOK_Click()检查正确的密码 If txtPassword=password And txtUserName=admin ThenLoginSucceded=True Unload Me 销毁login窗体 Else MsgBox 用户名或密码无效，请重试!,登录 txtPassword.SetFocus SendKeys Home+End End IfEnd Sub,登录窗体代码设计,功能：取消按钮的处理Private Sub cmdCancel_Click()设置全局变量为 false 不提示失败的登录 txtUserName.Text=txtPassword=txtUserName.SetFocus LoginSucceded=False Me.HideEnd Sub,主窗体代码设计,1、菜单栏设计2、增加班级按钮处理Private Sub class_add_Click(Index As Integer)class_addb=True 控制是增加还是编辑Form2.ShowEnd Sub,增加班级代码设计,1、用到的控件Adodc和DataGride控件，添加方法如下,增加班级代码设计,2、Adodc属性设计 connectionstring 属性：数据库连接串 RecordSource属性：Sql语句3、DataGrid属性设置 Datasource属性：设置为Adodc控件 添加相关列表属性,增加班级代码设计,增加班级代码设计班级管理窗体部分,Private Sub Form_Activate()If class_add=True Then Com_add.Visible=FalseEnd IfEnd Sub,增加班级代码设计,方法一 使用SQL语句 Private Sub Com_ok_Click()Dim sqlstr As StringWith Form2.Adodc1.CommandType=adCmdText sqlstr=insert into CLASS values(+Te_classname.Text+,+Te_classDes.Text+,+Te_deparment.Text+).sqlstr.Refresh End With Unload MeEnd Sub,增加班级代码设计,方法二 使用Adodc的RecordSet的addnew方法Private Sub Com_ok_Click()Dim sqlstr As StringWith Form2.Adodc1.Recordset.AddNew.Recordset.Fields(class_name).Value=Te_classname.Text.Recordset.Fields(Describe).Value=Te_classDes.Text.Recordset.Fields(UpperID).Value=Val(Te_deparment.Text)End With Unload MeEnd Sub,作业,请同学们参照演示代码，完成如下功能：1、班级管理（删除和更新）2、学生管理（添加、删除和更新）3、完成成绩统计和查询功能,
