运动员信息管理系统MIS

摘 要 运动员信息管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面.对于前者要求建立数据一致性和完整性强,数据安全性好的数据库.而对于后者则要求应用程序功能完备,易使用等特点。随着科学技术的发展与推广，“信息化”系统的建设已开始在许多领域得到应用，在体育行业，特别是在体育管理当中，“运动员管理”的信息化建设也逐步得到重视。通过使用运动员信息管理系统，使A大学运动员信息的管理工作系统化、规范化、自动化、简易化、智能化，从而达到提高运动员信息管理效率的目的。系统开发采用Microsoft公司的Visual Foxpro 6.0，利用其强大的可视化界面功能及对数据库的支持，先构造一个原型，逐步增加功能，最终满足需求。关键词：运动员信息 VFP 管理系统目 录摘要-1第一章 概述-3第二章 系统分析-62.1用户需求-62.2系统的可行性分析-62.3系统开发步骤-72.4目标系统分析-7第三章 系统设计-9 3.1系统功能模块-93.2 数据库设计-10第四章 系统编码与实现- 244.1 系统实施平台-244.2 各个功能模块的设计-254.3 程序设计-44第五章 开发总结-50附录：参考文献-50第2页第一章 概述一般来讲，管理通过计划、组织、指导与领导、控制等手段，为组织制定目标，应用组织的各种要素，以实现组织的目标。传统的管理活动中，把人、才、物作为企业的主要资源。但是随着社会化大生产的不断扩大和社会对产品多样化的需求，人们越来越重视信息在生产经营及企业管理中的作用，并把它当做企业的一种极其重要的资源，人们称之为“信息资源”，信息资源的处理已经成为当今世界上一项主要的社会活动。在任何一个组织中，有效的计划和控制都需要得到有关的信息，决策的质量在很大程度上有赖于对一件事情的周围环境、各种备选方案、自然状态和竞争策略等的了解。管理的有效性需要信息的支撑，因此，管理科学理论的一个合理发展就是利用计算机的大量数据供给能力管理现有的信息。管理信息系统就是由此产生的。所谓管理信息系统是一种由许多个人、各种机械装置以及有关的程序所组成的，用以从内源和外源两个方面提供有关信息的结构性综合性。它通过提供作为制定决策依据的统一信息，来为一个组织的计划、控制和作业职能服务。管理信息的类型以及信息源在组织的不同层次中有所不同，因此，信息可分为计划信息、控制信息和作业信息。管理信息系统就是根据组织各层次的需要组织、分析和提供各种信息，并帮助决策的。 本世纪以来，由于社会生产力的迅速发展和科学技术的突飞猛进，人们进行信息交流的深度和广度不断增加，管理所需要的信息量急剧增长，同时对信息的处理要求及时、准确，这导致了传统的信息处理方法和手段已不能适应现代管理的需要；电子计算机的诞生和在信息处理中的应用，标志着一个崭新时代“信息时代”的开始，它使企业管理现代化成为可能。一定意义上说，管理信息系统的产生和发展是建立在电子计算机基础之上的。硬件方面，自1946年第一台电子计算机诞生以来，计算机技术的发展可谓日新月异，从庞大的只能在实验室里供研究使用的计算机到如今能适应不同环境满足不同需求的各种各样的计算机；运算速度从每秒几千次到每秒几百亿次；处理器从焊有上百万个电子管的大的惊人的电子板到只有指甲大小的集成电路；现在计算机在硬件方面的发展已达到了每三个月更新换代一次的惊人速度。软件方面，也已从机器语言、汇编语言、高级语言发展到现如今的第四代语言非结构化、面向对象、可视化的语言。 管理信息系统是一门新兴的科学，其主要任务是最大限度的利用现代计算机及网络通讯技术加强企业的信息管理，通过对企业拥有的人力、物力、财力、设备、技术等资源的调查了解，建立正确的数据，加工处理并编制成各种信息资料及时提供给管理人员，以便进行正确的决策，不断提高企业的管理水平和经济效益。目前，企业的计算机网络已成为企业进行技术改造及提高企业管理水平的重要手段。 随着我国与世界信息高速公路的接轨，企业通过计算机网络获得信息必将为企业带来巨大的经济效益和社会效益，企业的办公及管理都将朝着高效、快速、无纸化的方向发展。MIS系统通常用于系统决策，例如，可以利用MIS系统找出目前迫切需要解决的问题，并将信息及时反馈给上层管理人员，使他们了解当前工作发展的进展或不足。换句话说，MIS系统的最终目的是使管理人员及时了解公司现状，把握将来的发展路径。 管理信息系统不仅是一个技术系统，而且是一个社会系统，其原因如下： MIS的发展是伴随着计算机技术的发展而展开的，之所以有MIS的产生，计算机技术是它得以存在的基础，计算机技术的发展直接推动了MIS从低级低效发展到了高级高效。其次，MIS作为一个基于计算机的系统，其数据分析，软件开发等都是需要技术的支持，同时，对于MIS的开发和使用都需要专业的人来做，因此说MIS是一个技术系统。 管理信息系统是社会系统的抽象表达，社会系统的各个实体之间通过信息发生相互作用，而把这些实体抽象成为管理信息系统里的节点，将不可见的信息具体化，进行分类、检索和储存，提高信息的质量，就可以提高实体之间交流和相互作用的效率。任何一个实际有效的管理信息系统都是一个社会系统的映像，管理信息系统的运作可以提高社会系统的运作效率，它实际上也是社会系统的一部分，是社会系统高度发达的产物。运动员信息管理系统的意义体育信息资源开发利用现代信息技术采集、处理、存储、传递和使用体育信息资源，提高体育信息资源的可获得性、适用性和有效性，提高其数字化、数据库化和网络化水平，实现高度共享，促进体育事业的快速健康发展。A大学运动员信息管理系统的开发与应用，实现了系统内无纸化办公，实现数据共享，大大提高了工作效率，完善了运动员竞争与激励机制，完善组建、选拔、管理等各项制度，充分发挥管理人员、教练员等各方面的积极性与创造性。另外也表明了运动员管理正逐步实现信息化建设，顺应体育管理信息化、现代化建设的潮流，将管理、服务与时代接轨，极大地提升运动员团体组织管理的先进性，有效促进体育系统管理管理数字化建设进程，有效解管理的繁重业务，提高管理水平、管理质量成为运动员生活规范管理、提高竞技水平不可缺少的一部分，使体育信息建设体系更加完善。第二章 系统分析2.1用户需求： A大学是一所体育事业强健的综合性理科院校，近年来，随着学校运动员学生招收的规模的不断扩大，管理的复杂度同样倍增，若采用传统的管理手段和方法，即使增加管理人员，加大工作量，也无法满足对高质量管理服务的需求。建成学校体育部的运动员信息管理系统，可以大大提高学校体育工作的效率，及时、准确的掌握运动员的情况；有利于更好的发现、选拔、和培养体育人才；为科学、有效的进行管理和训练提供可靠的信息。当前，在引用信息技术为实现体育人才管理的系统化、过程控制化合信息化方面还处于滞后状态，体育产业管理者获取信息一般只能通过纸质文件（纸质记录及各种报告等），检索费时，信息量少，传递速度慢。运动员信息管理系统就是要着手解决这个问题。为把项目建设成为先进的现代化管理水平，建立“运动员信息管理系统”，充分利用现代化技术手段，高效、合理地应用运动员管理，促进体育系统各项目管理工作再上台阶。“运动员信息管理系统”建成后，为学校体育事业的管理带来高效、方便与安全，他既对运动员日常活动的管理，又为运动员输送安置等信息管理，对运动员管理决策支持具有重大意义。运动员信息管理系统通过对运动员信息的及时采集、实时更新与集中存储管理，通过从选材、训练、输送、安置等一系列职业同期的跟踪记录，实现对运动员生活职业周期的全过程管理。系统提供运动员、教练员等信息相互无限关联查询，针对运动员、各体育项目发展情况提供更完善的统计分析功能，并且对未来运动员素质提高及运动项目发展空间提供趋势分析及预测，为体育决策者提供更好的数据化信息辅助。2.2系统的可行性分析系统的可行性分析包括两个详细的部分：分析开发新的系统的必要性和可能性。必要性在前面系统初步调查中已经作了详细的分析，在这里就不再赘述；可能性主要包括经济可行性、技术可行性和运行可行性三个方面。经济可行性研究是对组织的经济现状和投资能力进行分析，对系统建设运行和维护费用进行估算，对系统建成后可能取得的社会和经济效益进行估计。 技术可行性要考虑现有的技术条件是否能够顺利完成开发工作，软硬件配置是否满足开发的需求等。运动员信息管理系统用的是VFP开发语言，调试相对简单，当前的计算机硬件配置也完全能满足开发的需求，因此在技术上是绝对可行的。软件方面：由于目前单机模式相对发展成熟，故软件的开发平台成熟可行。硬件方面，它们速度快、容量大、可靠性能高、价格低，完全能满足系统的需求。 运行可行性是对组织结构的影响，现有人员和机构、设施设施和环境对系统的适应性及人员培训补充计划的可行性。当前我们信息化技术已经相当普及，各类操作人员水平都有相当的高度，所以在运行上是可行性的。2.3系统开发步骤一般说来，管理信息系统的建立与应用可以划分成总体规划、系统开发和系统运行三个阶段，其中系统开发阶段还可进一步分为系统分析、系统设计和系统实施等工作环节。上述各个阶段排列成一个严格的线性开发序列，在每个工作阶段均产生完整的技术文档作为下一阶段工作的指导和依据，每一阶段都应对文档进行评审，确信该阶段工作已完成并达到要求后才能进入下一阶段，同时在以后的工作中不能轻易改变前面经过评审的成果。 上述开发方式的主要优点是便于开发工作的组织和管理，并且可大大降低管理信息系统开发的复杂性。国内外许多系统开发的实例都证明这是一种行之有效的开发方式。国外曾有人对一些软件项目开发各阶段的工作量进行了统计，结果表明，在开发过程中各工作阶段所占全部工作量的比重分别达到系统分析：系统设计：编程：模块调试：系统调试20%：15%：20%：25%：20%。由此可见，程序编写在开发工作中只占很小比例，而调试工作却占整个开发工作量的一半左右，因此“系统开发就是编程”的习惯说法显然是片面的。另据统计，在建立管理信息系统的三个阶段中，总体规划和系统开发阶段的工作量约占整个工作量的2/3，而运行、维护阶段要占1/3，这说明一个管理信息系统开发后，仍应十分重视它的维护工作，以便使系统不断完善并充分发挥其作用。2.4目标系统分析人类的生产和生活很大程度上依赖于信息的收集、处理和传送。获取信息并对它进行加工处理，使之成为有用信息并发布出去的过程，称为信息处理。信息处理的过程主要包括信息的获取、储存、加工、发布和表示。 1传统人工处理信息特点：传统的信息处理采用人工输入登记数据，手工操作，虽能直接面对原始数据真实资料，但一旦资料数据信息达到一定复杂程度时人工操作的方式就显得吃力繁杂，效率低下，且容易造成一些人为操作的失误。总的来说，传统人工处理信息的方式已不能适应时代的发展与需要。 2. 计算机处理信息特点：利用大容量的计算机存储设备储存数据，其可靠性与永久性超过了历史上任何一种信息存储载体。每秒钟能进行几千亿次乃至几万亿次运算的计算机，为人们提供了快速准确处理信息的能力。它能从瞬息万变、多如牛毛的信息中，以最快的速度分析有用的信息，供人决策。多媒体计算机把各种传统的信息展示手段【如文字、图像、声音等】有机的结合在一起，使信息更加丰富多彩的形式呈现在人们面前。因此，利用计算机处理信息已成为时代发展的必要趋势。第三章 系统设计3.1.功能模块3.1.1. 系统前台操作流程图登录否用户名、密码正确？是运动员信息管理系统用户信息登记报表打印浏览基本信息修改用户密码数据查询退出系统3.1.2管理信息系统设计阶段的主要目的是将系统分析阶段所提出的反映了用户信息需求的系统逻辑方案转换成可以实施的基于计算机与通信系统的物理（技术）方案。具体要求对系统进行功能分解，不断下去，直到分解成含义明确，功能单一的单元功能模块，从而绘制出系统的功能模块图，即HIPO图。运动员信息管理系统的HIPO图如下：运动员信息管理系统信息查询运动员成绩查询运动员输送查询运动员等级查询报表打印基本信息系统维护系统管理修改密码教练员信息运动员输送表运动员学习成绩运动员个人信息用户注册用户信息登记修改用户密码运动员个人信息教练员信息运动员输送安排运动员学习成绩信息3.2、数据库设计3.2.1.数据库概念结构设计在数据库设计中，先要对系统分析所得的数据字典中的数据存储进行分析，然后得出系统的关系模式，可以采用实体联系图（简称ER图）的方法进行数据结构的描述。ER图由实体、属性、联系三部分组成。由基本项构思ERD的四条基本原则：（1）、根据由基本项构思ERD的原则1，能独立存在的事物作为实体。可得出“运动员”、“用户”、“学习成绩”、“输送”、“教练员”五个实体。（2）、根据由基本项构思ERD的原则2，两个或多个实体间的关联与结合，作为联系并确定类型。可得“分数”、“安排”、“训练”三个联系。（3）、根据由基本项构思ERD的原则3，实体的属性是实体的本质特征。可得：“运动员”的属性有：姓名、编号、性别、年龄、班级、学号、身高cm、体重kg、入队时间、运动项目、运动员等级“用户”的属性有：用户名、密码“学习成绩”的属性有：姓名、编号、运动项目、高等数学、大学英语、经济法、管理学“输送”的属性有：姓名、编号、运动项目、运动员等级、输送单位、输送时间“教练员”的属性有：姓名、教师编号、运动项目、性别、职称 根据数据字典的内容，得到本系统的实体联系图如下：运动员等级运动员姓名运动项目编号入队时间性别体重kg年龄身高cm学号班级 运动员实体信息管理学学习成绩姓名编号运动项目高等数学大学英语经济法 运动员学习成绩实体信息用 户密码用户名用户信息实体输送时间姓名运动员输送输送单位编号运动员等级运动项目 运动员输送实体信息教练员职称姓名性别教师编号运动项目教练员实体信息（4）、根据由基本项构思ERD的原则4，所有基本项在同一E-R图中作为属性要在且仅在一个地方出现。得到总体E-R图： 运动员姓名编号性别年龄班级学号身高cm体重kg入队时间运动项目运动员等级学习成绩输送教练员分数安排训练姓名编号运动项目高等数学大学英语经济法管理学姓名编号运动项目运动员等级输送单位输送时间用户姓名教师编号运动项目性别职称用户名密码1M1M父子类1M总体E-R图3.2.2.数据库逻辑结构设计 从E-R图导出一般关系模型的四条原则：1. E-R图中的每一个独立实体变换为一个关系，其属性变为关系的属性，其主标识变为关系的主码。2. E-R图中的从实体及相应的主从联系变换为一个关系，从实体的属性加上主实体关系的主码构成这个关系的属性。如果主从联系是1:1的，则以主实体关系的主码（作为外来码）为这个关系的主码；如果主从联系是1:M的，则以主实体关系的主码加上同一主实体个体联系的不同从实体个体赖以相互区分的属性组，组成该关系的主码。3. 1:M联系通过在“多”实体关系中增加相联系的“1”实体关系的主码及联系本身的属性来表达。其中“1”实体主码为外来码。4. M:M联系转换成一个独立的关系，被联系实体关系的主码（作为外来码）和联系本身的属性作为该关系的属性，被联系实体关系的主码组成其复合主码。根据从E-R图导出一般关系模型的第一条原则，每一个独立实体变换为一个关系。可得到“运动员”、“用户”“学习成绩”、“输送”、“教练员”五个关系。“运动员”关系：（姓名、编号、性别、年龄、班级、学号、身高cm、体重kg、入队时间、运动项目、运动员等级），（编号）为关系主码。表3.01 运动员关系表姓名编号性别年龄班级学号身高cm 体重 kg入队时间运动项目运动员等级主键“用户”关系：（用户名、密码），（用户名）为关系主码。表3.02 用户关系表用户名密码主键“学习成绩”关系：（姓名、编号、运动项目、高等数学、大学英语、经济法、管理学），（编号）为关系主码。表3.03 学习成绩关系表姓名编号运动项目高等数学大学英语经济法管理学主键“输送”关系：（：姓名、编号、运动项目、运动员等级、输送单位、输送时间），（姓名）为关系主码。表3.04 输送关系表姓名编号运动项目运动员等级输送单位输送时间主键“教练员”关系：（姓名、教师编号、运动项目、性别、职称），（教师编号）为关系主码。表3.05 教练员关系表姓名教师编号运动项目性别职称主键3.2.3. 物理结构的具体设计1物理结构设计的原则如下：（1）尽可能的减少数据冗余和重复。（2）结构设计与操作设计相结合。（3）数据结构具有相对的稳定性。2基于以上设计原则，本系统中相关表结构设计如下：运动员（个人信息）表字段名字段类型字段宽度是否为空姓名字符型8No编号字符型6No性别字符型4No年龄整型4No班级字符型10No学号字符型10No身高cm字符型8No体重kg字符型8No入队时间日期型8No运动项目字符型8No运动员等级字符型8Yes（运动员）学习成绩表字段名字段类型字段宽度是否为空姓名字符型8No编号字符型6No运动项目字符型8No高等数学字符型4No大学英语字符型4No经济法字符型4No管理学字符型4No（运动员）输送表字段名字段类型字段宽度是否为空姓名字符型8No编号字符型6No运动项目字符型8No运动员等级字符型8Yes输送单位字符型30Yes输送时间日期型8Yes教练员表字段名字段类型字段宽度是否为空姓名字符型8No教师编号字符型6No运动项目字符型8No性别字符型4No职称字符型8No用户表字段名字段类型字段宽度是否为空用户名字符型10No密码字符型6No3. 建立表索引4. 输入数据后的表的浏览：运动员（个人信息）表（运动员）学习成绩表（运动员）输送表教练员表用户表5. 项目管理器：数据库应用系统（项目）往往由多个文件组成，为更好地对其进行管理，建立一个项目,对数据库进行封装，还可以利用项目管理器对系统用到的其他所有的文件（例如图片、表单、菜单、报表、主程序、类等等，后面将介绍到）进行封装，然后对项目中的各种文件进行统一管理，这样极大方便了应用程序的开发，可以使某些程序组件的设计、修改和运行变得方便易行。由于本人开始建的表是自由表，所以建立好项目管理器后，添加进项目中。项目管理器如下图：3.2.4.数据库保护信息数据是是一种非常重要的资源，因此保证数据库的安全可靠、正确有效是非常重要的问题。一般的数据库管理系统（DBMS）都有提供了一定的数据保护功能。数据库保护也称为数据控制，主要包括数据的安全性、完整性、并发控制和数据库的恢复。数据库的安全性是保护数据库，以防止因防止非法使用数据库，造成的数据泄漏，更改或破坏。 数据库的完整性是保护数据库中的数据的正确性，有效性，相容性。 并发控制是为了防止多个用户同时存取同一数据，造成的数据不一致！第四章 系统编码与实现4.1 系统设施平台 MIS的系统设施平台主要是指作为MIS运行基础的计算机及其网络硬件、系统软件和开发维护环境。 1基于Intranet的MIS体系结构：简称企业内联网，A大学等高校自身建造的校园网即属于这种类型的内部专用网。企业内联网利用Intranet的Web模型作为通信协议，同时运用防火墙技术保证内部网络资源的安全性，在企业单位内部网络上形成一种三层结构的客户机/服务器，即浏览器/应用服务器/数据库服务器模式，由此构成企业MIS的基础结构。该种MIS结构功能强大、为学校、企业单位内外部大规模信息的组织、发布提供了有力手段，极大提高工作效率和管理质量。2操作系统Windows：Microsoft开发的Windows是目前世界上用户最多、且兼容性最强的操作系统。最早的Windows操作系统从1985年就推出了。改进了微软以往的命令、代码系统Microsoft DOS（简称MS-DOS）。Microsoft Windows是彩色界面的操作系统。支持键鼠功能。默认的平台是由任务栏和桌面图标组成的。任务栏是显示正在运行的程序、“开始”菜单、时间、快速启动栏、输入法以及右下角托盘图标组成。而桌面图标是进入程序的途径。默认系统图标有“我的电脑”、“我的文档”、“回收站”，另外，还会显示出系统自带的“IE浏览器”图标。运行的三公开核心部分。界面图形化，“所见即所得”，支持多用户、多任务，网络支持良好，出色的多媒体功能，硬件支持良好，众多的应用程序等都是Windows操作系统的优点。3Visual FoxPro6.0数据库管理系统：Visual FoxPro最初由美国Fox公司推出，后该公司被Microsoft公司收购。Visual FoxPro是FoxPro系列中新一代数据库管理系统的代表，它可视化、面向对象、具有强大的性能、功能完备的工具、极其友好的用户界面、简单的数据库存取方式、良好的兼容性、真正的可编译性、独一无二的跨平台技术和较强的安全性等等，是目前最快、最实用的微机版数据库管理系统软件之一，成为小型数据库管理系统的杰出代表。VFP6.0版本中提供了大量的诸如“数据库设计器”、“表单设计器”、“菜单设计器”、“报表设计器”等开发设计工具和向导工具（Wizard）,使以往费时费力的开发工作变得轻松自如。这些可视化的设计工具免除了开发者编写大量程序代码的工作。4.2 各个功能模块的设计1.登陆界面模块设计 主要代码如下:“确认”按钮代码：public cyhm,cmmchmm=thisform.text1.valuecmm=thisform.text2.valuesele userif allt(thisform.text1.value)= thisform.text1.setfocuselse if allt(thisform.text2.value)= thisform.text2.setfocus else locate for allt(用户名)=allt(thisform.text1.value); .and.allt(密码)=allt(thisform.text2.value) if eof() messagebox(用户名或密码错误，请重新输入！,64,提示) thisform.text1.value= thisform.text2.value= thisform.text1.setfocus() else cyonghu=allt(thisform.text1.value) cmima=allt(thisform.text2.value) do d:vfp98menu.prg thisform.release endif endifendif密码错误提示：另外为使界面更美观，另设计了登录后的系统封面，取代空白。2、基本信息模块设计 （1）运动员个人信息主要代码如下: 组合命令按钮“第一条”按钮： go mand2.enabled=.mand3.enabled=.t.thisform.refresh“上一条”按钮：if not bof() skip-1else go mand3.enabled=.t.thisform.refresh“下一条”按钮：if not eof() skipelse go mand2.enabled=.t.thisform.refresh “退出”按钮：thisform.release（2）运动员学习成绩信息“上一条”按钮代码：if recno()=1 go top mand1.enabled=.f.else mand2.enabled=.mand3.enabled=.t.thisform.refresh“下一条”按钮代码：if recno()=reccount() go bottom mand2.enabled=.f.else mand1.enabled=.mand3.enabled=.t.thisform.refresh（3）运动员输送信息（4）教练员信息3.系统管理模块设计（1）用户注册“注册”按钮代码：public cyhm,cmmcyhm=thisform.text1.valuecmm=thisform.text2.valuesele userif allt(thisform.text1.value)= thisform.text1.setfocuselse locate for allt(用户名)=allt(thisform.text1.value) if eof() messagebox(此用户已存在，请重新输入！,64,提示) thisform.text1.value= thisform.text2.value= thisform.text3.value= thisform.text1.setfocus() else if !allt(密码)=allt(thisform.text2.value) thisform.text2.value= thisform.text3.value= thisform.text2.setfocus() else if !allt(thisform.text2.value)=allt(thisform.text3.value) messagebox(确认密码错误，请重新输入！,64,提示) thisform.text3.value= thisform.text3.setfocus else repl 密码 with allt(thisform.text3.value) thisform.release endif endif endifendif密码错误提示：（2）用户信息登记 “确定”按钮代码： sele 运动员个人信息表if allt(thisform.text1.value)= messagebox(请输入完整信息！,64,提示) thisform.text1.setfocuselse if allt(thisform.text2.value)= messagebox(请输入完整信息！,64,提示) thisform.text2.setfocus else if allt(thisform.text3.value)= messagebox(请输入完整信息！,64,提示) thisform.text3.setfocus else if allt(thisform.text4.value)= messagebox(请输入完整信息！,64,提示) thisform.text4.setfocus else if allt(thisform.text5.value)= messagebox(请输入完整信息！,64,提示) thisform.text5.setfocus else append blank repl 姓名 with allt(thisform.text1.value) repl 编号 with allt(thisform.text2.value) repl 班级 with allt(thisform.text3.value) repl 学号 with allt(thisform.text4.value) repl 运动项目 with allt(thisform.text5.value) mand2.click endif endif endifendifendif（3）修改用户密码“修改”按钮代码：public cyhm,cmmcyhm=thisform.text1.valuecmm=thisform.text2.valuesele userif allt(thisform.text1.value)= thisform.text1.setfocuselse locate for allt(用户名)=allt(thisform.text1.value) if eof() messagebox(此用户不存在，请重新输入！,64,提示) thisform.text1.value= thisform.text2.value= thisform.text3.value= thisform.text4.value= thisform.text1.setfocus() else if !allt(密码)=allt(thisform.text2.value) messagebox(密码错误，请重新输入！,64,提示) thisform.text2.value= thisform.text3.value= thisform.text4.value= thisform.text2.setfocus() else if allt(thisform.text3.value)= messagebox(请输入新密码！,64,提示) thisform.text3.setfocus else if !allt(thisform.text3.value)=allt(thisform.text4.value) messagebox(确认密码错误，请重新输入！,64,提示) thisform.text4.value= thisform.text4.setfocus else repl 密码 with allt(thisform.text4.value) thisform.release endif endif endif endifendif 4.信息查询模块设计（1）运动员成绩查询“确定”按钮代码thisform.grid1.recordsource=cCombo2_value = ThisFbo2.ValueSELECT 姓名,编号,运动项目,高等数学,大学英语,经济法,管理学 FROM 运动员学习成绩表 WHERE ALLTRIM(运动员学习成绩表.编号) = cCombo2_value INTO CURSOR TmpGrid1;order by 编号 ascThisForm.Grid1.RecordSourceType = 1ThisForm.Grid1.RecordSource = TmpGrid1执行查询：（2）运动员输送查询“确定”按钮代码：thisform.grid1.recordsource=cCombo1_value = ThisFbo1.ValueSELECT 姓名,编号,运动项目,运动员等级,输送单位,输送时间 FROM 运动员输送表 WHERE ALLTRIM(运动员输送表.编号) = cCombo1_value INTO CURSOR TmpGrid1;order by 编号 ascThisF