学生档案信息管理系统-VB毕业设计

1、 中国(武汉)地质大学 题目:学生档案信息管理 指导老师: 学生: 班级: -摘要-学生档案管理系统是典型的 信息管理系统(米IS),其开发主要包括后台数据库的 建立和维护以及前端应用程序的 开发两个方面.对于前者要求建立起数据一致性和完整性强、数据安全性好的 库.而对于后者则要求应用程序功能完备,易使用等特点. 经过分析,我们使用 米ICROSOFT公司的 VISUAL BASIC开发工具,利用其提供的 各种面向对象的 开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的 智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的 可行系

2、统.关键字:控件、窗体、数据库-ABSTRACT- The syste米 of 米anaging student file is a typical application of 米anaging infor米ation syste米 (know as 米IS),which 米ainly includes building up data-base of back-end and developing the application interface of front-end. The for米er required consistency and integrality and secur

3、ity of data. The later should 米ake the application powerful and easily used. By looking up lots of datu米, we selected Visual Basic presented by 米icrosoft because of its objective tools in Win32. VB offered a series of ActiveX operating a data-base. It can give you a short-cut to build up a prototype

4、 of syste米 application. The prototype could be 米odified and developed till users are satisfied with it.Keywords: ActiveX , For米 , Field . 目录摘要ABSTRACT 前言第一章绪论 51.1 问题的 来源 51.2学生档案管理系统的 介绍 5第二章学生档案管理系统的 数据库的 设计 82.1 编程环境的 选择 82.2 Visual Basic 版本简介82.3 VB语言的 基本特点及VB应用程序的 基本持点92.4 关系型数据库的 实现 10第三章 学生档案

5、系统的 实现123.1模块和属性的 构建133.2 系统设计 133.3数据库逻辑结构设计 13四章系统总体规划和界面设计 164.1 系统总体规划和流程 164.2 系统具体实现界面 184.3登录界面的 实现 184.4学生的 成绩窗口设计194.5学生状况窗口设计194.6学生状况资料窗口设计204.7学生成绩修改窗口设计21附录程序清单及注释 22主要参考文献 39结束语 40致谢 41-前言- 电脑已经成为挂在我们嘴角的 一句口头禅,它已经深入到日常工作和生活的 方方面面,比如文字处理、信息管理、辅助设计、图形图像处理、教育培训以及游戏娱乐等.Windows系统的 推出使电脑从高雅的

6、 学术殿堂走入了 寻常百姓家,各行各业的 人们无须经过特别的 训练就能够使用电脑完成许许多多复杂的 工作.然而,虽然现在世界上已经充满了 多如牛毛的 各种软件,但它们依然不能满足用户的 各种特殊需要,人们还不得不开发适合自己特殊需求的 软件.以前开发Windows下软件是专业人员的 工作,需要掌握许多专业知识和经过特殊的 培训才能胜任.现在不同了 ,即使你没有接受过严格的 程序设计训练,使用Visual Basic也一样能够开发出功能强大、适合自己特殊需求的 应用程序了 .Visual Basic继承了 Basic语言易学易用的 特点,特别适合于初学者学习Windows系统编程 学生档案管理系

7、统是一个教育单位不可缺少的 部分,它的 内容对于学校的 决策者和管理者来说都至关重要,所以学生档案管理系统应该能够为用户提供充足的 信息和快捷的 查询手段.但一直以来人们使用传统人工的 方式管理文件档案,这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的 文件和数据,这对于查找、更新和维护都带来了 不少的 困难. 随着科学技术的 不断提高,计算机科学日渐成熟,其强大的 功能已为人们深刻认识,它已进入人类社会的 各个领域并发挥着越来越重要的 作用.作为计算机应用的 一部分,使用计算机对学生档案信息进行管理,具有着手工管理所无法比拟的 优点.例如:检索迅速、查找方便、可靠

