VB+ACCESS学校田径运动会管理系统设计(源代码+系统+答辩)

admin

学校田径运动会管理系统
专业：计算机科学与技术  学 号：7000803115   学生姓名：胡 强  指导教师：陈木生

摘 要
学校田径运动会管理系统是典型的信息管理系统，本系统为田径运动会运动会组织者提供方便、快捷的方法，系统的对运动会进行合理的安排与管理，实现无纸化工作，节省大量人力和物力。本论文首先使用了Visual Basic作为开发工具和Access作为后台数据库，然后再介绍了开发背景，最后通过截图和表格来说明该系统的开发与操作。设计充分利用VISUAL BASIC以及ACCESS数据库易于使用和快速开发的特性，提高了编程效率和可靠性。同时对系统的开发原理、系统的功能特点和设计方案进行了介绍。在对运动会管理体系进行充分分析和系统论证的基础上开发。它不但能完成运动会管理中的基本操作，而且具有程序设计合理、操作简单、运行可靠、保密性强等特点。

关键词: VB  田径运动会   Access





















ABSTRACT
The sports meeting administrative system of track and field is a typical information management system. It makes games management simple and convenient for organizer to arrange and manage the games with reason. It makes no-paper work possible, and save a lot of manpower and material resources. This paper use "Visual Basic" as the development tool and "Access 2003" as the background data base first, then introduce the background of development, and the developing and operating of the system through photographs and charts. Design the characteristic fully utilizing VISUAL BASIC and ACCESS database to be apt to use and develop fast to improve programming efficiency and dependability . At the same time, the development of system principle, the system characteristic function and the planning design are introduced. it is developed based on the sufficient analysis and the systemic argumentation of the games management system. It not only can complete the general operation of games management, but also have the characteristics such as programmer reasonable, operating simply, running reliably and excellent secrecy.


Keywords: Visual Basic   Sports meeting of track and field   Access
















目  录

摘 要        1
ABSTRACT        2
前 言        5
第一章  需求分析        6
1.1系统的综合需求        6
1.1.1 功能需求        6
1.1.2 性能需求        6
1.2建模分析        6
1.2.1数据模型        7
1.2.2功能模型        8
1.2.3 行为模型        9
第二章  总体设计        10
2.1 软件的特点        10
2.2 系统功能模块        10
2.3.功能分解        12
2.3.1 总体功能分解        12
2.3.2 具体功能分解        12
2.4 设计软件结构        14
第三章  详细设计        15
3.1 前期编排模块        15
3.1.1定义比赛项目        15
3.1.2 设置工作岗位        15
3.1.3 录入工作人员        16
3.1.4 运动员报名        16
3.1.5 录入纪录成绩        16
3.1.6 生成秩序册        17
3.1.7 查看秩序册        17
3.2 比赛管理模块        17
3.2.1 径赛成绩录入与输出        17
3.2.2 田赛成绩录入与输出        18
3.2.3 全能成绩录入与输出        18
3.3 查询输出模块        18
3.3.1 运动员成绩        18
3.3.2 项目成绩        19
3.3.3 代表队查询        19
3.3.4 总分表        20
3.3.5 项目得分表        20
3.3.6 成绩名次表查询        20
3.3.7 成绩汇册        21

3.4 系统工具        21
3.4.1 运动会数据备份和恢复        21
3.4.2 系统数据表浏览        22
3.4.3 用户管理        22
第四章  系统实现        23
4.1 数据库表创建        23
4.2 界面设计及编码        23
4.2.1登陆界面        24
4.2.2主界面        25
4.2.3 前期编排        25
4.2.4 比赛管理        27
4.2.5 查询输出        29
4.2.6 系统工具        30
结束语        32
参考文献        33
致 谢        34




























