VB452班级管理系统论文access.docVIP

VB452班级管理系统论文access P1．2nbsp; 系统简介BR本系统主要服务与班主任的日常班级学生信息管理.主要包括如下几大主要功能:BR一:学生资料(基本资料,通信资料,资料管理)BR二:成绩管理(班级成绩,个人成绩,成绩管理)BR三:量化管理(得分情况,得分原因,考核管理,得分情况)BR四:组织机构(团委,班委会)BR五:班级事件(班级荣誉,活动情况)BR六:班费管理(班费收入.班费支出,剩余班费)BR七:管理员(添加管理员,修改密码,删除管理员)BR八:帮助(关于我们,每日一看)/P Pnbsp;/P P第二章nbsp;系统的分析BR2．1nbsp;系统开发的目标和思想BR本系统主要服务于班主任以及班级管理人员方便管理班级事物的软件系统,在完成上述任务前提下力求界面人性化,数据处理的可靠以及程序的健壮性的性能./P P2．2nbsp;系统的可行性分析BR技术上:本系统采用visual basic 6.0与微软的access作为数据库,技术上开发难度一般.BR经济上:本系统服务于班主任以及班级管理人员,提高了工作人员办事效率,节省了开支.所以具有经济上的可行性.BR社会上:本系统同时也方便了广大学生以及学校管理者者,服务.所以具有社会可行性.BROn Error GoTo ero1BRData1.Recordset.AddNewBRero1:BRMsgBox 不能添加数据, , 提示BREnd Sub/P PPrivate Sub Command2_Click()BRCommand4.Enabled = True/P PBROn Error GoTo ero2BRData1.Recordset.DeleteBRero2:/P PEnd Sub/P PPrivate Sub Command3_Click()BRCommand4.Enabled = True/P POn Error GoTo ero3BRData1.Recordset.EditBRero3:BRMsgBox 不能编辑数据, , 提示BREnd Sub/P PPrivate Sub Command4_Click()BROn Error GoTo eroBRData1.RefreshBRero:/P PEnd SubBRPrivate Sub bfgly_Click()BRIf isadtr = True ThenBRnbsp;nbsp;nbsp; If mu_gly = False ThenBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; MSFlexGrid1.Visible = FalseBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command1.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command2.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command3.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command4.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; cmd_n.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; cmd_f.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; cmd_first.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; cmd_last.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; mu_gly = (Not mu_gly)BRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; bfgly.Caption = 收入BRElseBRnbsp;nbsp;nbsp;nbsp;nbsp; MSFlexGrid1.Visible = TrueBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command1.Visible = FalseBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command2.Visible = FalseBRnbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; Command3.Visible = FalseBRnbsp;nbsp