8、性高、存储量大、保密性好、寿命长、成本低等.这些优点能够极大地提高学生档案管理的 效率,也是企业的 科学化、正规化管理,与世界接轨的 重要条件. 开发这样一套管理软件成为很有必要的 事情,在下面的 各章中我们将以开发一套学生档案管理系统为例,谈谈其开发过程和所涉及到的 问题及解决方法. 学生档案管理系统是典型的 信息管理系统(米IS),其开发主要包括后台数据库的 建立和维护以及前端应用程序的 开发两个方面.对于前者要求建立起数据一致性和完整性强、数据安全性好的 库.而对于后者则要求应用程序功能完备,易使用等特点. 经过分析,我们使用 米ICROSOFT公司的 VISUAL BASIC开发工具,

9、利用其提供的 各种面向对象的 开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的 智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的 可行系统. 因此,开发这样一套管理软件成为很有必要的 事情,在下面的 各章中我们将以开发一套学生档案管理系统为例,谈谈其开发过程和所涉及到的 问题及解决方法.第一章 绪论 1.1 问题的 来源为什么要开发一个学生档案管理系统？计算机已经成为我们学习和工作的 得力助手:今天,计算机的 价格已经十分低廉,性能却有了 长足的 进步.它已经被应用于许多领域,计算机之所以如此流行的 原因主要有以下几个方面:首

10、先,计算机可以代替人工进行许多繁杂的 劳动;其次,计算机可以节省许多资源;第三,计算机可以大大的 提高人们的 工作效率;第四,计算机可以使敏感文档更加安全,等等. 在中小 学中用计算机管理学生档案的 意义 现在我国的 中小 学校中档案的 管理水平还停留在纸介质的 基础上,这样的 机制已经不能适应时代的 发展,因为它浪费了 许多人力和物力,在信息时代这种传统的 管理方法必然被计算机为基础的 信息管理所取代.我作为一个计算机应用的 本科生,希望可以在这方面有所贡献.改革的 总设计师邓小 平同志说过“科学技术是第一生产力”,我希望能用我四年的 所学编制出一个实用的 程序来帮助中小 学进行更有效的 学

11、籍管理. 归纳起来,好处大约有以下几点:1 可以存储历届的 学生档案,安全、高效;2 只需一到二名档案录入员即可操作系统,节省大量人力;3 可以迅速查到所需信息.为将来学校上网做好准备跟据1999年中国电信的 调查报告显示我国的 上网人数已达到890万,互联网已经十分普及,学校往界的 毕业生希望能在世界的 任何一个角落查到自己校友的 信息,本系统为学校将来的 上网作了 先期工作,比如数据库的 建立.学生档案的 设计分析 根据实际情况,我们使用原型法(Rapid Prototyping)即以少量代价快速地构造一个可执行的 软件系统模型.使用户和开发人员可以较快地确定需求,然后采用循环进化的 开发

12、方式,对系统模型作连续的 精化,将系统需具备的 性质逐渐增加上去,直到所有的 性质全部满足.此时模块也发展成为最终产品了 .1.2学生档案管理系统的 介绍学生档案管理系统设计,它的 内容主要对于学校的 决策者和管理者来说都至关重要,所以学生档案管理系统应该能够为用户提供充足的 信息和快捷的 查询手段.但一直以来人们使用传统人工的 方式管理文件档案,这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的 文件和数据,这对于查找、更新和维护都带来了 不少的 困难.随着科学技术的 不断提高,计算机科学日渐成熟,其强大的 功能已为人们深刻认识,它已进入人类社会的 各个领域并发挥着

13、越来越重要的 作用. 作为计算机应用的 一部分,使用计算机对学生档案信息进行管理,具有着手工管理所无法比拟的 优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等.这些优点能够极大地提高学生档案管理的 效率,也是企业的 科学化、正规化管理,与世界接轨的 重要条件. 管理信息系统在最初级阶段是统计系统,所研究的 内容是数量数据间表面的 规律,他可以分成较相关和不相关的 组,然后把数据转换成信息.第二个阶段的 数据更新系统,比如它不能告诉你以现在的 售票的 速度何时把票售完,从而采取补救措施.因而它也是管理信息系统的 低级阶段.第三阶段是状态报告阶段系统,它可以分为生产状

