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

《计算机应用毕业论文范文1》由会员分享，可在线阅读，更多相关《计算机应用毕业论文范文1（32页珍藏版）》请在装配图网上搜索。

1、南京信息职业技术学院毕业设计论文 作者 学号 系部 软件学院 专业 计算机应用专业 题目 学生成绩管理系统 指导教师 评阅教师 完成时间： 2010 年 5 月 25 日 毕业设计(论文)中文摘要(题目)：学生成绩管理系统摘要 ：学生成绩管理系统是为了实现学生成绩管理的系统化、规范化和自动化，从而提高管理效率而设计的。它完全取代了原来一直用人工管理的工作方式，避免了由于管理人员的工作疏忽以及管理质量问题所造成的各种错误，为及时、准确、高效的完成对学生成绩的管理提供了强有力的工具和管理手段。学生成绩管理系统是一个中小型数据库管理系统，它界面美观、操作简单、安全性高，基本满足了学生成绩管理的要求。

2、重点介绍了学生成绩管理系统的实现过程：包括系统分析，系统调查,功能设计，数据库设计，系统实现，系统测试和调试等。本系统主要功能有查询学生成绩、添加学生成绩、删除学生成绩、管理页面和修改管理员密码等内容。本系统是在以 ACCESS2003 作为后台数据库，以 Visual Basic 为编程语言来开发的。学生成绩管理系统在运行阶段，效果好，数据准确性高，提高了工作效率，同时也实现了成绩管理与计算机的结合使用关键词：学生成绩管理系统，成绩管理，成绩查询，ACCESS，毕业设计(论文)外文摘要TitleTitle : : the management system of the students g

3、rades 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 ,

4、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 an

5、d 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

6、, 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 admin

7、istrative 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

8、grades administrative at the same time .Key words: The management system of the students grades， grades management, Grades inquiry, access I目录目录1. 绪论.11.1 问题的提出 .11.2 现有系统存在问题的分析 .11.3 系统开发目标与意义 .21.4 可行性分析 .31.4.1 经济上可行性 .31.4.2 技术上可行性 .31.4.3 运行上可行性.32.需求分析.42.1 用户需求描述 .42.2 用户需求具体分析 .42.2.1 系统分析

9、.42.2.2 学生基本情况管理图表.52.2.3 学生成绩管理图表 .62.2.4 学生课程基本信息管理图表 .72.2.5 本系统用户信息表 .82.2.6 系统维护 .83.系统代码实现.93.1 ADO 对象模型介绍.93.2 公共模块 .123.3 系统的登录界面 .143.4 专业课成绩管理 .164.其他界面介绍.204.1 登录界面 .204.2 添加新用户 .214.3 修改登录用户的密码 .214.4 查看学生的基本信息 .224.5 查看专业课基本信息 .244.6 查看学生选修课基本信息 .24结论.25致谢.25参考文献.2611. 绪论绪论本毕业论文是以学校学生管理

10、信息系统建设中的成绩管理系统的开发为背景，论述了管理信息系统的概念、结构及系统开发的基本原理和方法，全文共分为绪论、系统分析、概要设计、详细设计、开发总结、致谢、参考文献、附录等。1.11.1 问题的提出问题的提出随着计算机技术的发展，特别是计算机网络技术与数据库技术的发展，使用人们的生活与工作方式发生了很大的改观。网络技术的应用使得计算机之间通信、信息共享成为可能，而数据库技术的应用则为人们提供了数据存储、信息检索、信息分析等功能，从而使得工作更高效地进行。数据库始于 20 世纪 60 年代，经过 40 多年的发展，现在已经形成了理论体系，成为计算机软件的一个重要分支。数据库技术体现了当代先

11、进的数据管理方法，使计算机的应用真正渗透到国民经济各个部门，在数据处理领域发挥着越来越大的作用。而互联网技术的出现，更是进一步丰富的人类生活，数字化生存已经一步步走进我们的生活与工作。互联网技术与数据库技术的结合为计算的在人类生活中的应用带来了巨大的影响。产业信息化，管理现代化，科学化已经成为行业发展的重要课题，这不仅是企业提高自身竞争力，甚至是国家提高综合国力，走向国民富强的重要手段。在我国，教育是一个影响着国富民强的重要行业，随着改革开放和市场经济的发展根据中国特有的国情发展，教育得到了国家的大力扶持与社会各界的高度重视，从而使教育业向规范性与现代化的方向高速发展，但是同发达国家相比，我国