前 言
计算机以其强大的性能价格优势给人们的工作、学习和生活带来极大的方便．计算机代替人工处理一些事务已成为必然。整个人类社会已进入高度信息化，人们对信息和数据的利用和处理已经进入自动化、网络化和社会化的阶段。如在查找资料、处理日常办公事务、科研生产等方面，无不需要利用大量的信息资源。因此，如何有效地进行数据信息的管理和利用，已经成为人们普遍关注的课题。信息在不同的领域里有着不同的概念，在管理科学领域中，通常认为信息是经过加工处理后的一种数据形式，是一种有次序的符号排列，它是系统传输和处理的对象。处在信息时代的今天，信息的作用越来越为人们所重视。制定成绩计划，研究投资策略，都离不开对信息的充分利用。
在当今社会上，体育运动越来越普及，参与运动会的人越来越多，素质越来越高。传统的运动会，一般是以人手组织为主，运动员的报名、赛事的安排、比赛场地的安排和成绩的记录等操作全都由人手操作，参加人数越多，运动会的规模就越大，管理工作就更加费时费力，而且容易出错。学校田径运动会管理系统则为组织者提供一个简捷方便的方式来组织管理运动会，学校田径运动会管理系统是一种“人机交互系统”，通过简单的键盘输入与鼠标点击来完成烦琐的记录与安排工作，保证运动会的正常流畅的进行。学校田径运动会管理系统是典型的数据库应用系统，可完成田径运动会管理中的运动员报名、分组编排，竞赛成绩处理及公告，成绩统计．信息查询等事务处理功能。根据田径运动会的一般进程，本系统分为前期编排处理、比赛管理处理、查询输出处理和系统维护等四个工具模块来完成所期望的功能。依据关系型数据库理论设计数据库的结构。使用该系统可以极大地减小工作人员的劳动量，同时还可大大提高工作效率、可靠性和正确性。













第一章 需求分析
1.1 系统的综合需求
本系统适用于各种学校田径运动会的全程管理。它具有界面友好，操作简单，功能强大，运行可靠等特点。
1.1.1 功能需求
1．田径运动会主界面设置密码，用户通过密码后才能进入系统的水平菜单。
    2．水平命令菜单要能实现前期编排，比赛管理，查询输出，系统工具这几个功能。
　  3．前期编排需要定义比赛项目，设置工作岗位、录入工作人员，运动员报名表录入，输入记录成绩，生成秩序册，查看秩序册等功能。
　  4．比赛管理需田赛成绩录入与输出，径赛成绩录入与输出，全能成绩录入与输出等功能。
5．查询输出需要运动员成绩、项目成绩、代表队成绩查询，总分表、项目得分表、成绩名次表查询，成绩册汇总等功能。
　  6．系统工具需要运动会数据备份与恢复，系统数据表浏览，用户密码修改维护等功能。
1.1.2 性能需求
　  本系统的各种操作简单明了，操作人员不需要进行专业培训。
1.2建模分析
为了更好地理解复杂事物，人们常常采用建立事物模型的方法。所谓模型，就是为了理解事物而对事物做出的一种抽象，是对事物的一种无歧义的书面描述。通常，模型由一组图形符号和组织这些符号的规则组成。







1.2.1数据模型
实体-联系图，描绘数据对象及数据对象之间的关系，是用于建立数据模型的图形。




　　　　　　　　　　N　　　　　　　　　　　　　　　　N


　　　　　　　　　　　　　M　　　　　　M




　　　　　　　　　　　图1-1 田径运动会的数据模型
















1.2.2功能模型
数据流图，描绘当数据在软件系统中移动时被变换的逻辑过程，指明系统具有的变换数据的功能，因此，数据流图是建立功能模型的基础。

　　　　　　　　　　　　　　　　　　　　　　数据库表　　　　　　数据库表

　　　　　　　　　　　　　　　　　　　　　　报名信息　　　报名信息


　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　报名信息








　　　　　　　　　　　　　　　　　　　　　　　　参赛信息
　　各种信息　名次信息　成绩信息　　　成绩信息　　　　　　　　　秩序信息
　　　　　　　数据库表　　　　　　数据库表　　　　　　　　数据库表

　　　　　　　　　　　图1-2 田径运动会功能模型








1.2.3 行为模型
     状态转换图，指明了作为外部事件结果的系统行为。


　　　　　　　　　　　　　　　　　报名




　　　　　　　　　　　　　　　　　秩序册




　　　　　　　　　　　　　　　　　成绩




　　　　　　　　　　　　图1-3 田径运动会行为模型