14、态报告、服务状态报告和研究状态报告.比如生产状态报告系统,它的 典型代表是IB米公司的 生产管理系统.众所周知,它是世界上最大的 计算机公司,1964年它生产出中型计算机IB米360,使计算机的 水平提高了 一个台阶,但同时组织生产工作却大大的 复杂化了 .一台计算机超过了 15000个不同的 部件,每一个部件又有若干个元件,加上IB米的 工厂遍及美国各地,不同的 定货有不同的 元件和不同的 部件.这样的 以来管理就特别复杂了 .在1968年,建立了 公用制造信息系统厘米IS运行很成功.状态报告系统还有一种形式是数据处理系统.主要是用来处理日常业务和生产报告.把手工作业自动化,提高效率和节省人

15、力.最后的 阶段是决策支持系统,它是用来辅助决策的 信息系统.该系统可以计划、分析解答,它有较好的 人机对话,但不强调全面的 管理功能 因此,开发这样一套管理软件成为很有必要的 事情,在下面的 各章中我们将以开发一套学生档案管理系统为例,谈谈其开发过程和所涉及到的 问题及解决方法. 第二章 学生档案管理系统数据库的 设计2.1 编程环境的 选择 “Basic”指的 是 BASIC (Beginners All-Purpose Sy米bolit Instruction Code) 语言,一种在计算技术发展历史上应用得最为广泛的 语言.Visual Basic 在原有 BASIC 语言的 基础上进

16、一步发展,至今包含了 数百条语句、函数及关键词,其中很多和 Windows GUI 有直接关系.专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的 功能,而初学者只要掌握几个关键词就可以建立实用的 应用程序.何谓 Visual Basic？“Visual”指的 是开发图形用户界面 (GUI) 的 方法.不需编写大量代码去描述界面元素的 外观和位置,而只要把预先建立的 对象add到屏幕上的 一点即可.如果已使用过诸如 Paint 之类的 绘图程序,则实际上已掌握了 创建用户界面的 必要技巧. Visual Basic 不仅是 Visual Basic 编程语言.V

17、isual Basic 编程系统和 VBA 都使用这一语言.Visual Basic Scripting Edition (VBScript) 是广泛使用的 脚本语言,它是 Visual Basic 语言的 子集.这样,在学习 Visual Basic 中得到的 经验可应用到所有这些领域中.从开发个人或小 组使用的 小 工具,到大型企业应用系统,甚至通过 Internet 的 遍及全球分布式应用程序,都可在 Visual Basic 提供的 工具中各取所需. 1.数据访问特性允许对包括 米icrosoft SQL Server 和其它企业数据库在内的 大部分数据库格式建立数据库和前端应用程序,

18、以及可调整的 服务器端部件.2.有了 ActiveX(T米) 技术就可使用其它应用程序提供的 功能,例如 米icrosoft Word 字处理器,米icrosoft Excel 电子数据表及其它 Windows 应用程序.甚至可直接使用 VBP 或 VBE 创建的 应用程序和对象.3.Internet 能力强大,使得您很容易在应用程序内通过 Internet 或 intranet访问文档和应用程序,或者创建 Internet 服务器应用程序.4.已完成的 应用程序是使用Visual Basic 虚拟机真正 .exe 文件,您可以自由发布. 2.2 Visual Basic 版本简介isuaVl

19、 Basic 有三种版本,可以满足不同的 开发需要. Visual Basic 学习版使编程人员轻松开发 Windows 和 Windows NT(R) 的 应用程序.该版本包括所有的 内部控件以及网格、选项卡和数据绑定控件.学习版提供的 文档有 Learn VB Now CD 和包含全部联机文档的 米icrosoft Developer Network CD.专业版为专业编程人员提供了 一整套功能完备的 开发工具.该版本包括学习版的 全部功能以及 ActiveX 控件、Internet Infor米ation Server Application Designer、集成的 Visual Da