12、的教育行业的信息技术的应用程度还很低，只有在大城市中发展较早、规模较大的院校中才使用计算机进行大规模操作，从各方面提高工作效率，取得良好的社会和经济效益，而一些新兴的、规模较小的教育机构还没有全部具备这种功能。因此可见，随着我国教育的迅速发展，信息技术在其上的应用会更加地广泛和深入。 21.21.2 现有系统存在问题的分析现有系统存在问题的分析在我国，各大中小学校的各类信息管理系统并非一个新的课题，但也有的学校根本就没有信息任何管理系统，所有的工作几乎还是手工操作来完成。计算机技术在日新月异的发展，但是有的很多学校，特别是在西部贫困地区，学校的种类管理都依然由手工操作来完成，这十分落后，效率极

13、低，成本很大，而且极异出错。随着社会的发展，信息化是社会进程的必然趋势，学校管理只有只有快，准，精才能发挥其价值。所以机器代替人力是必然的历史发展趋势，只有领导的重视和支持才能从人工操作改为计算机的自动化系统。人工操作必将被计算机代替。有些学校虽使用了计算机，甚至管理系统，但是仍然存在很多问题，问题一日不解决，效率就一日提不上去。还有，有的系统很不完善到处是漏洞，可以说是千疮百孔，这样极不完善的系统对管理来说是没有任何保障的。所以需要使用一个完善的学生成绩管理系统来实现解决这些问题。1.31.3 系统开发目标与意义系统开发目标与意义本系统是将现代化的计算机技术和传统的教学、教务工作相结合，按照

14、学院的工作流程设计完成的。为了使系统在学院的管理中发挥更大的作用，实现工作过程的计算机化，提高工作效率和工作质量，本系统通过收集、整理班上所以学生的基本信息，主要包括每个学生的基本信息（学号，姓名，性别，籍贯，出生年月.） 、每个学生的专业课、公共课以及校选修课的基本信息（课程编号，课程名称，课程成绩，课程学分，平均成绩，.） ，通过对基本信息的存储，使每一个学生能查到有关自己的所有基本情况。主要目的是能为班上的每一为学生提供成绩查询，为系上的各种考评提供参考，进一步地提高工作效率。在各大中小学校，用计算机管理学校的信息已经越来越普遍了。用计算机不但可以提高工作效率，而且还节省了许多人力物力，

15、增强了学校资料的安全性。提高了学校的管理能力，为此，用计算机来管理学校的信息，是非常必要的。这样也方便每一位同学能在需要时查询自己的成绩，也方便了系上对班上的基本情况有一个了解，也3是系上在评优等方面的一个重要的参考。再由于班上的同学都基本上在上网，可以通过学校的网络了解自己有关的基本信息。1.41.4 可行性分析可行性分析 可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能够解决。1.4.1 经济上可行性现在，计算机的价格已经十分低廉，性能却有了长足的进步。而本系统的开发，为学校的工作效率带来了一个质的飞跃，为此主要表现有以下几个方面：第一，本系统的运行可以代替人工进行许多繁杂的劳

16、动；第二，本系统的运行可以节省许多资源；第三，本系统的运行可以大大的提高学校的工作效率；1.4.2 技术上可行性本系统的开发利用 Microsoft office access 作为本系统的数据库，使用Visual Basic 作为系统开发的开发环境，Visual Basic 是一种可视化的、面对对象和条用事件驱动方式的结构化高级程序设计，可用于开发 Windows 环境下的种类应用程序。它简单易学、效率高，且功能强大，可以与 Windows 的专业开发工具 SDK 相媲美，而且程序开发人员不必具有 C/C+编程基础。用传统程序设计语言设计程序时，都是通过编写程序代码来设计用户界面，在设计过程

17、中看不到界面的实际显示效果，必须编译后运行程序才能观察。如果对界面的效果不满意，还要回到程序中修改。有时候，这种编程-编译-修改的操作可能要反复多次，大大影响了软件开发效率。Visual Basic 提供了可视化设计工具，把 Windows 界面设计的复杂性“封装”起来，开发人员不必为界面设计而编写大量程序代码。只需要按设计要求的屏幕布局，用系统提供的工具，在屏幕上画出各种“部件” ，即图形对象，并设置这些图形对象的属性。Visual Basic 自动产生界面设计代码，程序设计人员只需要编写实现程序功能的那部分代码，从而可以大大提高程序设计的效率。因此，它在技术上是可行的。1.4.3 运行上可