第二章 总体设计
经过需求分析阶段的工作，系统必顺“做什么”已经清楚了，现在是决定“怎样做”的时候了。总体设计的基本目的就是回答“概括地说，系统应该如何实现？”这个问题，因此，总体设计又称为概要设计或初步设计。
本系统设计采用了面向对象的系统设计方法，开发工具选用的Visual Basic，数据库用的是Access数据库。根据前面的设计思路和系统功能分析．总共设计了前期编排、比赛管理、查询输出、系统工具这几个模块。
2.1 软件的特点
1．统一管理运动会的相关数据，方便管理人员进行数据的分析、查询和比较等。输出的报表计算准确，类型丰富，符合有关规范。
2．整个系统自动进行赛前、赛中和赛后的各项管理。自动按田径竞赛规则进行分组分道等数据处理。不用大量抄写一字，极大的减轻了工作量。
3．按照人性化设计的原则，用户界面友好、操作灵活简便并提供向导功能。系统整体结构设计合理，数据处理功能齐备，面对大量原始指标和数据的输人与输出，能及时地对数据进行快速、准确的评判、比较、排序、统计和处理等。界面清晰友好，操作简便使用户无需经过计算机专门训练就能胜任。
4．按照比赛的阶段进行软件的流程设计，只需要简单的操作，就能顺利的完成整个比赛的全过程。
5．通用性强，适应面广。该管理软件系统面对的用户主要是普通高等院校和普通中、小学以及其它行业的基层体育管理部门。这些运动会特点是规模大、大小不一．会期有长有短，但级别较多，项目设置灵活，录取名次方式多样化等。系统可以通过对各大、中、小型田径运动会的项目、组别，录取名次与各分值、各项纪录和运动员技术等级等方面进行灵活设置与运用来实现的。
2.2 系统功能模块
运动会管理系统是信息数据的现代化管理，主要处理与运动会比赛相关的数据，其总体数据流图2-1所示：









                    图2-1 总体数据流图
本软件主要有以下四个方面的功能：
◆前期编排　　　　　◆比赛管理
◆查询输出　　　　　◆系统工具
各模块之间的关系如图2-2所示：


















                    图2-2 顶层数据流图
2.3. 功能分解
2.3.1 总体功能分解
整个系统共分为前期编排部分、比赛管理部分、查询输出、系统维护工具等部分。
1 前期编排部分
该部分是系统最基本的、重要的功能模块。要求有方便的操作界面，主要完成各类报名信息及运动员比赛成绩的录入。主要是将竞赛的相关参数设置和报名单输入计算机．再经过一些处理操作。
(1)运动会参数设置：包括秩序册所涉及的分道信息组委会名单、裁判员名单、竞赛日程等。
(2)根据运动员报名进行分组分道功能，项目时间编排，最后生成程序册。
2．比赛管理部分
主要包括项目成绩录入、产生比赛结果等功能。
3．查询输出：具有灵活方便的查询功能。可进行一般查询、组合查询，一般查询要求按姓名查询。组合查询要求可选择数据表，可选择该表的属性指标并对其进行限定，可选择其显示内容。主要包括个人成绩查询、代表队成绩查询、团体总分排名查询、名次查询等功能。
2.3.2 具体功能分解
各个模块在概要实现的功能如下
     1．前期编排
        定义比赛项目：
          设置要进行的比赛项目
        设置工作岗位：
          设置比赛中所需要的各种工作人员的岗位
        录入工作人员
          各种工作人员的报名
        运动员报名
          参加比赛人员的录入
        输入纪录成绩
          各种比赛项目的纪录成绩的录入
        生成秩序册
          对运动员进行编排，实现比赛安排
        查看秩序册
          查看比赛安排
     2．比赛管理
        径赛成绩录入与输出
          径赛项目的成绩录入及对各径赛项目的成绩进行排名得出名次
        田赛成绩录入与输出
          田赛项目的成绩录入及对各田赛项目的成绩进行排名并得出名次
        全能成绩录入与输出
          全能项目的成绩录入及对各全能项目的成绩进行排名并得出名次
     3．查询输出
        运动员成绩
          对单个运动员进行的查询
        项目成绩
          以项目为单位的成绩查询
        代表队成绩查询
          以代表队为单位的成绩查询
        总分表
          对各代表队得到的分数进行统计
        项目得分表
          以项目为单位对在该项目中得到名次的人员进行查询
        成绩名次表
          对各项目中得到名次的人员成绩查询
        成绩汇册
          对各项目中得到名次的人员进行汇册
     4．系统工具
       数据备份与恢复
         对数据库的备份及恢复
       数据表浏览
         对数据库中的表进行浏览
       用户管理
         对用户信息的管理






2.4 设计软件结构
    通常程序中的一个模志完成一个适当的子功能。应该把模块组织成良好的层次系统，顶层模块调用它的下层模块以实现程序的完整功能，每个下层模夫再调用更下层的模块，从而完成程序的一个子功能，最下层的模块完成最具体的功能。软伯结构可以用层次图或结构图来描绘。本系统的软件结构如图2-3所示。





















                        图2-3  学校田径运动会管理系统的层次图



