计算机应用毕业论文范文1.doc

南京信息职业技术学院 毕业设计论文 作者 学号 系部 软件学院 专业 计算机应用专业 题目 学生成绩管理系统 指导教师 评阅教师 完成时间： 2010 年 5 月 25 日 毕业设计(论文)中文摘要 (题目)：学生成绩管理系统 摘要 ：学生成绩管理系统是为了实现学生成绩管理的系统化、规范化和自动化，从而 提高管理效率而设计的。它完全取代了原来一直用人工管理的工作方式，避免了由于管 理人员的工作疏忽以及管理质量问题所造成的各种错误，为及时、准确、高效的完成对 学生成绩的管理提供了强有力的工具和管理手段。学生成绩管理系统是一个中小型数据 库管理系统，它界面美观、操作简单、安全性高，基本满足了学生成绩管理的要求。重 点介绍了学生成绩管理系统的实现过程：包括系统分析，系统调查,功能设计，数据库 设计，系统实现，系统测试和调试等。本系统主要功能有查询学生成绩、添加学生成绩、 删除学生成绩、管理页面和修改管理员密码等内容。 本系统是在以 access2003 作为后台数据库，以 visual basic 为编程语言来开发 的。学生成绩管理系统在运行阶段，效果好，数据准确性高，提高了工作效率，同时也 实现了成绩管理与计算机的结合使用 关键词：学生成绩管理系统，成绩管理，成绩查询，access， 毕业设计(论文)外文摘要 titletitle : : the management system of the students grades abstract: the management system of the students grades is designed for realizing the systematization, standardization and automization of enterprises products management and improving efficiency of school management. it completely replaces the working way of artificial management originally , prevents from various kinds of mistakes because of administrative staff neglect and the quality problem of management and offeres powerful tool and management way to complet storehouse management for prompt , accurate , high-efficient . the administrative system of the students grades is a medium and small-scale database management system, it has not only beautiful interface, but also the high security and the simply operation , and meet the demand for students grades management basically.the paper focus on the implementation procedure of the system, including systems analysis, system research, function design, database design, system implementation, system testing and debugging. the primary function of this system includes performance inquiring, performance adding students scores, performance deleting, page layout management and administrators password revising. the students grades administrative system is designed with regarding access2003 as the backstage database and regarding visual basic as programming language . the administrative system is effectual, the high data accuracy during the course of operating , improves working efficiency and realizes computerization for students grades administrative at the same time . key words: the management system of the students grades， grades management, grades inquiry, access i 目录目录 1. 绪论.1 1.1 问题的提出 1 1.2 现有系统存在问题的分析 1 1.3 系统开发目标与意义 2 1.4 可行性分析 3 1.4.1 经济上可行性 3 1.4.2 技术上可行性 3 1.4.3 运行上可行性.3 2.需求分析4 2.1 用户需求描述 4 2.2 用户需求具体分析 4 2.2.1 系统分析 4 2.2.2 学生基本情况管理图表.5 2.2.3 学生成绩管理图表 6 2.2.4 学生课程基本信息管理图表 7 2.2.5 本系统用户信息表 8 2.2.6 系统维护 8 3.系统代码实现9 3.1 ado 对象模型介绍.9 3.2 公共模块 .12 3.3 系统的登录界面 .14 3.4 专业课成绩管理 .16 4.其他界面介绍.20 4.1 登录界面 .20 4.2 添加新用户 .21 4.3 修改登录用户的密码 .21 4.4 查看学生的基本信息 .22 4.5 查看专业课基本信息 .24 4.6 查看学生选修课基本信息 .24 结论.25 致谢.25 参考文献.26 1 1. 绪论绪论 本毕业论文是以学校学生管理信息系统建设中的成绩管理系统的开发为背景，论 述了管理信息系统的概念、结构及系统开发的基本原理和方法，全文共分为绪论、系 统分析、概要设计、详细设计、开发总结、致谢、参考文献、附录等。 1.11.1 问题的提出问题的提出 随着计算机技术的发展，特别是计算机网络技术与数据库技术的发展，使用人们 的生活与工作方式发生了很大的改观。网络技术的应用使得计算机之间通信、信息共 享成为可能，而数据库技术的应用则为人们提供了数据存储、信息检索、信息分析等 功能，从而使得工作更高效地进行。 数据库始于 20 世纪 60 年代，经过 40 多年的发展，现在已经形成了理论体系， 成为计算机软件的一个重要分支。数据库技术体现了当代先进的数据管理方法，使计 算机的应用真正渗透到国民经济各个部门，在数据处理领域发挥着越来越大的作用。 而互联网技术的出现，更是进一步丰富的人类生活，数字化生存已经一步步走进 我们的生活与工作。互联网技术与数据库技术的结合为计算的在人类生活中的应用带 来了巨大的影响。产业信息化，管理现代化，科学化已经成为行业发展的重要课题， 这不仅是企业提高自身竞争力，甚至是国家提高综合国力，走向国民富强的重要手段。 在我国，教育是一个影响着国富民强的重要行业，随着改革开放和市场经济的发 展根据中国特有的国情发展，教育得到了国家的大力扶持与社会各界的高度重视，从 而使教育业向规范性与现代化的方向高速发展，但是同发达国家相比，我国的教育行 业的信息技术的应用程度还很低，只有在大城市中发展较早、规模较大的院校中才使 用计算机进行大规模操作，从各方面提高工作效率，取得良好的社会和经济效益，而 一些新兴的、规模较小的教育机构还没有全部具备这种功能。因此可见，随着我国教 育的迅速发展，信息技术在其上的应用会更加地广泛和深入。 2 1.21.2 现有系统存在问题的分析现有系统存在问题的分析 在我国，各大中小学校的各类信息管理系统并非一个新的课题，但也有的学校根 本就没有信息任何管理系统，所有的工作几乎还是手工操作来完成。计算机技术在日 新月异的发展，但是有的很多学校，特别是在西部贫困地区，学校的种类管理都依然 由手工操作来完成，这十分落后，效率极低，成本很大，而且极异出错。随着社会的 发展，信息化是社会进程的必然趋势，学校管理只有只有快，准，精才能发挥其价值。 所以机器代替人力是必然的历史发展趋势，只有领导的重视和支持才能从人工操 作改为计算机的自动化系统。人工操作必将被计算机代替。 有些学校虽使用了计算机，甚至管理系统，但是仍然存在很多问题，问题一日不 解决，效率就一日提不上去。 还有，有的系统很不完善到处是漏洞，可以说是千疮百孔，这样极不完善的系统 对管理来说是没有任何保障的。所以需要使用一个完善的学生成绩管理系统来实现解 决这些问题。 1.31.3 系统开发目标与意义系统开发目标与意义 本系统是将现代化的计算机技术和传统的教学、教务工作相结合，按照学院的工 作流程设计完成的。为了使系统在学院的管理中发挥更大的作用，实现工作过程的计 算机化，提高工作效率和工作质量，本系统通过收集、整理班上所以学生的基本信息， 主要包括每个学生的基本信息（学号，姓名，性别，籍贯，出生年月.） 、每个学生 的专业课、公共课以及校选修课的基本信息（课程编号，课程名称，课程成绩，课程 学分，平均成绩，） ，通过对基本信息的存储，使每一个学生能查到有关自己的 所有基本情况。主要目的是能为班上的每一为学生提供成绩查询，为系上的各种考评 提供参考，进一步地提高工作效率。 在各大中小学校，用计算机管理学校的信息已经越来越普遍了。用计算机不但可 以提高工作效率，而且还节省了许多人力物力，增强了学校资料的安全性。提高了学 校的管理能力，为此，用计算机来管理学校的信息，是非常必要的。这样也方便每一 位同学能在需要时查询自己的成绩，也方便了系上对班上的基本情况有一个了解，也 3 是系上在评优等方面的一个重要的参考。再由于班上的同学都基本上在上网，可以通 过学校的网络了解自己有关的基本信息。 1.41.4 可行性分析可行性分析 可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能够解决。 1.4.1 经济上可行性 现在，计算机的价格已经十分低廉，性能却有了长足的进步。而本系统的开发， 为学校的工作效率带来了一个质的飞跃，为此主要表现有以下几个方面： 第一，本系统的运行可以代替人工进行许多繁杂的劳动； 第二，本系统的运行可以节省许多资源； 第三，本系统的运行可以大大的提高学校的工作效率； 1.4.2 技术上可行性 本系统的开发利用 microsoft office access 作为本系统的数据库，使用 visual basic 作为系统开发的开发环境，visual basic 是一种可视化的、面对对象 和条用事件驱动方式的结构化高级程序设计，可用于开发 windows 环境下的种类应用 程序。它简单易学、效率高，且功能强大，可以与 windows 的专业开发工具 sdk 相媲 美，而且程序开发人员不必具有 c/c+编程基础。用传统程序设计语言设计程序时， 都是通过编写程序代码来设计用户界面，在设计过程中看不到界面的实际显示效果， 必须编译后运行程序才能观察。如果对界面的效果不满意，还要回到程序中修改。有 时候，这种编程-编译-修改的操作可能要反复多次，大大影响了软件开发效率。 visual basic 提供了可视化设计工具，把 windows 界面设计的复杂性“封装”起来， 开发人员不必为界面设计而编写大量程序代码。只需要按设计要求的屏幕布局，用系 统提供的工具，在屏幕上画出各种“部件” ，即图形对象，并设置这些图形对象的属 性。visual basic 自动产生界面设计代码，程序设计人员只需要编写实现程序功能 的那部分代码，从而可以大大提高程序设计的效率。因此，它在技术上是可行的。 1.4.3 运行上可行性 本系统为一个小型的学生信息管理系统，所耗费的资源非常的小，学校的电脑无 4 论是硬件还是软件都能够满足条件，因此，本系统在运行上是可行的。 2.需求分析需求分析 2.12.1 用户需求描述用户需求描述 通过调研，该学生成绩管理系统主要包括本班的每一位学生在校期间的基本情况 与课程成绩汇总。主要包括期末成绩管理、选修课成绩管理、课程管理、具体的查询 等。本系统还提供学生相关的基本信息统计、汇总、查询，这样便于辅助系领导的学 生管理工作，改善管理质量、提高管理效率。 系统的主要功能性能描述如下： 学生基本情况管理 ：本班每一位学生的基本情况汇总与管理，主要包括对学 生基本情况的添加、修改、删除、查询等操作。 成绩管理：主要包括期末成绩、选修课成绩管理。主要包括对学生成绩的添加、 修改、删除、查询、统计等操作。 课程管理：主要包括对课程的添加、删除、查询等操作。 本系统用户信息:学生必须通过用户登录才能访问到整个管理系统。 系统维护:能及时更新该系统的所有信息,若查询结束,能及时退出当前窗口， 回到上一级住窗口。 2.22.2 用户需求具体分析用户需求具体分析 2.2.1 系统分析 系统总流程图： 管理 员 学生基 本 信息表 学生基 本 信息学生 成 绩单 进入 建立成 绩文件 建立学 生文件 建立专 业文件 建立基本 信息文件 课程 信 息表 存储 成绩 文件 存储 学生 文件 存储 专业 文件 存储 基本 信息 文件 输出 学生 的成 绩 成绩 表 5 图 2-1 根据以上对学生成绩管理系统的需求分析，一个标准的学生成绩管理系统应该包 含系统管理，学生基本信息管理，课程基本信息管理，学生成绩管理等功能，如图所 示，对于每一个功能模块都包含了一系列的子模块。 图 2-2:学生成绩管理系统功能图 2.2.2 学生基本情况管理图表 显示 学生 基本 信息 学生基本信 息管理（修 改，添加， 查询） 图 2-3：学生基本信息管理功能表 学生基本情况主要包括以下内容:每个学生的学号，姓名,性别，籍贯，民族，出 生年月，政治面貌，入学时间，所在班级通过该成绩管理系统实现对每个学生基本 情况的添加，修改，删除，查询等操作即若有学生中途退学或者降级等原因，则需 学生成绩管理系统 系统 管理 学生 基本 信息 管理 课程 基本 信息 管理 学生 成绩 管理 退 出 学生基本信息管理 6 要删除有关该学生的基本信息，若有学生插班，则直接添加该学生的基本信息还有 助于班上或者系上查询每个学生的基本情况学生基本信息表(student)描述如下: 表 2-1 学生基本信息表(student) 列名数据类型长度精度小数备注 学号 char1000 关键字 姓名 char1200 不为空 性别 char 600 不为空 籍贯 char1200 不为空 民族 char1200 不为空 出生年月 int600 不为空 政治面貌 char 1200 不为空 入学时间 int 600 不为空 所在班级 char 600 不为空 2.2.3 学生成绩管理图表 学生成绩管理 专业 课成 绩管 理 选修 课成 绩管 理 图 2-4 学生成绩管理功能图 学生成绩管理主要包括学生的期末成绩与选修课成绩的管理。通过该学生成绩管 理系统实现对学生成绩的添加、修改、删除、查询、统计等操作.每经过一次考试,通 过该系统可以将成绩添加进去;若老师或者学生发现成绩有误，则可以通过对该管理 系统对成绩进行修改;若有学生降级或退学,应该及时删去有关该学生的所有成绩;同 样也有助于学生查询自己的各科成绩以及自己的平均成绩，也有助于对本班的基本学 7 习情况有个大概的了解，对系上进行推荐优秀、评奖学金等提供了最重要的依据学 生期末成绩表(grade)描述如下: grade: 表 2-2 学生期末成绩表 (grade) 列名数据类型长度精度小数备注 学号 char1200 主关键字 姓名 char1200 不为空 课程编号 char200 不为空 课程名称 char1200 不为空 学分 int200 不为空 成绩 int 322 不为空 平均成绩 int 222 不为空 学生选修课成绩表：sc: 表 2-3 学生选修课成绩表 列名数据类型长度精度小数备注 姓名 char 1200 关键字 学号 char 1200 关键字 课程编号 char 200 不为空 成绩 int 322 不为空 平均成绩 int 222 不为空 2.2.4 学生课程基本信息管理图表 学生课程基本信息管理 显示专 业课基 本信息 选修 课基 本信 息管 理 专业课 基本信 息管理 显示选 修课基 本信息 8 图 2-5 学生课程基本信息管理功能图 学生课程管理主要包括对学生所学的专业课程与公共课程的管理.随着学生所学 课程的增加,通过该系统能方便实现对课程的添加;若中途课程有所变动,则可以对该 课程进行修改或删除;若学生或教师要了解有关课程的信息,可以通过查询实现.学生 的课程管理(course)描述如下: 表 2-4 学生的课程管理(course) 列名数据类型长度精度小数备注 课程编号 char 200 关键字 课程名称 char 1200 不为空 先行课 char 1200 不为空 学分 in 200 不为空 任课教师 char 1200 不为空 2.2.5 本系统用户信息表 当该成绩管理系统运行时,每个学生必须通过用户登录才能访问到整个管理系统, 否则将会报错,不能正常访问该系统.本系统的用户信息主要包括:用户登录的用户名, 密码.用户信息表(user)描述如下: 表 2-5 用户信息表(user) 列名数据类型长度精度小数备注 用户名 char 1200 不为空 密码 char 1200 关键字 2.2.6 系统维护 建立该成绩管理的目的主要是为了让学生能在第一时间了解自己的成绩等情况, 也方便系上对本班学生的管理与基本情况的了解.所以该系统要及时更新.并且运行时 要正常,能从下一级窗口返回到上一级窗口. 9 3.系统代码系统代码实现实现 3.13.1 adoado 对象模型介绍对象模型介绍 图 3-1 对 ado 对象的主要操作，主要包括 6 个方面： 1.连接到数据源。这是可选的、通常涉及 ado 的 connection 对象。 2.向数据源提交命令。通常涉及 ado 的 command 对象。在查询中可以与参数对象 （parameter）协同使用。 3.执行命令，比如一个 select 脚本。 4.如果提交的命令有结果返回，可以通过 ado 的 recordset 对象对结果进行操作， 数据存储在缓存中。 5.如果合适，可将缓存中被修改的数据更新到物理的存储上。 6.提供错误检测。通常涉及 ado 的 error 对象。 下面简单介绍一下 ado 的对象模型 ado 有三大对象,即 connection 对象,command 对象,recordset 对象. 10 connection(对象) errors(集合)error(对象) command(对象) parameters(集合)parameter(对象) recordset(对象) fields(集合)field(对象) 在 ado 的模型中,connection 对象是最基本的对象,他主要是提供与数据库的连接。 其他的两个对象都是通过它与数据库的连接来完成操作的。它的属性、方法如下所示。 connection 对象的主要属性 1、connection 对象用来与数据源建立连接、执行查询以及建立事务处理。它的 取值有两个，一个是 aduseclient,一个是 aduseserver（默认） ，从其英语本身的含义 就可以看出，前者是使用客户端的游标，而后者是使用服务器端的游标。二着的差别 在于 aduseclient 游标可以提供供应商所没有提供的额外的属性，因而灵活性更大。 需要注意的是 connection 对象与 recordset 对象均有此属性，由 connection 对象产 生的 recordset 对象会自动的继承这个属性。另外要让此属性对 connection 和 recordset 对象的实例起作用的话，必须在打开它们之前先定义。 connection 的主要方法 1、 open，打开一个 connection 的对象实例，常用的写法为 conn.open connectionstring，如果在打开之前已经定义了 connectionstring 属性的话，就可以 直接的打开。 2、 execute，产生一个 recordset 实例，常用的写法为 rs=conn.excute commandtext,recordsaffected,option 其中的 commandtext 可以为以下的几种形式，主要由 option 的值来决定 1） sql 语句，此时 option 的值为 adcmdtext，表示将执行一段 sql 语句。2）数据库的一个 表名，此时 option 的值为 adcmdtable，表示将对该表进行操作。 error 报错： 前面讲到了 connection 对象是用于与各类的数据库进行挂接的，但在此过程中 将会出现一些不可预测的错误，因而有了 error 这个对象。首先要清楚一个概念， 11 error 对象是在连接数据库时产生的，而并非那些运行时的实时错误。也就是我们常 用 on error resume next 来忽略到的错误。这些错误将在 err 对象中，我们可以用 一个统一的模板来集中处理，下面来看 error 对象的属性和方法： 1、 count 属性：用来统计 errors 集合的数目，它的特点与前面讲到的 property 对象的 count 对象相同。 2、 clear 方法：写法为 error.clear，是用来清除 errors 集合中的原有对象的， 在统计新的 error 对象时应该先使用此语句。 3、 item 方法：用来指定特定的一个错误，语法为 error.item(number)，其中 number 为一数字。由于 item 为默认的方法，所以 error(number)的写法与前面的写法 是等价的。下面是一段程序。用来列举 error 的所有对象 command 对象： command 对象执行数据库操作命令，这些命令并不只限于查询串，而是依赖于数 据库的 ole db 供应者。以下的讨论假定使用 odbc 供应者。 使用 command 对象可以建立一个新的连接，也可以使用当前已经建立的连接，这 取决于对象“activeconection“属性的设置。如果“activeconection“属性被设置为一 个 connection 对象的引用，那么 command 对象就建立一个新的连接，并使用这个新连 接。每个 connection 对象可以包含多个 command 对象。 用 command 对象执行一个查询子串，可以返回一个记录集，也可以返回多个记录 集，甚至可以不返回记录集。对象的“commandtext“属性中包含了要执行的查询字串。 一个查询可以是一个标准的 sql 数据操作语言，如 select、delete、update，等；也 可以是任何数据定义语言，如 create、drop 等；还可以是一个存储过程或一个表。究 竟 commandtext 中是哪一种查询字串，由对象的“commandtype“属性决定。 “commandtype“属性有四种不同的值：adcmdtext,adcmdtable,adcmdstoreproc 和 adcmdunknow。如果查询字串是一个 sql 语句，那么“commandtype“属性应设为 “adcmdtext“;如果查询字串是一个存储过程的名字，那么“commandtype“属性应该为 “adcmdstoreproc“，command 对象用call procedure=name的形式来执行一个存储过 程；如果查询字串是一个表名，那么“commandtype“属性应该设为 “adcmdtable“，command 对象用“select * from tablename“的形式来执行一个查询； 如果“commandtype“属性被设置为“adcmdunknown“,command 对象必须执行一些额外的 12 步骤来决定查询字串的类型，这样会降低系统的性能。 如果要执行一个带参数的查询，或者要执行一个查询若干次，那么可以用 command 对象的“prepared“属性预先建立一个查询字串 command 对象的 execute 方 法 一般来说使用 command 的 execute 方法有三个目的。1、用于进行一些简单的处理， 例如删除一条记录： comm.commandtype=adcmdtext comm.commandtext=“delect from employee where job_id=1“ comm.execute 这样的工作不需要返回什么东西。2、用于进行一些复杂的处理，例如进行一个 transact 的设计，这类一般都是和 storedprocedure 一同工作的，而且有输出参数和 输入的参数，这也是我们本章的讨论主题。3、用于返回一个 recordset 对象，用于其 它的处理 recordset 对象 recordset 对象用来操作查询返回的结果集，它可以在结果集中添加、删除、修 改和移动记录。当创建了一个 recordset 对象时，一个游标也被自动创建了。可以用 recordset 对象的 cursortype 属性来设置游标的类型。游标的类型有 4 种：仅能向前 移动的游标、静态的游标、键集游标和动态游标。这已经在 dao 中的 recordset 对象 和 rdo 的 rdoresultset 对象中介绍过了。 .fields 集合和 fields 对象 fields 集合和 fields 对象用来访问当前记录中的每一列的数据，可以用 fields 对象创建一个新记录、修改已存在的数据等。用 recordset 对象的 addnew、update 和 updatebatch 方法来添加新记录和更新记录。也可以用 fields 对象来访问表中每一 个字段的一些属性，如下面的例子循环打印出表中当前记录的字段名称、类型和值。 3.23.2 公共模块公共模块 在 visual basic 中可以使用公共模块来存放整个项目所需的公共函数和全局变 量来提高代码的利用率，在项目资源管理器中为项目添加一个 module,保存为 module1.bas.代码如下： 13 public gusername as string 保存用户名 public flag as integer public gsql as string public iflag as integer 添加执行 sql 语句的函数 public function transactsql(byval sql as string) as adodb.recordset dim con as adodb.connection 定义一个连接对象 dim rs as adodb.recordset 定义一个记录集 dim strconnection as string dim strarray() as string 定义一个字符串 set con = new adodb.connection 创建连接 set rs = new adodb.recordset 创建记录集 on error goto transactsql_error 出错处理 strconnection = “provider=microsoft.jet.oledb.4.0;data source =“ & app.path & “table.mdb“ strarray = split(sql) con.open strconnection 打开连接 if strcomp(ucase$(strarray(0), “select“, vbtextcompare) = 0 then rs.open trim$(sql), con, adopenkeyset, adlockoptimistic set transactsql = rs 返回记录集 iflag = 1 else con.execute sql 执行命令 iflag = 1 end if transactsql_exit: set rs = nothing 清空对象，释放 rs 对象占用的内存空间 set con = nothing 清空对象，释放 con 对象占用的内存空 间 14 exit function 退出函数 transactsql_error: msgbox “查询错误：“ & err.description 在生成错误时，将 error 函数 返回的字符串放置在 description 中。 iflag = 2 resume transactsql_exit end function public sub tabtoenter(key as integer) if key = 13 then sendkeys “tab“ end if end sub sub main() dim flogin as new frmlogin flogin.show vbmodual end sub 3.33.3 系统的登录界面系统的登录界面 图 3-2 15 代码设计如下： private sub cmdok_click() dim sql as string 初始化数据库 dim rs as adodb.recordset 定义 rs 记录集连接数据库 if trim(username.text = “) then msgbox “没有输入用户名，请重新输入！“, vbokonly + vbexclamation, “警告“ username.setfocus else sql = “select * from userinfo where userid=“ & username.text & “ set rs = transactsql(sql) if iflag = 1 then if rs.eof = true then msgbox “没有这个用户，请重新输入！“, vbokonly + vbexclamation, “警告 “ username.setfocus else if trim(rs.fields(1) = trim(password.text) then rs.close me.hide gusername = trim(username.text) mdiform1.show unload me else msgbox “密码不正确，请重新输入！“, vbokonly + vbexclamation, “警告“ password.setfocus password.text = “ end if end if else 16 unload me end if end if pwdcount = pwdcount + 1 if pwdcount = 3 then unload me exit sub end if end sub 3.43.4 专业课成绩管理专业课成绩管理 界面运行如下： 图 3-3 该界面使用了 text,label,frame,commanbutton 等控件。 查询按钮 当点击查询控件时，将触发 cmdmod_click 事件，显示出可通过输入课程编号和 课程名称来查询学生的专业课信息与成绩。当点击 frmprocsqury 中的“查询”按钮 17 时，触发 cmdfind_click 事件， 图 3-4 输入学号为 95001 的学生，数据库中检测到该学生的成绩信息显示如下： 图 3-5 代码如下： private sub cmdfind_click() dim sql as string dim rs as adodb.recordset set rs = new adodb.recordset sql = “select * from pro_course where (1=1) “ 18 if trim(noedit.text) = “ and trim(nameedit.text) = “ then msgbox “请选择你要查询的条件并输入你要查询的内容！“, vbokonly + vbexclamation, “警告“ exit sub else if (nocheck.value) and (noedit.text “) then sql = “select * from pro_course “ sql = sql & “ where cname like %“ & trim(nameedit.text) & “%“ set rs = transactsql(sql) end if end if if rs.eof then msgbox “sorry,无法找到你要想查询的学生的基本信息！“ else frmprocourseshow.text1.text = rs(“cno“) frmprocourseshow.text3.text = rs(“cname“) frmprocourseshow.text4.text = rs(“cteacher“) frmprocourseshow.text5.text = rs(“ccredit“) frmprocourseshow.show end if rs.close set rs = nothing end sub 修改课程信息 19 通过输入正确的学生学号，给该生添加课程编号和成绩，来添加这门学修课的 基本信息，添加完成点击修改按钮后，在符合存储数据信息的情况下显示课程信息修 改成功。 图 3-6 代码如下： private sub cmdmod_click() set rs = new adodb.recordset if text1.text = “ then msgbox “请你输入要想修改专业课程编号以及相关的所有信息！“, vbokonly + vbexclamation, “警告！“ text1.setfocus exit sub end if sql = “select * from pro_course where cno=“ & trim(text1.text) & “ set rs = transactsql(sql) if rs.eof then 查看是否到达记录集的最后一条记录末 尾 msgbox “无法找到有关该门课程的基本信息，请核实后再修改！“, vbokonly + vbexclamation, “警告！“ call init text1.setfocus rs.close 20 exit sub end if if msgbox(“确定要修改编号为“ & text1.text & “的基本信息吗？“, vbokcancel) = vbok then sql = “update pro_course set cname=“ & trim(text2.text) sql = sql & “ ,cteacher= “ & trim(text3.text) & “,ccredit=“ & trim(text5.text) sql = sql & “ where cno=“ & trim(text1.text) & “ “ transactsql (sql) msgbox “该专业课程基本信息已经修改！“, vbokonly + vbexclamation, “修改 结束！“ end if call init end sub 4.其他其他界面介绍界面介绍 4.14.1 登录界面登录界面 每个用户都有自己的用户名和密码，必须通过输入用户的用户名和密码才能进入 学生成绩管理系统，当输入用户名密码为 access 数据库中所存储的正确用户名和密码 时即可进入学生成绩管理系统，如果不是数据库中的用户信息，则会显示为用户名或 密码输入错误。 21 图 4-1 4.24.2 添加新用户添加新用户 学生可通过添加用户功能添加自己的用户名和密码，添加成功后即可使用自己的 用户名和密码进行系统登录，并在系统中查询和修改自己所需信息 图 4-2 4.34.3 修改登录用户的密码修改登录用户的密码 当用户以自己的用户名和密码登录进去后，如果想修改密码可通过修改密码窗口 来修改密码。当密码修改成功时，access 数据库中该用户名的密码及随之改变 22 图 4-3 存储用户名和密码的数据库 图 4-4 4.44.4 查看学生的基本信息查看学生的基本信息 在该窗口中可以查看学生的基本信息包括：学生的学号，籍贯，姓名，性别，年龄等 23 图 4-5 “首记录”按钮代码实现：adodc1.recordset.movefirst “上一条”按钮代码实现：adodc1.recordset.moveprevious if adodc1.recordset.bof then adodc1.recordset.movefirst “下一条”按钮代码实现 adodc1.recordset.movenext if adodc1.recordset.eof then adodc1.recordset.movelast “末记录”按钮代码实现 adodc1.recordset.movelast 打开 recordset 时，当前记录位于第一个记录（如果有），