18、行性本系统为一个小型的学生信息管理系统，所耗费的资源非常的小，学校的电脑无4论是硬件还是软件都能够满足条件，因此，本系统在运行上是可行的。2.需求分析需求分析2.12.1 用户需求描述用户需求描述通过调研，该学生成绩管理系统主要包括本班的每一位学生在校期间的基本情况与课程成绩汇总。主要包括期末成绩管理、选修课成绩管理、课程管理、具体的查询等。本系统还提供学生相关的基本信息统计、汇总、查询，这样便于辅助系领导的学生管理工作，改善管理质量、提高管理效率。系统的主要功能性能描述如下：学生基本情况管理 ：本班每一位学生的基本情况汇总与管理，主要包括对学生基本情况的添加、修改、删除、查询等操作。成绩管理

19、：主要包括期末成绩、选修课成绩管理。主要包括对学生成绩的添加、修改、删除、查询、统计等操作。课程管理：主要包括对课程的添加、删除、查询等操作。本系统用户信息:学生必须通过用户登录才能访问到整个管理系统。系统维护:能及时更新该系统的所有信息,若查询结束,能及时退出当前窗口，回到上一级住窗口。2.22.2 用户需求具体分析用户需求具体分析2.2.1 系统分析系统总流程图：管理员学生基本信息表学生基本信息学生成绩单进入建立成绩文件建立学生文件建立专业文件建立基本信息文件课程信息表存储成绩文件存储学生文件存储专业文件存储基本信息文件输出学生的成绩成绩表5图 2-1根据以上对学生成绩管理系统的需求分析，

20、一个标准的学生成绩管理系统应该包含系统管理，学生基本信息管理，课程基本信息管理，学生成绩管理等功能，如图所示，对于每一个功能模块都包含了一系列的子模块。 图 2-2:学生成绩管理系统功能图2.2.2 学生基本情况管理图表 显示学生基本信息学生基本信息管理（修改，添加，查询）图 2-3：学生基本信息管理功能表学生基本情况主要包括以下内容:每个学生的学号，姓名,性别，籍贯，民族，出生年月，政治面貌，入学时间，所在班级通过该成绩管理系统实现对每个学生基本情况的添加，修改，删除，查询等操作即若有学生中途退学或者降级等原因，则需学生成绩管理系统系统管理学生基本信息管理课程基本信息管理学生成绩管理退出学生

21、基本信息管理6要删除有关该学生的基本信息，若有学生插班，则直接添加该学生的基本信息还有助于班上或者系上查询每个学生的基本情况学生基本信息表(Student)描述如下:表 2-1 学生基本信息表(Student)列名数据类型长度精度小数备注学号Char1000关键字姓名Char1200不为空性别Char 600不为空籍贯Char1200不为空民族Char1200不为空出生年月int600 不为空政治面貌Char 1200不为空入学时间Int 600不为空所在班级Char 600不为空2.2.3 学生成绩管理图表学生成绩管理专业课成绩管理选修课成绩管理图 2-4 学生成绩管理功能图学生成绩管理主要

22、包括学生的期末成绩与选修课成绩的管理。通过该学生成绩管理系统实现对学生成绩的添加、修改、删除、查询、统计等操作.每经过一次考试,通过该系统可以将成绩添加进去;若老师或者学生发现成绩有误，则可以通过对该管理系统对成绩进行修改;若有学生降级或退学,应该及时删去有关该学生的所有成绩;同样也有助于学生查询自己的各科成绩以及自己的平均成绩，也有助于对本班的基本学7习情况有个大概的了解，对系上进行推荐优秀、评奖学金等提供了最重要的依据学生期末成绩表(Grade)描述如下:Grade:表 2-2 学生期末成绩表 (Grade)列名数据类型长度精度小数备注学号char1200主关键字姓名char1200不为空

23、课程编号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 学生课程基本信息管理功能图学生课程管理主要包括对学生所学的专业课程与公共课程的管理.随着学生所学课程的增加,