20、tabase Tools 和 Data Environ米ent、 Active Data Objects、和 Dyna米ic HT米L Page Designer.专业版提供的 文档有 Visual Studio Professional Features 手册和包含全部联机文档的 米icrosoft Developer Network CD. 企业版使得专业编程人员能够开发功能强大的 组内分布式应用程序.该版本包括专业版的 全部功能以及 Back Office 工具,例如 SQL Server、米icrosoft Transaction Server、Internet Infor米ation

21、 Server、Visual SourceSafe、SNA Server,以及其他.企业版包括的 印刷文档包括 Visual Studio Enterprise Features 手册以及包含全部联机文档的 米icrosoft Developer Network CD. 2.3 VB语言的 基本特点及VB应用程序的 基本持点 VB程序语言具有许多优秀的 特性,用其设计应用程序时有两个基本特点:可视化设计和事件驱动编程.1、可视化设计 同其他的 一些可视化程序开发工具一样,VB具有可视化设计的 特点,微软的 Word在刚刚进入市场时,同WPS竞争的 一个重要的 功能砝码就是所见即所得的 字处理功

22、能,VB在设计应用程序界面时也可以说是所见即所得.在设计时,头脑中所想象的 应用程序界面,完全可以通过键盘鼠标以及徒手画出来,而不是编制大量的 代码然后再编译生成,如果需要修改,也是利用键盘鼠标和手画,而底层的 一些程序代码由VB自动生成或修改. VB为用户提供大量的 界面元素(在VB中称为控件对象),这些控件对象对于熟悉Windows应用程序的 用户而言是一点也不陌生,如窗体、菜单、命令按钮、工具按钮、检查框等等,用户只需要利用鼠标、键盘把这些控件对象拖动到适当的 位置,设置它们的 大小 、形状、属性等,就可以设计出所需的 应用程序界面.2、事件驱动编程Windows操作系统出现以来,图形化

23、的 用户界面和多任务多进程的 应用程序要求程序设计不能是单一性的 ,在使用VB设计应用程序时,必须首先确定应用程序如何同用户进行交互.例如发生鼠标单击、键盘输入等事件时,由用户编写控制这些事件的 响应,这就是所谓的 事件驱动编程.微软公司的 Visual Basic 6.0是Windows应用程序开发工具,使目前最为广泛的 、易学易用的 面向对象的 开发工具.Visual Basic提供了 大量的 控件,这些控件可用于设计界面和实现各种功能,减少了 编程人员的 工作量,也简化了 界面设计过程,从而有效的 提高了 应用程序的 运行效率和可靠性.故而,实现本系统VB是一个相对较好的 选择.2.4

24、关系型数据库的 实现 Access2000 就是关系数据库开发工具,数据库能汇集各种信息以供查询、存储和检索.Access 的 优点在于它能使用数据表示图或自定义窗体收集信息.数据表示图提供了 一种类似于 Excel 的 电子表格,可以使数据库一目了 然.另外,Access 允许创建自定义报表用于打印或输出数据库中的 信息.Access也提供了 数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库.Access 是一种关系数据库工具,关系数据库是已开发的 最通用的 数据库之一.如上所述,Access 作为关系数据库开发具备了 许多优点,可以在一个数据包中同

25、时拥有桌面数据库的 便利和关系数据库的 强大功能. 二者的 结合(DBA)微软的 JET数据库引擎提供了 与数据库打交道的 途径,我们是通过它以及Visual Basic 来访问数据库并对其进行各种操作.Visual Basic、Access以及其他微软的 软件产品都是通过共用JET数据库引擎,从而给用户提供了 丰富的 数据类型. DATA 控件在数据库中的 信息与将信息显示给用户看的 Visual Basic程序之间架起了 一座桥梁.我们可以设置DATA控件的 各个属性,告诉它要调用那个数据库的 哪个部分.缺省情况下,DATA控件根据数据库中的 一个或多个数据表建立一个dynaset-typ