第三章 详细设计
    详细设计阶段的根本目标是确定应该怎样具体地实现所要求的系统，也就是说，经过这个创优的设计工作，应该得出对目标系统的精确描述，从而在编码阶段可以把这个描述直接翻译成用某种程序设计语言书写的程序。
主要是结构程序设计和设计工具
描述程序处理过程的工具称为过程设计的工具，它们可以分为图形、表格和语言3类。不论是哪类工具，对它们的基本要求都是能提供对设计的无岐义的描述，也就是应该以指明控制流程、处理功能、数据组织以及其他方面的实现细节，从而在编码阶段能把对设计的描述直接翻译成程序代码。这里就用盒图来描述各模块。
每个模块要实现的功能不同，所以每个模块的结构程序也可能不同。下面就是每个模块的结构程序设计。
3.1 前期编排模块
3.1.1定义比赛项目
这个模块只需实现简单的添加和删除就可以了，所以结构为顺序结构。




图3-1 定义比赛项目盒图
这个模块只需要把要定义的比赛项目加入表中和把不要的项目删除，这样这个模块就只需添加和删除两个功能。要定义的比赛项目如果项目名单中不存在则插入表中，如果存在则提示该项目已存在。要删除某个项目，如果这个项目在表中则直接删除否则提示该项目不存在。
3.1.2 设置工作岗位
    这个模块也只需添加和删除，所以也用顺序结构。




        图3-2 设置工作岗位盒图
    要设置工作岗位就要把新的工作加入表中和把不要的岗位从表中删除，所以这个模块只需添加和删除功能。有新的岗位要设置就把该岗位信息插入到岗位表中，如果该岗位已存在则提示。删除岗位也是如此。
3.1.3 录入工作人员
    录入工作人员也是同定义比赛项目一样，也是顺序结构。




            图3-3 录入工作人员的盒图
录入工作人员是把新报名的工作人员加入工作人员的表中并对新工作人员分配岗位，还有删除某人的某个工作岗位或删除某人的全部工作岗位。输入工作人员姓名和岗位，如果该岗位已经被此人员选择则提示已选择此岗位，如果没有选择该岗位则插入表中。
3.1.4 运动员报名
    运动员报名也如同定义比赛项目，是顺序结构。



           图3-4 运动员报名盒图
    运动员报名是把运动员信息和该运动员要参加的比赛插入表中，修改运动员的参赛项目和删除运动员。运动员报名时如果运动员名单中没有此运动员，则把此运动员姓名插入运动员名单中且把该运动员参加的比赛项目插入参赛情况表。如果此运动员存在而又没有选择输入的比赛项目则只要把该比赛项目插入参赛情况表中，否则提示已经选择该比项目。
3.1.5 录入纪录成绩
    录入纪录成绩也如同定义比赛项目，是顺序结构。




            图3-5 录入纪录成绩盒图
           输入纪录成绩是把每个比赛项目的纪录成绩插入表中，有时还要修改某个比赛项目的纪录成绩和删除某个比赛项目的纪录成绩。
3.1.6 生成秩序册
    这个模块是要对项目中每个项目都进行一次编排，所以要用DO_WHILE型循环结构。





                  图3-6 生成秩序册盒图
要生成秩序册就需要先设置各项参数然后才能生成秩序册。这样就要有设置参数和修改参数这两个功能，然后才能生成秩序册这个功能。
3.1.7 查看秩序册
    查看秩序册只是查看秩序册的各种结果，也是顺序结构。




           图3-7 查看秩序册盒图
查看秩序册就是要查看比赛的各种编排，这样就需要有查看这个功能。
3.2 比赛管理模块
3.2.1 径赛成绩录入与输出       
    这个模块在录入方面只需添加和修改，所以要用顺序结构。但在输出方面是循环结构。




          图3-8成绩录入部分盒图                   图3-9 输出部分盒图
径赛成绩录入与输出分为两部分，成绩录入部分是录入径赛成绩分为初赛成绩录入、预赛成绩录入和决赛成绩录入，这样就要有添加成绩和修改成绩两功能。而输出部分也分为初赛、预赛和决赛三部分，每个部分都需输出这个功能。
3.2.2 田赛成绩录入与输出
    这个模块在录入方面也只需添加和修改，所以要用顺序结构。在输出方面也是循环结构。






            图3-10成绩录入部分盒图              图3-11 输出部分盒图