24、通过该系统能方便实现对课程的添加;若中途课程有所变动,则可以对该课程进行修改或删除;若学生或教师要了解有关课程的信息,可以通过查询实现.学生的课程管理(Course)描述如下:表 2-4 学生的课程管理(Course)列名数据类型长度精度小数备注课程编号Char 200关键字课程名称Char 1200不为空先行课Char 1200不为空学分In 200不为空任课教师Char 1200不为空2.2.5 本系统用户信息表当该成绩管理系统运行时,每个学生必须通过用户登录才能访问到整个管理系统,否则将会报错,不能正常访问该系统.本系统的用户信息主要包括:用户登录的用户名,密码.用户信息表(User)描

25、述如下:表 2-5 用户信息表(User)列名数据类型长度精度小数备注用户名Char 1200不为空密码Char 1200关键字2.2.6 系统维护建立该成绩管理的目的主要是为了让学生能在第一时间了解自己的成绩等情况,也方便系上对本班学生的管理与基本情况的了解.所以该系统要及时更新.并且运行时要正常,能从下一级窗口返回到上一级窗口.93.系统代码系统代码实现实现3.13.1 ADOADO 对象模型介绍对象模型介绍图 3-1对 ADO 对象的主要操作，主要包括 6 个方面：1.连接到数据源。这是可选的、通常涉及 ADO 的 Connection 对象。2.向数据源提交命令。通常涉及 ADO 的

26、Command 对象。在查询中可以与参数对象（Parameter）协同使用。3.执行命令，比如一个 SELECT 脚本。4.如果提交的命令有结果返回，可以通过 ADO 的 Recordset 对象对结果进行操作，数据存储在缓存中。5.如果合适，可将缓存中被修改的数据更新到物理的存储上。6.提供错误检测。通常涉及 ADO 的 Error 对象。下面简单介绍一下 ADO 的对象模型ADO 有三大对象,即 Connection 对象,Command 对象,Recordset 对象.10Connection(对象)Errors(集合)Error(对象) Command(对象)Parameters(集合

27、)Parameter(对象)RecordSet(对象)Fields(集合)Field(对象)在 ADO 的模型中,Connection 对象是最基本的对象,他主要是提供与数据库的连接。其他的两个对象都是通过它与数据库的连接来完成操作的。它的属性、方法如下所示。 Connection 对象的主要属性1、Connection 对象用来与数据源建立连接、执行查询以及建立事务处理。它的取值有两个，一个是 adUseClient,一个是 adUseServer（默认） ，从其英语本身的含义就可以看出，前者是使用客户端的游标，而后者是使用服务器端的游标。二着的差别在于 adUseClient 游标可以提供

28、供应商所没有提供的额外的属性，因而灵活性更大。需要注意的是 Connection 对象与 RecordSet 对象均有此属性，由 Connection 对象产生的 RecordSet 对象会自动的继承这个属性。另外要让此属性对 Connection 和RecordSet 对象的实例起作用的话，必须在打开它们之前先定义。Connection 的主要方法1、 open，打开一个 Connection 的对象实例，常用的写法为 conn.open ConnectionString，如果在打开之前已经定义了 ConnectionString 属性的话，就可以直接的打开。2、 Execute，产生一个

29、RecordSet 实例，常用的写法为Rs=conn.Excute CommandText,RecordsAffected,Option 其中的 CommandText 可以为以下的几种形式，主要由 Option 的值来决定 1） SQL语句，此时 Option 的值为 adCmdText，表示将执行一段 SQL 语句。2）数据库的一个表名，此时 Option 的值为 adCmdTable，表示将对该表进行操作。Error 报错：前面讲到了 Connection 对象是用于与各类的数据库进行挂接的，但在此过程中将会出现一些不可预测的错误，因而有了 Error 这个对象。首先要清楚一个概念，11

30、Error 对象是在连接数据库时产生的，而并非那些运行时的实时错误。也就是我们常用 On Error Resume Next 来忽略到的错误。这些错误将在 Err 对象中，我们可以用一个统一的模板来集中处理，下面来看 Error 对象的属性和方法：1、 Count 属性：用来统计 Errors 集合的数目，它的特点与前面讲到的 Property对象的 Count 对象相同。2、 Clear 方法：写法为 Error.Clear，是用来清除 Errors 集合中的原有对象的，在统计新的 Error 对象时应该先使用此语句。3、 Item 方法：用来指定特定的一个错误，语法为 Error.Item

31、(number)，其中number 为一数字。由于 Item 为默认的方法，所以 Error(number)的写法与前面的写法是等价的。下面是一段程序。用来列举 Error 的所有对象Command 对象：Command 对象执行数据库操作命令，这些命令并不只限于查询串，而是依赖于数据库的 OLE DB 供应者。以下的讨论假定使用 ODBC 供应者。使用 Command 对象可以建立一个新的连接，也可以使用当前已经建立的连接，这取决于对象ActiveConection属性的设置。如果Activeconection属性被设置为一个 Connection 对象的引用，那么 Command 对象就建

