运动会管理系统

1、设计主题：运动会管理系统一、设计实验条件电脑第九室二、设计任务和要求1 .设计合理可行的数据库，建立正确的数据库表和表之间的关系。 在此基础上完成相关的算法和程序2、系统根据实现的功能，进行合理的模块划分，确定合理的功能流。3 .给出系统的概要设计、详细设计4 .完成数据流图、E-R关系图、数据库表、程序流程图、功能框图设计、功能编程5 .系统操作界面友好美丽。导师的评论：指导教师签名：1 .概要计算机以其强大的性能价格优势给人们的工作、学习和生活带来了很大的便利。 电脑代替人手处理一些事务是必然的。 整个人类社会进入了高度信息化，人们的信息和数据的利用和处理已经进入了自动化、网络化、社会化的

2、阶段。 在资料检索、日常事务处理、科研生产等方面，无需利用大量信息资源。 因此，如何有效地进行数据信息的管理和利用成为了引人注目的课题。 信息在各个领域具有不同的概念，在管理科学领域，信息是加工处理过的数据形式，是有序的符号排列，被认为是系统传输和处理的对象。 信息时代的今天，信息的作用越来越受到重视。 即使制定成绩计划，研究投资战略，信息的活用也是不可或缺的。在今天的社会里，体育越来越普及，参加运动会的人越来越多，素质越来越高。 传统运动会一般是人工组织的，运动员的报名、比赛计划、比赛场地的安排和成绩记录等操作都是人工操作的，参加人数越多，运动会的规模越大，管理起来就越费时间，容易出错。 学

3、校田径运动会管理系统为组织者提供简单方便的方法来管理运动会。 学校田径比赛管理系统是“互动系统”，用简单的键盘输入和鼠标点击完成麻烦的记录和安排，保证运动会的正常顺利进行。 学校田径比赛管理系统是一个典型的数据库应用系统，能完成田径比赛管理中运动员的登记、分组、比赛成绩处理和公告、成绩统计信息查询等事务处理功能。 根据学校田径比赛的一般流程，本系统分为前期编制处理、比赛管理处理、查询输出处理和系统维护4个工具模块来完成所希望的功能。 根据关系型数据库理论设计数据库的结构。 使用这个系统，在可以大幅度减少员工劳动量的同时，还可以大幅度提高生产效率、可靠性、正确性2 .需求分析本系统适用于各种学校

4、田径比赛的全课程管理。 本系统的竞争规程设定灵活，输入运动员申请表方便，成绩输入简单，成绩查询功能丰富。 还考虑到了接口的友好性、操作的简单性、运行的可靠性。选手信息输入运动员的成绩登记返回退出学生成绩查询各系成绩查询运动员管理系统管理员登录成绩查询图1运动会管理系统的流程图3 .概念结构设计1 )各表的E-R图如下所示运动员。学号性别姓名编号结女儿图2选手属性表运动员的成绩本科比赛的名次项目编号比赛成绩比赛的得分图3选手成绩属性表本科小组本科代码本科代码本科排名总分图4学部组属性表项目项目编号项目名称项目类型比赛的类型录用人数组数图5项目属性表1本科小组所属n运动员。m比赛项目n项目编号项目

5、名称项目类型比赛时间录用人数组数学号得分项目编号名次姓名学号编号结女儿性别本科代码本科排名系名总分图6 E-R合成图4 .逻辑结构设计1 )数据关系模型运动员信息表菲尔德类型大小是否是主键是否允许空值学号char7是的，是的。否姓名char10否否编号char4否否性别char2否否结女儿char4否否本科小组菲尔德类型大小是否是主键是否允许空值本科代码char4是的，是的。否系名char20否否本科排名Smallint公司2否是的，是的。总分PS4否是的，是的。项目菲尔德类型大小是否是主键是否允许空值项目编号char4是的，是的。否项目名称。char20否否项目类型char20否否比赛时间日

6、期时间8否否录用人数Smallint公司2否否组数char10否否比赛成绩菲尔德类型大小是否是主键是否是空学号char7是的，是的。否项目编号char4是的，是的。否比赛的名次char20否是的，是的。比赛成绩Varchar1否是的，是的。2 )数据库内的学部小组表图7系组表5 .软件功能设计和系统测试1 )开始接口：图8选手管理系统开始界面代码是：私有子cmd ADM _ click ()卸载mefrmAdmLand.Show vbModal终结子私有子cmdcancel _ click ()卸载me终结子私有子cmdselect _ click ()卸载mefrm select.show

7、VB模型终结子私有子表单_ load ()终结子2 )进行管理者登录时图9管理员登录画面代码如下所示：Option ExplicitDim i As Integer私有子cmdcancel _ click ()卸载mefrmStart.Show vbModal终结子私有子cmdok _ click ()Dim strUserName As StringDim strPassword As StringstrUserName=Trim(txtUser.Text )strpassword=trim (txt代码. text )if i3 andt strusername= aa sand strp

8、assword= 123 then卸载mefrmManageFace.Show vbModalElseIf i=3 ThenMsgBox 帐户和密码的输入次数超过3次，这次无法登录！ “”VB关键vbokonly“错误”ElseMsgBox 账户和密码输入错误。 请重新输入！ “”VB关键vbokonly“错误”txtUser.Text=txt代码. text=i=i 1最终PS终结子私有子表单_ load ()i=0终结子私有子图片1 _ click ()终结子3 )管理员登录后进入图10管理界面代码如下所示：私有子文件Putin _ click ()终结子私有子文件_ click ()终结

9、子私有子更新_ click ()frm Putin.show VB模型终结子私有辅助插入_ click ()frmAltInfINsert.Show vbModal终结子私有辅助分配_ click ()frmaltselect.show VB模型终结子私有辅助更新_ click ()frmaltupdate.show VB模型终结子私有子后退_ click ()卸载mefrmStart.Show vbModal终结子私有子cmdcancel _ click ()卸载me终结子私有子图片2 _ click ()终结子私有子RES insert _ click ()frmaltresinsert.

10、show VB模型终结子私有子RES select _ click ()frmAltResSelect.Show vbModal终结子私有子RES更新_ click ()frmresupdate.show VB模型终结子4 )登记运动员：图11选手信息的登记代码如下所示：Option ExplicitDim conn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim cmd As New ADODB.Commandprivatesublbl _ click (indexasainteger )终结子私有标签1 _ click ()终

11、结子私有辅cmd后退_ click ()frmManageFace.Show vbModal终结子私有子cmdcancel _ click ()卸载me终结子私有子cmdok _ click ()Dim strSNo As String，strName As String，strNumber As String，strSex As String，strDep As StringstrSNo=Trim(txtSno.Text )If strSNo= ThenMsgBox 学号不能为空！ “”VB重要vbokonly“错误”txtSno.SetFocus退出子最终PSstrName=Trim(tx

12、tName.Text )If strName= ThenMsgBox 名称不能为空！ “”VB重要vbokonly“错误”txtName.SetFocus退出子最终PSstrNumber=Trim(txtNumber.Text )If strNumber= ThenMsgBox 名称不能为空！ “”VB关键vbokonly“错误”txtNumber.SetFocus退出子最终PSstrDep=Trim(txtNumber.Text )If strDep= ThenMsgBox 名称不能为空！ “”VB关键vbokonly“错误”txtDep.SetFocus退出子最终PSstrSex=cmbSex.TextIf MsgBox (新生信息 vbCrLf 插入学号： strSNo vbCrLf 姓名： strName vbCrLf 性别： strSex vbCrLf 系： strDep，vbinformationvbokcancel )=mandtext=insertintoalthetevalues (strs no，str