田赛成绩录入与输出也分为两部分，即成绩录入部分和输出部分。成绩录入部分是田赛项目的成绩录入和修改，这样就需添加和修改两个功能。输出部分只需输出这个功能。
3.2.3 全能成绩录入与输出
    这个模块在录入方面也只需添加和修改，所以要用顺序结构。在输出方面也是循环结构。






            图3-12成绩录入部分盒图            图3-13 输出部分盒图
全能成绩录入与输出这个模块和上面两个模块一样与分为两部分。功能的需求也与上面两个模块差不多。
3.3 查询输出模块
3.3.1 运动员成绩




    本模块只需单项查询，用IF_THEN_ELSE型选择结构。






          图3-14查询运动员成绩盒图
运动员成绩查询是以运动员姓名来查询，如果有该运动员则输出该运动员的所有比赛的成绩，如果不存在该运动员则不输出。
3.3.2 项目成绩
本模块只需单项查询，用IF_THEN_ELSE型选择结构。






         图3-15查询项目成绩盒图
项目成绩查询是以比赛项目来查询的，输入一个比赛项目输出参加该项目的所有人员的比赛成绩。
3.3.3 代表队查询
    本模块的功能内容首先是判断再操作，所以是IF_THEN_ELSE型选择结构。








                  图3-16代表队成绩查询盒图
代表队成绩查询是以代表队来查询的，输入一个代表队名称如果该代表队不存在则不输出，否则输出该代表队所有运动员的所有比赛成绩。
3.3.4 总分表
    本模块是要对项目中的每个项目进行统计，所以是DO_WHILE型循环结构。







                   图3-17总分表查询盒图
总分表是统计每个代表队得到的总分数，只要单击查询就要输出所有代表队及各代表队所得的总分数。
3.3.5 项目得分表
    本模块只需单项查询，用IF_THEN_ELSE型选择结构。








               图3-18项目得分表盒图
项目得分表是以项目为单位进行的查询，输入一个比赛项目查询一次则输出该项目比赛中得到名次人员的成绩名次信息。
3.3.6 成绩名次表查询



    本模块是要对项目循环查询，所以是DO_WHILE型循环结构。








                 图3-19成绩名次表盒图
成绩名次表查询是对所有比赛项目的查询，单击一下查询就会输出所有比赛项目中得到名次的运动员的成绩信息。
3.3.7 成绩汇册
    本模块也是要对项目循环查询，所以是DO_WHILE型循环结构。









              图3-20成绩汇册盒图
成绩汇册是所有比赛项目的成绩总册，只要查询一下就会输出所有比赛项目的运动员成绩信息。
3.4 系统工具
3.4.1 运动会数据备份和恢复
运动会数据备份是把运动会的数据库备份到别的地方，运动会数据恢复是把备份的数据库还原到原来的地方。
3.4.2 系统数据表浏览
系统数据表浏览是对运动会管理系统数据库的的表进行浏览，只要选中一个表进行浏览就会输出该表中所有的记录。
3.4.3 用户管理
    用户管理有用户添加、用户删除、用户密码修改。
























       

第四章 数据库设计
通常把编码和测试统称为实现。
4.1 数据库表创建
根据学校田径运动会的实际过程，学校田径运动会管理系统主要涉及到的数据表有用户信息、运动员名单、运动员参赛情况、运动项目名单、田赛成绩、全能成绩、径赛初赛成绩、径赛预赛成绩、径赛决赛成绩、最终成绩、岗位表、工作人员表，这些表都是要先建的。各个表的属性如下：
用户信息(用户名 char(20)，密码 char(20))
运动员名单(姓名 char(20),学号 char(20),性别 char(2),代表队 char(20))
运动项目名单(项目名称 char(20)，项目类型 char(20)，跑道类型 char(20))
田赛成绩(姓名char(20)，项目类型 char(20)，成绩 int(10))
全能成绩(姓名char(20)，项目类型 char(20)，成绩 int(10))
径赛初赛成绩(姓名char(20)，项目类型 char(20),成绩 int(10),组号 int(10),道号 int(10))
径赛预赛成绩(姓名char(20)，项目类型 char(20),成绩 int(10),组号 int(10),道号 int(10))
径赛决赛成绩(姓名char(20)，项目类型 char(20),成绩 int(10),组号 int(10),道号 int(10))
最终成绩(姓名 char(20)，项目名称 char(20)，成绩 int(10),名次 int(10),分数 int(10))
岗位表(岗位编号 char(20)，岗位名称 char(20))
工作人员表(姓名 char(20)，岗位 char(20))
先建好这些数据表，然后再设计界面及编写代码。