32、立一个新的连接，并使用这个新连接。每个 Connection 对象可以包含多个 Command 对象。用 Command 对象执行一个查询子串，可以返回一个记录集，也可以返回多个记录集，甚至可以不返回记录集。对象的CommandText属性中包含了要执行的查询字串。一个查询可以是一个标准的 SQL 数据操作语言，如 SELECT、DELETE、UPDATE，等；也可以是任何数据定义语言，如 CREATE、DROP 等；还可以是一个存储过程或一个表。究竟 CommandText 中是哪一种查询字串，由对象的CommandType属性决定。CommandType属性有四种不同的值：adCmdTex

33、t,adCmdTable,adCmdStoreProc 和adCmdUnknow。如果查询字串是一个 SQL 语句，那么CommandType属性应设为adCmdText;如果查询字串是一个存储过程的名字，那么CommandType属性应该为adCmdStoreProc，Command 对象用call procedure=name的形式来执行一个存储过程；如果查询字串是一个表名，那么CommandType属性应该设为adCmdTable，Command 对象用Select * from Tablename的形式来执行一个查询；如果CommandType属性被设置为adCmdUnknown,Co

34、mmand 对象必须执行一些额外的12步骤来决定查询字串的类型，这样会降低系统的性能。如果要执行一个带参数的查询，或者要执行一个查询若干次，那么可以用Command 对象的Prepared属性预先建立一个查询字串 Command 对象的 Execute 方法一般来说使用 Command 的 Execute 方法有三个目的。1、用于进行一些简单的处理，例如删除一条记录：comm.CommandType=AdCmdTextcomm.CommandText=Delect From employee Where Job_ID=1comm.execute这样的工作不需要返回什么东西。2、用于进行一些复杂

35、的处理，例如进行一个Transact 的设计，这类一般都是和 StoredProcedure 一同工作的，而且有输出参数和输入的参数，这也是我们本章的讨论主题。3、用于返回一个 RecordSet 对象，用于其它的处理Recordset 对象Recordset 对象用来操作查询返回的结果集，它可以在结果集中添加、删除、修改和移动记录。当创建了一个 Recordset 对象时，一个游标也被自动创建了。可以用Recordset 对象的 CursorType 属性来设置游标的类型。游标的类型有 4 种：仅能向前移动的游标、静态的游标、键集游标和动态游标。这已经在 DAO 中的 Recordset 对

36、象和 RDO 的 rdoResultset 对象中介绍过了。.Fields 集合和 Fields 对象Fields 集合和 Fields 对象用来访问当前记录中的每一列的数据，可以用 Fields对象创建一个新记录、修改已存在的数据等。用 Recordset 对象的 AddNew、Update和 UpdateBatch 方法来添加新记录和更新记录。也可以用 Fields 对象来访问表中每一个字段的一些属性，如下面的例子循环打印出表中当前记录的字段名称、类型和值。3.23.2 公共模块公共模块在 Visual Basic 中可以使用公共模块来存放整个项目所需的公共函数和全局变量来提高代码的利用率

37、，在项目资源管理器中为项目添加一个 Module,保存为Module1.bas.代码如下：13Public gUserName As String 保存用户名Public flag As IntegerPublic gSQL As StringPublic iflag As Integer添加执行 SQL 语句的函数Public Function TransactSQL(ByVal sql As String) As ADODB.RecordsetDim con As ADODB.Connection 定义一个连接对象Dim rs As ADODB.Recordset 定义一个记录集 Dim

38、strConnection As StringDim 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

39、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 IfTransactSQL_Exit: Set rs = Nothing 清空对象，释放 rs 对象占用的内存空间 Set con = Nothing 清空对象，释放 con 对象占用的内存空间14 Exit Fu

40、nction 退出函数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 Sub3

41、.33.3 系统的登录界面系统的登录界面图 3-215代码设计如下：Private Sub cmdOK_Click()Dim sql As String 初始化数据库Dim rs As ADODB.Recordset 定义 rs 记录集连接数据库If Trim(UserName.Text = ) Then MsgBox 没有输入用户名，请重新输入！, vbOKOnly + vbExclamation, 警告 UserName.SetFocusElse sql = select * from UserInfo where UserID= & UserName.Text & Set rs = Tr