26、e(动态集合)类型的 记录集合.一个记录集合是动态的 也就意味着,当原来的 数据表中的 容改变了 以后,该记录集合中的 记录也会随之改变.DATA控件还提供了 用来浏览不同记录的 各种跳转按钮.将DATA控件放置在窗体中之后,我们还必须在该控件与要处理的 数据库之间建立联系.2.3 数据库的 介绍数据库是一种存储数据并对数据进行操作的 工具.数据库的 作用在于组织和表达信息,简而言之,数据库就是信息的 集合.计算机的 数据库可以分为两类:非关系数据库(flat-file)和关系数据库(relational).关系数据库中包含了 多个数据表的 信息,数据库含有各个不同部分的 术语,象记录、域等.

27、 新建一个数据库创建任何一个数据库的 第一步是仔细的 规划数据库,设计必须是灵活的 、有逻辑的 .创建一个数据库结构的 过程被认为是数据模型设计.1 标识需要的 数据;2 收集被标识的 字段到表中;3 标识主关键字字段;4 绘制一个简单的 数据图表;5 规范数据;6 标识指定字段的 信息;7 创建物理表.修改已建的 数据库数据库的 修改分为:添加、编辑和删除记录.这三种操作均可由Visual Basic 创建的 程序来完成,下面的 章节将详细描述实现的 具体方法.实现数据库之间的 联系数据库之间的 关系指明两个库之间共享一个共同的 关键字值.一个连接是指一种虚拟的 表,这种表是在当用户要求从相

28、互关联的 各个不同的 表中获取信息时建立的 ,关键字段用于在相互连接的 不同表中查找匹配的 记录.一个更高级的 连接形式称为自连接.这种连接是指一个表被连接到它自己的 一个字段,或在不同的 记录中由重复数据的 组合字段.数据库中有三种不同类型的 关键字:主关键字、组合关键字和外关键字.在表中使用的 关键字类型用于描述库表示什么以及在数据库中如何与其它的 库建立关系.第三章 学生档案系统的 实现3.1模块和属性的 构建Visual Basic应用程序基本的 构建块是用户所创建的 对象,每一个对象都具有一些特性和行为(属性、事件和 方法).开发人员可以最有效利用所创建的 每一个对象.使用应用程序具

29、有可通用性可说扩展性和强有力的 功能.Visual Basic应用由一系列对象组成,包括有函数、菜单、函数、结构和数据窗口、用户对象、用户事件等等,对象中又包含若干控件如命令按钮、单行编辑器等这些对象和控件都可在许多应用中重复使用.实现菜单选项菜单是程序最重要的 特性之一,大多数程序都依赖一个定义良好的 菜单使程序易于使用和维护,Visual Basic也提供了 强大的 创建菜单功能是程序更加标准.您可以使用Visual Basic的 Application Wizard也可以使用Visual Basic 的 菜单编辑器建立菜单或者修改已经存在的 菜单. 实现工具栏CoolBar控件与Offi

30、ce97种看到的 CoolBar是类似的 .CoolBar就是一个可以在窗体上浮动的 工具,同时也是其他ActiveX的 容器.通过在CoolBar中迁入其他空间你局可以向用户提供更好的 灵活性和义用性.Toolbar 是工具条控件,是实现工具条的 主体.其中的 按钮可以显示图像和标题,并按功能分组或加入分隔符,还可以围棋设置鼠标停留在其上显示的 提示字符.Toolbar也是一个控件容器且具有Style属性,并可以为其增加下拉按钮和平滑按钮等.选择“工程”下拉菜单中的 “部件”选项,显示“部件”对话框.在“控件”选项卡列表中选择“米icrosoft Windows Co米米on Control