第五章        界面设计及编码
所谓编码就是把软件结果翻译成用某种程序设计语言书写的程序。作为软件工程过程的一个阶段，编码是对设计的进一步具体化，因此，程序的质量主要取决于软件的质量。但是，所选用的程序设计语言的特点及编码风格也将对程序的可靠性、可读性、可测性和可维护性产生深远的影响。界面设计是接口设计的一个重要的组成部分。对于交互式系统来说，人机界面设计和数据设计、体系结构设计及过程设计一样重要。
5.1登陆界面
登陆界面作为本软件的一个门户，要有钥匙才能打开，这把钥匙就是帐号密码。界面如图5-1所示。

图5-1登陆界面

      输入帐号密码，帐号密码正确就可以进入主界面。登陆界面中涉及到的核心代码如下：
If Text1.Text <> "" And Text2.Text <> "" Then
   strsql = "select * from 用户信息 where 用户名='" & Text1.Text & "' and 密码='" & Text2.Text & "'"
   Set rs = cnn.Execute(strsql)
   If Not rs.EOF Then '输入的登录信息正确，则进入系统
      主界面.Show
      Unload 登陆界面
   Else
      MsgBox "您输入的登录信息有误，请重新输入！", vbOKOnly + vbExclamation, "提示"
      Text1.Text = ""
      Text2.Text = ""
      Text1.SetFocus
   End If
Else
   MsgBox "您输入的帐号或密码有误！", vbOKOnly + vbExclamation, "警告"
   Text1.Text = ""


   Text2.Text = ""
   Text1.SetFocus
End If
此登陆界面中涉及到的帐号密码就是用户信息表中的记录，如果用户信息中没有与输入的帐号密码相匹配的，就出现“您输入的帐号或密码有误!”的提示。

5.2主界面
主界面是进行比赛进程的各个功能的总控制。把进行田径运动员所要有的功能通过菜单全部编辑在一起，只要点击相应的菜单项就可以进行各种功能操作。主界面也就是各种功能的连接点。主界面图5-2所示

                                        图5-2 主界面




    主界面左上角就是菜单，每一个菜单中都有多个菜单项，每个菜单项就是进行比赛管理的一个模块缺一不可。所有的菜单项组成一个学校田径运动会管理系统。
5.3 前期编排
前期编排中的定义比项目、设置工作岗位、录入工作人员、运动员报名和录入纪录成绩都是表中不存在的就插入到表中，如果存在就修改。这几个小模块的代码在同小异这里只摘入其中一个小模块的代码。这里就以运动员报名为例界面如图5-3所示：

图5-3 运动员报名界面

在运动员报名界面中输入要报名人的信息及所要参加的项目，如果此人在运动员名单中不存在则把此运动员信息插入到运动员名单中，并且把此人所要报的项目信息插入到参赛情况表中。如果此人存在于运动员名单中且该项目没有被此人选择则把此人参加该项目的信息插入到参赛情况表中，否则提示此人已经参加了此项目。部分代码如下：
      strsql = "select * from 运动员名单 where 姓名='" & Text1.Text & "' or 学号='" & Text2.Text & "'"
      Set rs = cnn.Execute(strsql)
      If rs.EOF = True Then '该运动员不存在，可以入库
         strsql1 = "insert into 运动员名单 values('" + Text2.Text + "','" & Text1.Text & "','" + Combo2.Text + "','" + Text4.Text + "')"
         strsql3 = "insert into 运动员参赛情况 values('" + Text1.Text + "','" + Combo1.Text + "')"
         cnn.Execute (strsql1)
         cnn.Execute (strsql3)
         MsgBox "报名成功！", vbOKOnly, "提示"
      Else
             strsql2 = "select * from 运动员参赛情况 where 姓名='" & Text1.Text & "' and 项目名称='" & Combo1.Text & "'"
             Set rs = cnn.Execute(strsql2)
             If rs.EOF = True Then
                strsql4 = "insert into 运动员参赛情况 values('" & Text1.Text & "','" & Combo1.Text & "')"
                cnn.Execute (strsql4)
             End If
        End if
