42、ansactSQL(sql) If iflag = 1 Then If rs.EOF = True Then MsgBox 没有这个用户，请重新输入！, vbOKOnly + vbExclamation, 警告 UserName.SetFocusElseIf Trim(rs.Fields(1) = Trim(PassWord.Text) Then rs.Close Me.Hide gUserName = Trim(UserName.Text) MDIForm1.Show Unload MeElse MsgBox 密码不正确，请重新输入！, vbOKOnly + vbExclamation, 警

43、告 PassWord.SetFocus PassWord.Text = End IfEnd IfElse16 Unload Me End If End If pwdCount = pwdCount + 1If pwdCount = 3 Then Unload Me Exit Sub End IfEnd Sub3.43.4 专业课成绩管理专业课成绩管理界面运行如下：图 3-3该界面使用了 text,label,Frame,commanbutton 等控件。查询按钮当点击查询控件时，将触发 cmdMod_Click 事件，显示出可通过输入课程编号和课程名称来查询学生的专业课信息与成绩。当点击 Fr

44、mProCsQury 中的“查询”按钮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) 18If Trim(NoEdit.Text) = And Trim(NameEdit.Text) = Then MsgBox

45、 请选择你要查询的条件并输入你要查询的内容！, vbOKOnly + vbExclamation, 警告 Exit SubElse If (NoCheck.Value) And (NoEdit.Text ) Then sql = select * from Pro_Course sql = sql & where Cno = & Trim(NoEdit.Text) & Set rs = TransactSQL(sql) End If If (NameCheck.Value) And (NameEdit.Text ) Then sql = select * from Pro_Course sql

46、 = sql & where Cname like % & Trim(NameEdit.Text) & % Set rs = TransactSQL(sql) End IfEnd IfIf rs.EOF ThenMsgBox Sorry,无法找到你要想查询的学生的基本信息！ElseFrmProCourseShow.Text1.Text = rs(Cno)FrmProCourseShow.Text3.Text = rs(Cname)FrmProCourseShow.Text4.Text = rs(Cteacher)FrmProCourseShow.Text5.Text = rs(Ccredit)

47、FrmProCourseShow.ShowEnd Ifrs.CloseSet rs = NothingEnd Sub修改课程信息19通过输入正确的学生学号，给该生添加课程编号和成绩，来添加这门学修课的基本信息，添加完成点击修改按钮后，在符合存储数据信息的情况下显示课程信息修改成功。图 3-6代码如下：Private Sub cmdMod_Click() Set rs = New ADODB.Recordset If Text1.Text = Then MsgBox 请你输入要想修改专业课程编号以及相关的所有信息！, vbOKOnly + vbExclamation, 警告！ Text1.Set