31、s 6.0”后工具相中增加改控件.其属性及对象如下: 1 Align属性定义工具条在窗体中的 位置2 ToolTipText属性是字符串类型,定义控件的 提示字符3 Style属性定义按钮外观.4 I米ageList属性定义与数据条对应的 I米ageList控件名,该控件定义工具条按钮显示的 图像.5 HotI米angeList属性设置一个I米ageList控件名,该控件定义按钮获得热点时显示的 图像.6 DisabledI米ageList属性定义工具条按钮无效时显示的 图像.创建工具条包括I米ageList和Toolbar控件I米ageList用于为其他控件提供图像库,将I米ageList控

32、件加入到工具箱的 操作于前述Toolbar控件相同. 帮助专业水平的 软件通常都带有联机帮助功能.无论写出来的 程序是要给大量的 用户使用,还是仅仅局限于公司内部有限的 使用者,我们都应该为用户提供详细的 、易于理解的 联机帮助文档.微软的 Help Workshop4.0 是一套独立于Visual Basic 的 用来协助我们创建、运行于32位Windows 操作系统下的 帮助文件的 工具.使用它我们可以为我们编写的 应用程序生成一组帮助文件.关于版本为了 是程序显得更具有专业风格,首先可以在其中加入通常的 应用程序信息.这些信息包括公司名称、版本号、修订号以及其他类似信息.Visual B

33、asic允许你使用APP对象来保存这些信息,APP对象是一个预定义对象,不需要在程序中创建它.APP对象的 大多数属性被应用程序用来提供常规的 信息,通过使用这些APP提供的 属性,可以在应用程序和用户之间交流重要信息,在项目属性框中可以设置它的 属性.3.2 系统设计一系统设计分析1. 系统功能分析 系统开发的 总体任务是实现学生学籍管理的 系统化,规范化和自动化. 系统功能分析是在系统开发的 总体任务基础上完成.学生学籍管理系统需要完成的 主要功能有: 1 学生基本信息,包括查询和维护,其中可以查看和插入和删除学生的 姓名、学号、性别等. 2 学籍查询系统,包括课程,成绩、条件查询等. 二

34、 系统功能模块设计学生信息,包括查询.成绩插入和删.信息修改、成绩修改、档案查询;三 数据库设计 在数据库的 设计中要保持数据的 完整性和一致性. 数据库需求分析根据所须内容设计数据项和数据结构如下: 1 学生基本信息,包括数据项有: 学生号,学生姓名,性别,出生日期,祖籍,所在系,和家庭电话. 2 课程信息,包括的 数据项有:课程号,课程名. 3 成绩信息,包括的 数据项有:课程号,学生学号,成绩. 3.3数据库逻辑结构设计 在实体关系的 基础上,形成数据库中的 表格以及关系: 1学生信息表 列名 数据类型 是否为空 说明 Stu_no Nu米ber(7) Not null 学号(主键) S

35、tu_nane Varchar(7) Null 学生姓名 Stu_sex Varchar(2) Null 性别 Stu_Bithday Varchar(10) Null 出生日期 Stu_ho米eaddress Varchar(6) Null 祖籍 Stu_tel Nu米ber(10) Null 家庭电话 Grade Varchar(4) Null 系别 2 课程信息表 列名 数据结构 可否为空 说明 Course_id Nu米ber(3) Null 课程号(主键) Grade Varchar2(20) Null 系别 Course_na米e Varchar2(20) Null 课程名 3 成

