可视化编程作业--关于学生信息管理系统的程序设计与实现

《可视化编程》课程作业论文题目：关于学生信息管理系统的程序设计与实现姓名:李周班级:材物0801学号:0120801020103指导教师:佘名高设计时间：2010年11月16日学生信息管理系统设计报告0120801020103李周一、设计目的本设计选取比较贴近我们日常生活的学生信息管理来进行程序的实现，将其作为可视化编程公选课的结课作业，验证自身的学习效果，同时希望利用所学的基本知识和技能，进行简单数据库应用程序设计。希望通过编程实践，熟悉巩固所学知识，以使自身达到熟练掌握VB语言的基本知识和技能，基本掌握面向对象程序开发的基本思路和方法，了解利用数据控件访问、浏览数据库信息的基本知识，为今后的进一步深入学习，奠定基础。二、主题介绍学生管理系统的开发目的是为了实现学生课程、学籍的信息化管理。本系统需要完成的功能有：系统管理、学籍管理、班级管理、课程管理、成绩管理以及帮助功能。1.系统管理：该模块的主要任务是维护系统的正常运行和安全性设置,包括添加用户、修改密码、退出系统等等。2.学籍管理：可对学生进行添加、删除、修改、查找等功能，学生属性有：学号、姓名、性别、出生年月、班级（来自于系统中保存的班级）、联系电话、入校日期、家庭地址和备注等属性。3.班级管理：可对班级进行添加、修改、查询等功能，班级属性有：名称、班主任（来自于系统中保存的教师）、年级、班级教室等属性。4.课程管理：可对每一个年级的上课科目进行添加、删除、修改等功能，课程属性有：所属年级、课程编号、课程名称、课程性质和备注等属性。5.成绩管理：可对每一个班级的上课科目的学生成绩进行添加、删除、修改、查找和报表输出等功能，成绩属性有：学生姓名、所属班级（来自于系统中保存的班级）、课程名、成绩、备注等属性。三、系统模块的实现在系统中包括以下功能：系统管理、学生信息管理、课程信息管理、成绩信息管理、班级信息管理。根据上述各项功能进行集中、分块，按照结构化程序设计的要求可以得到如图1所示的系统功能模块版图和图2所示的系统运行流程图。系统各模块关系图1系统运行流程图2登录界面输入用户名、密码输入是否正确系统主界面系统退出输入错误三次图2正确错误提示信息错误本系统共分三大部分1．系统登录模块为了系统的安全，在进入系统之前首先会出现一个登录模块，用户只有在输入正确的用户名和正确的密码之后，才能进入系统。而且输入错误超过三次将自动断开链接，退出系统用户登录窗体中放置了两个文本框（Textbox）,用来输入用户名和密码；两个按钮（CommandButton）用来确定或者取消登录。2．系统主界面模块登陆成功后，即可进入系统主界面模块。主界面为进入学生管理系统各模块的入口，用户可根据窗体上面各个模块名称单击进入各个管理模块，从而进行对系统的管理操作。3．各功能模块（部分）1修改密码在系统主界面下，进入修改密码窗体，用户可根据需要修改自己的密码。在这个窗体中放置了三个文本框，用来输入原密码和新密码以及确认新密码；两个按钮用来确定是否修改密码；三个标签用来标示文本框的内容。密码修改界面主要包括新设置密码、以及确认等功能。2添加班级信息用户通过系统主界面下班级管理模块进入班级信息添加窗口。在这个窗体中放置了四个文本框，用来输入班级名称、年级以及辅导员和班级教室等信息；两个按钮用来确定是否进行添加；四个标签用来标示文本框的内容。用户输入新班级信息后点击“确认”即可进行添加，点击“取消”则返回主界面3查看及修改学生信息选择主窗体中学籍管理模块下的查询或修改学生信息，就可进入查看及修改学生信息的窗体，在该窗体中我们可以对学生的学号、姓名、性别、出生日期、班级、家庭地址等学生的信息进行查看和修改。在窗体上放置多个文本框和下拉式文本框，用来显示和输入学籍信息；两个按钮用来确定是否修改学籍信息；一个按钮用来退出窗体；多个标签用来提示文本框中需要输入的内容。同时还使用了一个Data控件来连接数据库。4设置年级课程用户可以通过点击主界面下的课程管理菜单进入课程管理模块下的年级课程设置窗体，可以对每一个年级的课程进行设置。在窗体上放置一个下拉式文本框，用来选择年级（年级信息事先已录入）；两个组合框（Listbox）用来显示年级课程和已选课程；两个按钮用来确定是否修设置课程新息；一个按钮用来退出窗体；两个各个标签用来添加课程和删除已选择的课程。四、部分代码示例1．系统登录部分代码PrivateSubcmdOK_Click()DimjAsIntegeri=i-1'i用来判断登录次数，超过3次自动退出IfText1.Text=whlgdxAndText2.Text=123456Thenform2.ShowUnloadForm1ElseIfi=0ThenMsgBox3次输入错误，系统断开链接,0+48,警告！UnloadForm1Elsej=MsgBox(用户名或密码输入错误,你还有+Str(i)+次机会,1+16,信息错误！)Text1.Text=Text2.Text=Ifj=1ThenForm1.ShowElseUnloadForm1EndIfEndIfEndIfEndSub2．系统主界面入口代码PrivateSubA2_Click(IndexAsInteger)Form5.Show'进入添加学生信息窗口Unloadform2EndSubPrivateSubA3_Click(IndexAsInteger)Unloadform2Form6.Show'进入班级信息窗口EndSubPrivateSubE1_Click(IndexAsInteger)Unloadform2Form1.Show'退出系统，返回登录界面EndSubPrivateSubR1_Click(IndexAsInteger)Form3.Show'进入修改密码界面Unloadform2EndSubPrivateSubR2_Click(IndexAsInteger)Form4.Show'进入查询及修改学生信息窗口Unloadform2EndSubEndSub3．添加学生信息代码DimiAsInteger'定义局部变量DimsindexAsIntegerDiminfrAsStringDimStu_IDAsStringDimStu_NameAsStringDimStu_GenderAsStringDimBorn_DateAsStringDimClass_NumAsStringDimTele_NumAsStringDimRu_DateAsStringDimAddressAsStringDimCommentAsStringPrivateSubCombo1_Click()Stu_Gender=Combo1.TextEndSubPrivateSubCombo2_Change()Class_Num=Combo2.TextEndSubPrivateSubCommand1_Click()infr=Stu_ID++Stu_Name++Stu_Gender++Born_Date++Class_Num++Tele_Num++Ru_Date++AddressList1.AddIteminfr,ii=i+1EndSub'添加信息记录PrivateSubCommand2_Click()UnloadForm5form2.ShowEndSubEndSub'取消添加操作PrivateSubCommand4_Click()List1.RemoveItemsindexi=i-1EndSub'删除信息记录'初始化窗体PrivateSubForm_Load()i=0sindex=0EndSubPrivateSubList1_Click()sindex=List1.ListIndexEndSubPrivateSubText1_Change()Stu_ID=Text1.Text'记录改动信息EndSubPrivateSubText2_Change()Stu_Name=Text2.Text'记录改动信息EndSubPrivateSubText3_Change()Born_Date=Text3.Text'记录改动信息EndSub参考资料：[1]杨富国·VisualBasic程序开发案例解析·北京：清华大学出版社，2006[2]杜秋华·可视化编程应用—VisualBasic6.0（第二版）·北京：人民邮电出版社，2007[3]杜春玲·VisualBasic6.0程序设计教程·西安：西北工业大学出版社，2008