5.4 比赛管理
比赛管理模块中有三个小模块分为：径赛成绩录入与输出、田赛成绩录入与输出和全能成绩录入与输出。这三个模块要实现的功能也一样，所以这三个模块的界面也差不多，在这里就用其中的一个模块来做为例子，就以田赛成绩录入与输出这个模块为例，界面如图5-4所示：

图5-4 田赛成绩录入与输出界面

从项目和姓名中选择相应的项目及姓名，输入成绩如果此人的此项目成绩没有录入单击确定就可以把此成绩插入到田赛成绩表中，如果成绩已存在则修改此成绩。代码如下：

      strsql = "select * from 田赛成绩 where 姓名='" & Combo2.Text & "' and 项目名称='" & Combo1.Text & "'"
      Set rs = cnn.Execute(strsql)
      If rs.EOF = True Then '该项目成绩没有被记录，可以入库
         strsql3 = "insert into 田赛成绩 values('" & Combo2.Text & "','" & Combo1.Text & "','" & Text3.Text & "')"
         cnn.Execute (strsql3)
         MsgBox "修改成功！", vbOKOnly, "提示"
         Text3.Text = ""
      Else
         strsql4 = "update 田赛成绩 set 成绩='" & Text3.Text & "' where 姓名='" & Combo2.Text & "' and 项目名称='" & Combo1.Text & "'"
         cnn.Execute (strsql4)
          Text3.Text = ""
      End If
单击图(4)中的输出就是得出田赛项目的最终成绩即得出田赛项目的名次。田赛输出是把每个田赛项目中的前几名的人员成绩信息输出到最终成绩表中，从田赛成绩中的开始查找田赛项目，则从田赛成绩表中把从项目名单中查找到的项目的前几名成绩信息输出到最终成绩表中。然后再从田赛成绩中查找下一个田赛项目，再把该项目的前几名输出到最终成绩表中，以此循环直到田赛成绩中的项目全部查完。输出部分的代码如下：
strsql6 = "select 每项目取的名次 from 参数表"
Set rs = cnn.Execute(strsql6)
strsql = "select distinct 项目名称 from 田赛成绩"
Set rs1 = cnn.Execute(strsql)
i = 0
Do While Not rs1.EOF
    strsql1 = "select * from 田赛成绩 where 项目名称='" & rs1.Fields(0) & "'order by 成绩 desc"
    Set rs2 = cnn.Execute(strsql1)
    For j = 0 To Val(rs.Fields(0)) - 1
      strsql3 = "select * from 最终成绩 where 姓名='" & rs2.Fields(0) & "' and 项目名称='" & rs2.Fields(1) & "'"
      Set rs = cnn.Execute(strsql3)
      If rs.EOF Then
        strsql0 = "select 分数 from 名次分数表 where 名次=" & j + 1 & ""
        Set rs5 = cnn.Execute(strsql0)
        strsql2 = "insert into 最终成绩(姓名,项目名称,成绩,名次,分数) values('" & rs2.Fields(0) & "','" & rs2.Fields(1) & "','" & rs2.Fields(2) & "','" & j + 1 & "','" & rs5.Fields(0) & "')"
        cnn.Execute (strsql2)
      End If
        rs2.MoveNext
    Next
    rs1.MoveNext
    i = i + 1
Loop
5.5 查询输出
查询输出模块中有七种不同的查询：运动员成绩查询、代表队成绩查询、项目成绩查询、总分表、项目名次表、成绩名次表和成绩汇册。这些查询都是使用SQL语句进行查询，不同的就是SQL语句中的条件不同面已，因此在代码方面都差不多，如项目成绩查询。项目成绩查询界面如图5-5所示。

图5-5 查询界面

从图(5)中的项目名称中选择一个项目，然后单击查询就会输出该项目的所有运动员的比赛成绩。部分代码如下：
If Combo1.Text = "" Then
   MsgBox "请选择项目名称!", vbOKOnly, "提示"