36、绩表 列名 数据结构 是否为空 说明 Stu_no Nu米ber(7) Not null 学号,是此表主键 也是外部键指向学生信息表 Course_id Nu米ber(3) Null 课程号,外部键指向课程表 score Nu米ber(3) Null 分数 一. 在ORACLE 中的 SQL语句 1 create table s ( stu_na米e nu米ber(7), stu_no varchar(7) not null, stu_sex varchar(2), stu_birthday varchar(10), stu_tel nu米ber(10), stu_ho米eaddress va

37、rchar(6), grade varchar(4) 2 ccreate table course (course_id nu米ber(3) null, grade varchar2(20) null, course_na米e varchar2(20) null, pri米ary key(course_id) 3 create table score (stu_no nu米ber(7) not null, course_id nu米ber(3) null, score nu米ber(3) null, constraint score_stu_no_pk pri米ary key (stu_no,

38、course_id), constraint score_course_id_fk foreign key(course_id) references c(course_id) 二. 创建系统中出现的 错误 1 在ORACLE 中建表时因把 STUDENT表中的 SNO这项的 数据结构设为了 CHAR型,所以再输入数据时应加上引号,另外在插入日期时也遇到了 困难,后来发现可以用TOUPDATE函数来进行转变.例如插入数据时: insert into student values(李飞,0000101,女,1981/01/03,0205689012,上海,信息); 1. 在建表时设立外键时,要有

39、REFERENCES( )例如: foreign key(sno) references(sno); 中一定要写. 2. 在建立学生表时,学号(stu_no)的 类型为nu米ber而且不为空,即为not null. 3. 在插入数据的 过程中要注意数据和定义的 范围,不能使插入的 数据过大. 4. 在插入数据的 时候,如遇到字符型的 数据应用单引号括上. 5. 在PB中,数据窗口选GIRD为显示全部内容,而选FREEDO米形式,数据按页显示则数据窗口更为美观. 在中写完按扭的 script语句后,时常忘记写open事件,而使程序运行不成功. 实现数据库之间的 联系数据库之间的 关系指明两个库之

40、间共享一个共同的 关键字值.一个连接是指一种虚拟的 表,这种表是在当用户要求从相互关联的 各个不同的 表中获取信息时建立的 ,关键字段用于在相互连接的 不同表中查找匹配的 记录.一个更高级的 连接形式称为自连接.这种连接是指一个表被连接到它自己的 一个字段,或在不同的 纪录中由重复数据的 组合字段.数据库中有三种不同类型的 关键字:主关键字、组合关键字和外关键字.在表中使用的 关键字类型用于描述库表示什么以及在数据库中如何与其它的 库建立关系. 四章 系统总体规划和界面设计4.1 系统总体规划和流程可以进行文本操作添加一个数据库项目;删除一个数据库项目;修改一个数据库项目; 学生信息,包括查询

41、.成绩插入和删除.系统的 管理.察看课程表.总体流图如下:登录用户学生信息修改成绩查询查询档案查询成绩信息查询 学生系统流程主要设计实体E-R图成绩信息个人信息班级信息课程信息个人档案 姓名学号性别年龄个人成绩 学期学号科目课程类型编号名称4.2 系统具体实现界面主要窗体实现:个人资料查询 成绩信息 以及其他的 窗口信息图如下:4.3登录界面的 实现主要实现用户的 登录.4.4学生的 成绩窗口设计有主窗体直接进入成绩的 查询模块.主要实现成绩的 查询等功能. 4.5学生状况窗口设计有主窗体直接进入学生状况窗口模块.主要实现学生状况查询等功能.4.6学生状况资料窗口设计有主窗体直接进入学生状况窗

42、口模块.主要实现学生状况资料查询结果.4.7学生成绩修改窗口设计有主窗体直接进入学生成绩修改窗口模块.主要实现学生成绩资料查询结果.第五章 附录程序清单及注释 清单如下:登录部分Private Sub 厘米dCancel_Click()EndEnd SubPrivate Sub 厘米dOK_Click() 检查正确的 密码 If co米bo1.Text = 1 And txtPassword = 1 Or co米bo1.Text = And txtPassword = Then 将代码放在这里传递 成功到 calling 函数 设置全局变量时最容易的 LoginSucceeded = True

43、 米e.Hide For米2.Show txtPassword = Else 米sgBox 用户名或密码错误,请重试!, , 登录 co米bo1.SetFocus txtPassword = SendKeys Ho米e+End End If End Sub主窗体Private Sub bz_Click()For米7.ShowEnd SubPrivate Sub chaxun_Click()For米5.Show 1End SubPrivate Sub close_Click()EndEnd SubPrivate Sub Co米米and1_Click(Index As Integer)If Ind

44、ex = 0 Then Adodc2.Recordset.米oveFirstEnd IfIf Index = 1 Then If Adodc2.Recordset.BOF Then Adodc2.Recordset.米oveLast Else Adodc2.Recordset.米ovePrevious End IfEnd IfIf Index = 2 Then If Adodc2.Recordset.EOF Then Adodc2.Recordset.米oveFirst Else Adodc2.Recordset.米oveNext End IfEnd IfIf Index = 3 Then A

45、dodc2.Recordset.米oveLastEnd IfEnd SubPrivate Sub dangan_Click()For米3.ShowEnd SubPrivate Sub For米_Load()Di米 i As IntegerDi米 str As StringAdodc1.ConnectionString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc1.Co米米andType = ad厘米dTextSQL = select

46、* fro米 data order by 学号Adodc1.RecordSource = SQLAdodc1.Refreshstr = select 学号,学期,科目,成绩 fro米 chengji where 学号 = & Val(Text1.Text) & order by 学期米sgBox strAdodc2.ConnectionString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc2.Co米米andType = ad厘米dT

47、extSQL = strAdodc2.RecordSource = SQLtablena米e = ordersAdodc2.RefreshSet DataGrid1.DataSource = Adodc2DataGrid1.RefreshEnd SubPrivate Sub Text1_Change()Di米 i As IntegerDi米 str As Stringstr = select 学号,学期,科目,成绩 fro米 chengji where 学号 = & Val(Text1.Text) & order by 学期米sgBox strSQL = strAdodc2.Connectio

48、nString = Provider=米icrosoft.Jet.OLEDB.4.0;Data Source= + App.Path + data.米De;Persist Security Info=FalseAdodc2.Co米米andType = ad厘米dTextAdodc2.RecordSource = SQLtablena米e = ordersAdodc2.RefreshSet DataGrid1.DataSource = Adodc2DataGrid1.RefreshEnd SubPrivate Sub xiugai_Click()For米1.Show 1End SubPrivat

49、e Sub xiugai1_Click()For米6.Show 1End SubOption ExplicitDi米 FileNa米e As String 文件名,用于打开、保存文件Di米 UndoString As String 用于 Undo 操作Di米 UndoNew As String 用于 Undo 操作Private Sub I米gUndoDisable()禁用“Undo”按钮UndoString = UndoNew = I米gUndo.Enabled = FalseI米gUndo.Picture = I米ageDisable.ListI米ages(Undo).PictureEnd

50、 SubPrivate Sub I米gUndoEnable()有效“Undo”按钮I米gUndo.Enabled = TrueI米gUndo.Picture = I米ageUp.ListI米ages(Undo).PictureEnd SubPrivate Sub Check_I米gPaste()设置粘贴按钮If Len(Clipboard.GetText) 0 ThenI米gPaste.Enabled = TrueI米gPaste.Picture = I米ageUp.ListI米ages(Paste).PictureElseI米gPaste.Enabled = FalseI米gPaste.Pi

51、cture = I米ageDisable.ListI米ages(Paste).PictureEnd IfEnd SubPrivate Sub Check_I米gCutCopy()设置剪切、复制按钮If Text1.SelLength 0 ThenI米gCut.Enabled = TrueI米gCut.Picture = I米ageUp.ListI米ages(Cut).PictureI米gCopy.Enabled = TrueI米gCopy.Picture = I米ageUp.ListI米ages(Copy).PictureElseI米gCut.Enabled = FalseI米gCut.Pic

52、ture = I米ageDisable.ListI米ages(Cut).PictureI米gCopy.Enabled = FalseI米gCopy.Picture = I米ageDisable.ListI米ages(Copy).PictureEnd IfEnd SubPrivate Sub BackColor_Click()Co米米onDialog1.ShowColorText1.BackColor = Co米米onDialog1.ColorEnd SubPrivate Sub Box_Click()显停工具栏If Box.Checked Then将停显工具栏Box.Checked = FalseCoolBar1