48、Focus 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.Close20 Exit Sub End If If MsgBox(确定要修改编号为 & Text1.Text & 的基本信息吗

49、？, 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 initEnd Sub4.其他其他

50、界面介绍界面介绍4.14.1 登录界面登录界面每个用户都有自己的用户名和密码，必须通过输入用户的用户名和密码才能进入学生成绩管理系统，当输入用户名密码为 Access 数据库中所存储的正确用户名和密码时即可进入学生成绩管理系统，如果不是数据库中的用户信息，则会显示为用户名或密码输入错误。21图 4-14.24.2 添加新用户添加新用户学生可通过添加用户功能添加自己的用户名和密码，添加成功后即可使用自己的用户名和密码进行系统登录，并在系统中查询和修改自己所需信息图 4-24.34.3 修改登录用户的密码修改登录用户的密码当用户以自己的用户名和密码登录进去后，如果想修改密码可通过修改密码窗口来修改

51、密码。当密码修改成功时，Access 数据库中该用户名的密码及随之改变22图 4-3存储用户名和密码的数据库图 4-44.44.4 查看学生的基本信息查看学生的基本信息在该窗口中可以查看学生的基本信息包括：学生的学号，籍贯，姓名，性别，年龄等23图 4-5“首记录”按钮代码实现：Adodc1.Recordset.MoveFirst“上一条”按钮代码实现：Adodc1.Recordset.MovePreviousIf Adodc1.Recordset.BOF Then Adodc1.Recordset.MoveFirst“下一条”按钮代码实现 Adodc1.Recordset.MoveNextI

52、f Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast“末记录”按钮代码实现 Adodc1.Recordset.MoveLast打开 Recordset 时，当前记录位于第一个记录（如果有），并且 BOF 和 EOF 属性被设置为 False。如果没有记录， BOF 和 EOF 属性设置是 True。 假设提供者支持相关的功能，可以使用 MoveFirst、MoveLast、MoveNext 和 MovePrevious 方法以及 Move 方法，和 AbsolutePosition、AbsolutePage 和 Filter 属性来重新确定

53、当前记录的位置。仅向前 Recordset 对象只支持 MoveNext 方法。当使用 Move 方法访问每个记录（或枚举 Recordset）时，可使用 BOF 和 EOF 属性查看是否移动已经超过了 Recordset 的开始或结尾。24图 4-64.54.5 查看专业课基本信息查看专业课基本信息图 4-7254.64.6 查看学生选修课基本信息查看学生选修课基本信息图 4-8结论结论 经过近 2 个月的时间，总算是做好了成绩管理系统，自从确定了课题设计的题目后学生成绩管理系统，便开始了准备工作。从刚开始写成绩管理的需求分析、画数据流图和概要设计说明书。在把这些准备工作都做好了后，便开始了

54、设计页面与编程。说实话，刚开始觉得什么都不会写，尤其是 VB，因为 VB 已经学了一年多了，再说学 VB 那个时候又没怎么学懂，基本的格式代码都已经忘的差不多了。还得重新学VB在整个设计过程中，通过各种渠道获取资料。利用周末去大的书店查资料，把重要的东西记录下来，也去图书馆借了一些相关的参考资料，同时还充分利用网上资源查一些资料。最后再综合这些资料，结合 VB、Access 进行具体的操作。也可以说这是我第一次从开始设计到编程到最后完成自己独立完成。在这过程中也遇到了很多难题，比如说，按学生的学号或名称来查询学生的成绩时，就遇到了很多困难。通过查资料，仔细思考，把这些问题都解决了。但是，最后调

55、试程序时，又发现程序缺少参照完整性，又重新回过去重写代码，可是写了很久就是不能正常的运行，至少考虑了几个小时，最后才发现代码缺少了一部分条件，添加上后就可以正常运行了。第一次感受到了郁闷了半天后的喜悦心情。26从做课题设计的过程中，我的体会挺多的。只要有信心与耐心，没有做不到的事情。因为在这个过程中写代码与调试的过程中确实需要耐心与信心，否则就不可能写完整。我也知道该课题还存在很多的漏洞，也不是很完整。比如还应该添加上系科管理，班级管理等。由于时间的原因，也不能使之更完整。如果确实要给自己一个分数，我也不能给自己一个确切的多少分，但是我已经尽我的努力写的了，同时我自己也在这个过程中也学到了很多

56、知识。其实这已经使我很满足了。分数也不能代表什么，我认为自己真正的学到了东西才是最重要的。致谢致谢在论文即将完成之际，回顾紧张但又充实的学习班和开发过程，本人在此向所有关心我的及帮助我的老师和同学们致以最真诚的感谢。在本次毕业设计中，我从指导老师孙仁鹏身上学到了很多东西。他认真负责的工作态度，严谨的治学精神和深厚的理论水平都使我收益匪浅。他无论在理论上还是在实践中，都给与我很大的帮助，使我得到很大的提高，这对于我以后的工作和学习都有一种巨大的帮助，在此感谢他耐心的辅导。在撰写论文阶段，老师几次审阅我们的论文，提出了许多宝贵意见，没有他的指导，我们就不能较好的完成课题设计的任务。另外，我还要感谢

57、在这几年来对我有所教导的老师，他们孜孜不倦的教诲不但让我学到了很多知识，而且让我掌握了学习的方法，更教会了我做人处事的道理，在此表示感谢。同时，在系统开发过程中还有同组的同学也给了我不少帮助，这里一并表示感谢。参考文献参考文献1 张红军，王红，Visual Basic 6.0 中文版高级应用与开发指南.北京：人民邮电出版社，20012 宋伟，吴建国，中文 Visual Basic 6.0 编程基础.北京：清华大学出版社3 李玉林，Visual Basic 毕业设计指南与项目实践.北京：科海电子出版社,2008274 谭浩强，Visual Basic 程序设计.北京：清华大学出版社，20045 瞿军，周屹.Visual Basic 程序设计培训教程.北京：清华大学出版社，2002