Else
strsql = "select 项目类型 from 运动项目名单 where 项目名称='" & Combo1.Text & "'"
Set rs = cnn.Execute(strsql
If rs.Fields(0) = "田赛项目" Then
    strsql1 = "select * from 田赛成绩 where 项目名称='" & Combo1.Text & "'"
    Set rs1 = cnn.Execute(strsql1)
    With MSHFlexGrid1 '详细查询的信息显示
    .Rows = 2
    .CellAlignment = 4
    .TextMatrix(0, 0) = "姓名"
    .TextMatrix(0, 1) = "项目名称"
    .TextMatrix(0, 2) = "成绩"
    Do While Not rs1.EOF
       .Rows = .Rows + 1
       .CellAlignment = 4
       .TextMatrix(.Rows - 2, 0) = rs1.Fields(0)
       .TextMatrix(.Rows - 2, 1) = Trim(rs1.Fields(1))
       .TextMatrix(.Rows - 2, 2) = rs1.Fields(2)
       rs1.MoveNext
    Loop
    '.Rows = .Rows - 1
  End With
End If
End if
上述代码只是实现选择的项目是田赛项目的成绩输出，选择的项目是径赛项目和全能项目这里就不列出来了。实现项目成绩查询首先选择项目名称再查询，先判断选择的项目是哪一种类型的项目，如果是全能项目或田赛项目则第一行是姓名、项目名称和成绩，如果是径赛项目第一行就是姓名、项目名称、初赛成绩、预赛成绩和决赛成绩，从第二行开始就是该项目所有运动员的成绩信息。
5.6 系统工具
系统工具是为本系统服务的工具，方便本系统的使用。如数据库备份与恢复就是为了防止系统的数据库出现错误，可以通过还原数据库来修正这个错误。而数据表的浏览是让人清楚数据库中有哪些表及表的属性，让人更清楚明白数据库表的结构。这里就以数据库备份与还原为例，界面如图5-6所示

图5-6备份与还原界面                    图5-7 备份完成界面
只要单击下图(6)中备份或恢复即可完成备份或恢复操作。图(7)就是完成了数据库备份成功后的界面。备份数据库就是把系统中的数据库压缩拷贝到另外的路径文件下面。
Dim FileName As String
    Dim FileBack As String
    Dim Info As String
    FileName = mypath & "db1.mdb"
    FileBack = mypath & "backup/db.bak"
    Info = "正在备份数据库" & FileName
    BackupDatabase FileName, FileBack, Info
MsgBox "备份数据库成功！", vbInformation, "提示"

















结束语
本系统在Windows XP环境下设计调试成功，经过调试证明：
1． 只要录入的报名和比赛成绩数据准确，本软件就能保证处理结果准确。不需要反复核对，重复劳动。
2． 软件处理的速度快，保证实时的数据处理，满足随时的信息查询要求。
3．由于水平和时间有限，本系统还有不足之处，比如在径赛中如有一组运动员成绩特别好也只能取其中几人不能按绝对成绩录取等。















参考文献
[1] 郑海春，谢维成. Visual Basic编程及实例分析教程.清华大学出版社.2007
[2] 王新民. Visual Basic程序设计与数据库应用.电子工业出版社.2003
[3]吴永琢.看实例学编程—Visual Basic程序设计.西安电子科技大学出版社.2004
[4] 萨师煊. 数据库系统概论.高等教育出版社.2004
[5] 张平. 数据库应用基础ACCESS2003.人民邮电出版社.2007
[6] 赵国玲，咎玲.ACCESS数据库应用.机械工业出版社.2006
[7] 丛明礼. 田径竞赛规则.人民体育出版社.2002
[8] 李老民. 田径竞赛裁判工作手册.北京体育大学出版社.2005














致 谢
经过一个多月的调研、设计和开发，这套学校田径运动会管理系统已基本结束。在本次毕业设计中，我从指导老师陈木生老师身上学到了很多东西，陈老师认真负责的工作态度、严谨治学的精神和深厚的理论水平都使我受益匪浅；同时我还要感谢同学对我的帮助，指出我的错误及不妥之处，进一步完善我的毕业设计。无论在理论上还是在实践中，他们都给予我很大的帮助，使我的应用水平得到了很大的提高，这对于我以后的工作和学习都有一种巨大的帮助。今后的工作中，我将充分运用自己所学的计算机知识，并在工作中不断学习和完善，充分发挥一名计算机专业人员的作用，为企业的腾飞和发展贡献自己的力量。

静候缘来

你有没有见过这么整齐的十五字啊

千纸鹤

你有没有见过这么整齐的十五字啊

青青小苗

如果你智商能再高点，也许我会上当

静候缘来

如果你智商能再高点，也许我会上当

+赤月冥静

信春哥，得永生!keleshare.cn

Nikemek

如果这就是爱，再转身的时候就该留下

成仙预备会

信春哥，得永生!keleshare.cn

斜月吟风

楼主你知道的太多了。

晓风残月

闪瞎了我的钛合金狗眼