大学毕业论文-—学生宿舍管理系统的设计与实现.doc

学生宿舍管理系统的设计与实现
摘要
随着电脑的普及与使用，现在的管理也提升了一个档次，渐渐实现了无纸化办公，即从原来的人工记录管理模式转变为电脑一体化管理。高校是科研的阵地，后勤的宿舍管理也应该一改传统的人工管理，更加信息化，时代化，节省人力物力，提高效率。基于这一点，开发此学生宿舍管理软件。
宿舍,是大学生在高校校园里一个重要的学习、生活、交往的空间环境,大学生大约有2/ 3 的时间是在宿舍环境里渡过的。作为计算机应用的一部分,使用计算机对宿舍信息进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高宿舍管理的效率,也是高等院校的科学化、正规化管理,与世界接轨的重要条件。根据各个组件的功能及关系,也为了加强对文件管理,用项目管理器对所有组件包含在一个项目文件中。(其实此项工作在系统开始设计时就开始进行) 在一切工作都做完了以后，要对系统进行编译成可执行文件(.EXE文件)，其可在Windows下直接运行。系统运行于Win 95/98/2000/NT/XP等系统。
软件从对学生的分房开始到最后的宿舍管理全部电脑化。它主要包括：宿舍、寝室的配置、住宿人员登记、卫生检查、宿舍资产、学生违纪、值班老师记录以及对学生住宿情况查询，可以更快地了解到每个学生的住宿情况,使宿舍的管理效率更高，做的更好！
关键词：配置 登记 检查

Abstract

With the popularization and use of the computer, present management has been promoted much, more and more jobs have been done by computer. It namely changes the original artificial record management mode into computer's integrating and managing. The university is the position of scientific research, the apartment management should change traditional managing artificially too, for the efficiency. So , develop the management software of student's apartment .
Student Apartment Management System is a utility management system based on the managing mode of many universities and colleges.Universal and easy-operating are the greatest features of the system ,which is also applicable for enterprises of the same type.Apartment keepers bear a increasingly heavy burden because of the gradually added number of roomers.In order to free apartment keepers from the heave work,and make the work more convienent and efficient.
The apartment management system is developed. The system computerized all the processes concerning the apartment management which include apartment,dormitory distribution,roomer registration,santitation examination,and the query for apartment property,students' violation of discipline,teachers' records and rooming situation.It makes the apartment management more efficient and much better.
Key word: dispose register chec

毕业设计（论文）原创性声明和使用授权说明

原创性声明
本人郑重承诺：所呈交的毕业设计（论文），是我个人在指导教师的指导下进行的研究工作及取得的成果。尽我所知，除文中特别加以标注和致谢的地方外，不包含其他人或组织已经发表或公布过的研究成果，也不包含我为获得 及其它教育机构的学位或学历而使用过的材料。对本研究提供过帮助和做出过贡献的个人或集体，均已在文中作了明确的说明并表示了谢意。
作 者 签 名：　　 　 　　日　 期：　　 　 　　 
指导教师签名：　　 　 　　 日　　期：　　 　 　　

使用授权说明

本人完全了解 大学关于收集、保存、使用毕业设计（论文）的规定，即：按照学校要求提交毕业设计（论文）的印刷本和电子版本；学校有权保存毕业设计（论文）的印刷本和电子版，并提供目录检索与阅览服务；学校可以采用影印、缩印、数字化或其它复制手段保存论文；在不以赢利为目的前提下，学校可以公布论文的部分或全部内容。
作者签名：　　 　 　　 日　 期：　　 　 　　 
目 录
绪论 1
第一章系统分析 2
1.1开发工具简介及系统运行环境 2
1.1.1 VB6简介 2
1.1.2 HELP制作 2
1.2开发的必要性 3
1.3系统开发的可行性 3
1.3.1 技术上的可行性 3
1.3.2经济上、组织管理上的可行性 3
1.4数据来源 4
1.5新系统数据流程图 4
第二章 数据库设计 7
第三章功能模块设计 9
3.1新系统功能结构图及运行图 9
3.2系统设置 10
3.3宿舍管理 11
3.4 卫生检查 12
3.5 宿舍资产 12
3.6 记录查看与记录删除 12
3.7值班记录 13
3.8帮助制作 13
第四章 程序设计 13
4.1 登录界面 14
4.1.1 登录图片显示 14
4.1.2 界面制作与实现 15
4.2 程序主界面 17
4.3系统设置 22
4.3.1用户管理 22
4.3.2 宿舍设置 27
4.3.3数据备份 35
4.3.4 数据转换 39
4.4宿舍管理 43
4.4.1学生请假 43
4.4.2学生违规 44
第五章 系统测试 47
致谢 48
参考文献 49
第一章系统分析

绪论
对于学校而言，学生宿舍管理是必不可少的组成部分。目前仍然存在有学校停留在宿舍管理部门人员手工记录数据的阶段，手工记录对于规模小的学校来说勉强可以接受；但对于学生信息量比较庞大，需要记录存档的数据比较多的高校来说，人工记录是相当麻烦的,而且当查找某条记录时，由于数据量庞大，只能依靠人工去一条一条地查找，这样不但麻烦而且浪费许多时间，工作效率比较低。在一些发达国家一些类似的宿舍管理系统已经应用于后勤管理，而且已经相当普及。
随着电脑的普及与应用，现在的管理也需要提升一个档次。即从原来的手工记录管理模式转变为电脑一体化管理。这样会给宿舍的管理人员带来很多好处，让他们管理的效率更高、效果更好，管理起来更方便。由此而产生了本管理软件――学生宿舍管理软件。
学生宿舍管理软件是用Microsoft Visual Basic编写完成。由于Visual Basic率先采用了可视化（VISUAL）的程序设计方法。所以利用系统提供的大量可视化控件，可以方便的以可视化方式直接绘制用户图形界面，并可直观，动态的调整界面的风格和样式，直到满意为止，从而克服了以前必须用大量代码去描述界面元素的外观和位置的传统编程模式。做起来方便，使用起来更为快捷。
作为一个学生宿舍的管理软件，要十分全面的贴近以及适合大学宿舍的管理方法。本软件的参考资料主要有两种来源：一是参考本学校宿舍的管理结构，管理方法。如各个宿舍的分布特色，以及宿舍的各种管理制度。这些资料是本软件的主要依据，也可以说这些资料来源于普通的生活，比较真实一些。二是来源于网络上的各种同类软件，通过这些软件可以看出一个宿舍最低需要哪些管理与设置，在这些软件中，有些软件功能比较齐全，但是在管理上显的非常的不方便，使用起来十分麻烦、繁琐，有些虽然简单，但是功能上又不是十分完善，对这些软件首先要进行取其精华，弃其糟粕，从而进行编写。
本软件主要包括以下方面：系统设置、宿舍管理、卫生检查、宿舍资产、记录查看、记录删除、值班记录、帮助制作。
学生宿舍管理软件目前版本为1.0.1，为一个测试版本。它目前在功能上，以及操作的简便上有很大的改进。但是还是存在一些不足，在有些功能的实现上还不是十分的理想，这也是本人在时间和精力上留下的遗憾。但是相信这些会在以后的版本中得到完善，使这个软件成为一个功能上最全，使用上最简捷方便的管理软件。

1

第一章系统分析
系统采用MICROSOFT公司的 VISUAL BASIC语言编写的学生宿舍管理系统,本系统在研制开发过程中，严格遵循软件工程方法，完全采用结构化程序设计方法。
本系统的主要功能可以方便的对学生宿舍进行管理，系统采用ACCESS数据库使数据具有较强的完整性、较好的数据安全性等特点以及提供了标准的帮助，使用户方便的获得所需的帮助。界面友好、操作简单、功能齐全、具有较好的人机接口界面是本系统的最大优点。
本学生宿舍管理系统的母的是要改善本源对学生宿舍的管理，所以再设计系统的时候应该尽量贴近学生，方便各级用户的操作。系统在实现上应具备以下功能：系统用户的登录、数据的添加功能、数据的删除功能、数据的修改功能、数据的查询功能、报表的输出功能、学生财物进出楼登记功能
1.1开发工具简介及系统运行环境
1.1.1 VB6简介
本软件的开发工具为VISUAL BASIC，作为一种开发语言，VISUAL BASIC率先采用了可视化（VISUAL）的程序设计方法。利用系统提供的大量可视化控件，可以方便的以可视化方式直接绘制用户图形界面，并可直观、动态的调整界面的风格和样式，直到满意为止，从而克服了以前必须用大量代码去描述界面元素的外观和位置的传统编程模式。
它还拥有面向对象的编程方法。面向对象的程序设计是伴随WIDNOWS图形界面的诞生而产生的一种新的程序设计思想，与传统程序设计有着较大的区别，VISUAL BASIC采用了面向对象的程序设计思想。所谓“对象”就是现实生活中的每个一人，每一个可见的实体。同样，在VISUAL BASIC中，用来构成用户图形界面的可视化控件，也可视为是一个对象。不同的对象，在程序中所赋给它的功能是不同的，比如，在图形界面上有两个命令按钮，一个用来实现数据的统计计算，另一个用来实现数据的打印，这两个按钮就可视为是两个不同的对象，为了实现这两个对象各自不同的功能，接下来就应该分别针对这两个对象编写程序代码，这种编程的思想和方法即为所谓的“面向对象的程序设计”。
它还支持第三方软件商为其开发的可视化控制对象，如本例中就用到了一个。这些可视化控件对应的文件扩展名这OCX。只要拥有控件的OCX文件，就可将其加入到VB系统中，从而大大增强VB的编程实力。使软件做起来会更加得心应手。
2
1.1.2 HELP制作
制作help文档需要一个专业制作软件，本人使用的是破解版的QuickCHM，此软件无论在功能上还在是操作上用起来都是很方便。它属于一个傻瓜型的制作软件，利用它可以快速的制作出各种你所需要的帮助文档。但是如果想制作出帮助文档，就需要使用制作网页的软件把内容先做成html形式，本人使用Dreamweaver制作的网页，然后在用此软件进行加载，最后生成chm文档。
1.2开发的必要性
信息资源已成为各个部门的重要财富和资源，建立一个满足各级部门信息处理需的信息系统，也一个企业或组织生存越来越重要的信息资源。长期以来，使用传统人工的方法管理高校宿舍，这种管理方式存在着许多缺点，如：效率低。而且时间一长，将产生大量的文件和数据，这对于查找、更新、维护都带来了不少的困难。
随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥越来越重要的作用。学生宿舍管理软件，是以高校的管理方式为实例而设计的一种实用型管理软件。
本系统最大的特点是通用性、简单操作性。随着学校寄宿人员的增多，宿舍管理人员的负担越来越重，为了让所有宿舍管理人员能从繁重的工作中解脱出来，实现无纸化办公，使工作更有条理、更方便、更有效率，而开发出这套宿舍管理软件。
1.3系统开发的可行性
1.3.1 技术上的可行性
3
我们正走进一个信息时代，信息技术将从根本上改变人类社会的生产方式和生活方式，各行各业的业务管理现在都已经相继使用计算机来处理，可以说用计算机进行信息管理是一个总趋势。学生宿舍管理软件主要是对宿舍、寝室的配置、住宿人员登记、卫生检查、宿舍资产、学生违纪、值班老师记录以及对学生住宿情况查询，修改，更新等。可以更快地了解到每个学生的住宿情况。开发一个学生宿舍管理系统可以达到事半功倍的效果。随着数据库管理系统的普及以及可视化编程软件的出现，使数据库管理信息系统的开发变得更为简单，因此开发一个学生宿舍管理系统是完全可行的。
1.3.2经济上、组织管理上的可行性
本单位有自己的微机室可以使用，不必重新购置计算机，不需要花费大量资金，是一个节约人力物力的好办法。
本单位的领导干部具有较高的素质，它们对管理现代化有较高的认识水平，并且有各级领导的大力支持和重视。
综上所述，建立一个学生宿舍管理软件与人工操作相比具有速度更快，操作更准确，更节约开支等有利之处，因此建立一个学生宿舍管理软件是必要可行。
1.4数据来源
软件，要十分全面的贴近以及适合大学宿舍的管理方法。本软件的参考资料主要有两种来源：一是参考本学校宿舍的管理结构，管理方法，这些资料是本软件的主要依据，也可以说这些资料来源于普通的生活，比较真实一些。二是来源于网络上的各种同类软件，通过这些软件可以看出一个宿舍最低需要哪些管理与设置，在这些软件中，有些软件功能比较齐全，但是在管理上显的非常的不方便，使用起来十分麻烦、繁琐，有些虽然简单，但是功能上又不是十分完善，对这些软件首先要进行取其精华，弃其糟粕，从而进行编写。
1.5新系统数据流程图
4

图1.1数据流程图

数据字典

图1.2 数据元素 注：其它数据元素略

图1.3 数据流
注：其它数据流略

5

图1.4 加工
注：其它加工略

6

图1.5数据存储
注：其它数据存储略

第二章 数据库设计
第二章 数据库设计
目前，可应用的数据库开发工具有很多，Oracle是面向网络计算的数据库，适合开发大型网络应用软件；Access和Visual Foxpro系统适合开发小型数据库应用软件。Access数据库功能比较齐全，数据的备份、拷贝都很方便，而且程序开发是不需要额外安装其他的数据库管理软件。
1、E—R图

图2.1 E—R图
2、信息的数量越来越大，数据库的作用越发突出,所以数据库的建立是系统施实的主要部分之一，它关系到整个系统的运行情况，是整个系统的重要组成部分。本系统数据库为db.mdb，在数据库中包括十个表。分别是：用户表、宿舍表、班级表、寝室表、卫生等级表、学生基本情况表、学生请假情况表、学生违规情况表、寝室卫生情况表、资产表。下面介绍几个主要的表：
⑴ 学生基本情况表主要是存放学生的基本情况，字段包括：姓名、性别、学号、班级、宿舍、寝室、入学时间、年制、寝室电话、个人电话、备注。
7
数据结构如下表：
表2.1学生基本情况表
字段名
数据类型
数据长度
姓名
刘长河
8
性别
男
2
学号
5100000000
10
班级
信息系统与信息管理
10
宿舍
一号公寓
20
寝室
603
10
入学时间
2007.9
14
年制
4年
8
个人电话
1399999999
15
备注
无

⑵ 学生请假情况表主要存放学生请假情况，字段包括：日期、姓名、班级、宿舍、寝室、天数、原因、老师、备注。
表2.2学生请假情况表
字段名
数据类型
数据长度
日期
2010.6.6
14
姓名
刘长河
8
班级
信息系统与信息管理
10
宿舍
一号公寓
20
寝室
603
10
天数
5天
10
原因
家中有事

老师
刘德华
8
备注
无

⑶ 学生违规情况表主要存放学生违规情况，字段包括：日期、姓名、班级、宿舍、寝室、原因、程度、处罚、备注。
表2.3学生违规情况表
字段名
数据类型
数据长度
日期
2010-7-8
14
姓名
刘长河
8
班级
信息系统与信息管理
10
宿舍
201
20
寝室
201
10
原因
打架斗殴

程度
严重

处罚
留校察看

备注
无

8
8
⑷ 卫生情况表主要存放寝室卫生情况，字段包括：日期、宿舍、寝室、检查1到5、得分、减分、等级、备注。其中检查1到5是为了在没有使用者想输入的记录的情况下自己输入而设计的，保证了系统的可修改性、可扩展性。
表2.4卫生情况表
字段名
数据类型
数据长度
日期
2011-4-4
14
宿舍
一号公寓
20
寝室
603
10
检查1
门窗不干净
40
检查2
地面不干净
40
检查3
不叠被
40
检查4
桌面不整齐
40
检查5
阳台不干净
40
得分
60
4
减分
40
4
等级
较差
6
备注
无

⑸ 资产表主要存放寝室新增资产情况，字段包括：日期、宿舍、名称、数量、单价、总价、用途、备注。
表2.5资产表
字段名
数据类型
数据长度
日期
2011.5.5
14
宿舍
一号公寓
20
名称
书桌
20
数量
3
4
单价
50
10
总价
150
10
用途
供学生使用

备注
无

9

学生宿舍管理系统的设计与实现
第三章功能模块设计
3.1新系统功能结构图及运行图
（1）、系统功能结构图：

图3.1系统功能结构图
（2）、系统功能结构图运行图：

10
图3.2系统功能结构运行图
经过系统分析，确定了本软件主要包括以下方面：系统设置、宿舍管理、卫生检查、宿舍资产、记录查看、记录删除、值班记录、帮助制作。
3.2系统设置
主要完成：用户管理、宿舍设置、数据备份、数据转换、退出的功能。
运行图如下:

图3.3系统设置运行图
（1） 用户管理
可以进行管理人员的添加和修改以及删除操作。添加人员可以分为两类：普通用户、管理员。可以视不同人员而添加。管理员拥有所有权力，对整个系统的操作。普通用户只有浏览、及一些简单的添加操作权力。无用户设置、宿舍设置及记录删除等权力。
（2）宿舍设置
分为三个主要的操作：宿舍设置、寝室设置、班级设置。在这里可以添加学校所有的宿舍、所有班级、每个宿舍的所有寝室,也可以用此软件管理一幢宿舍。这样操作起来会更简单、操作一目了然。
（3）数据备份
这是一个数据管理软件所必不可少的一部分，利用它可以及时的备份当前的数据库以及在出现故障后利用已保存的数据进行恢复。
（4）数据转换
利用数据转换将当前数据库中的表转换成Excel表格的形式，显示更为直观，可以进行打印等操作。
3.3宿舍管理
主要完成：学生请假、学生违规、床位设置的功能。
11
运行图如下:

图3.4宿舍管理运行图
1学生请假
主要是对学生请假记录做一个添加。利用它可以把学生的基本的请假资料保存起来。
2学生违规
主要是对学生违规记录做一个添加。利用它可以把学生的基本的违规资料保存起来。
3床位设置
通过床位设置可以简单查看每个宿舍每个寝室的床位使用情况以及床位剩余情况。还可以通过详细查看，查看到某个宿舍某个寝室住宿人员的人数，以及具体的住宿人员的名字。
3.4 卫生检查
主要完成：添加检查记录的功能。卫生检查可以对卫生检查的结果进行记录。这里的卫生标准一共有五项可以填写，在每一项里已经基本设置了所不合标准的记录，你可以在下拉列表框中进行选择即可，但是如果没有你想输入的记录的话，也可以自己输入。运行图如下:

图3.5卫生检查运行图
3.5 宿舍资产
主要完成：添加新增物品的功能。可以对宿舍资产的收入或其它物品的入库进行记录。运行图如下:
12

图3.6宿舍资产运行图
3.6 记录查看与记录删除
主要是对学生请假、学生违规、卫生记录，宿舍资产等记录所进行的操作，利用这两个功能可以对任一记录进行查看与删除。运行图如下:

图3.7记录查看 图3.8记录删除运行图
3.7值班记录
它的功能主要是针对值班人员开发出来的，在这里可以让值班人员对当天值班情况进行一个小记，以便日后查看。运行图如下:

图3.9值班记录运行图
3.8帮助制作
对于一个稍显正规的软件来说帮助的制作都是必不可少的内容，本程序也不例外，制作了此帮助文档。在程序中可以按F1或点击帮助菜单来显示此help.Chm文档。以便对本软件进行快速操作。运行图如下:

13
图3.10帮助运行图
学生宿舍管理系统的设计与实现
第四章 程序设计
作为宿舍管理是从新生入学开始的，包括了新生籍贯信息、性别、专业、班级、学号等学生个人信息录入整个数据库中，再与宿舍信息的状况结合，安排新生的住宿情况，再将整个信息作为统一数据，对学生的在校情况进行管理。

图4.0.1主程序流程图
4.1 登录界面
此界面是由Photoshop制作而成。在做这个登录面的时候想了很多，最后选择了这种，感觉它看起来干净，整齐。又不失其庄雅。加上本单位最有特色的建筑，会让人一目了然。

14

4.1.1 登录图片显示

图4.1登录界面
4.1.2 界面制作与实现
在这个界面中，主要处理的是判断当前用户输入的信息是否正确。如果正确，那么它属于哪种类型用户。因为此管理软件在登录后不同类型的用户显示的窗体与实现的功能都不是一样的，它们会有所差别！
(1) 浮动按钮的实现
确定和取消两个按钮在鼠标没有放上去之前看上去只是一个普通的平面字效果，但是当你把鼠标放在这几个字上面后，它会显示凸出的效果，按下后呈现凹陷的效果。总体实现立体的感觉。原理主要是在鼠标mousemove事件与线的颜色变化组合来实现。主要代码如下：
在窗体中的鼠标移动过程中，以及在窗体初始化的时候，要把添加的线的.Visible 属性设置为 False，只有在鼠标按下的时候在改变其颜色即可。
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single)
Line1.Visible = False
Line2.Visible = False
Line3.Visible = False
Line4.Visible = False
15
Line5.Visible = False
Line6.Visible = False
Line7.Visible = False
Line8.Visible = False
End Sub
鼠标按下的时候设置线条的颜色如下：
Private Sub Label3_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)
Line1.BorderColor = &H808080
Line2.BorderColor = &H808080
Line3.BorderColor = &HE0E0E0
Line4.BorderColor = &HE0E0E0
End Sub
鼠标移动到标签的时候设置线条的颜色如下：
Private Sub Label3_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single)
Line1.BorderColor = &HE0E0E0
Line2.BorderColor = &HE0E0E0
Line3.BorderColor = &H808080
Line4.BorderColor = &H808080
Line1.Visible = True
Line2.Visible = True
Line3.Visible = True
Line4.Visible = True
End Sub
(2) 用户类型判断
在数据库中建了一人yonghu表。在添加管理人员时有两种默认级别。管理员、普通用户。管理员拥有对数据库操作的一切权限。普通用户只有普通的查看，数据转换等。没有删除等操作功能。前用户成功登录后，会在主窗体的状态栏中显示出当前用户及其用户类型。
主要代码如下：
设置当前控件连接的数据库
Dim provider As String
Dim datasource As String
provider = "provider=Microsoft.jet.oledb.4.0"
datasource = "data source=" & App.Path & "\DB.mdb"
16
With Adodc1
.Mode = adModeReadWrite
.ConnectionString = provider & ";" & datasource
.CommandType = adCmdTable
.RecordSource = "yonghu"
.Refresh
.Recordset.MoveFirst
End With
对用户进行判断
If Text1.Text = "" Then
MsgBox "请输入用户名!", 48, "提示"
Exit Sub
End If
Adodc1.Recordset.Find "用户='" & Text1.Text & "'"
If Adodc1.Recordset.EOF = False And Text2.Text = Trim(Adodc1.Recordset.Fields("pass")) Then
main.Text1.Text = Adodc1.Recordset.Fields("级别")
main.Text2.Text = Adodc1.Recordset.Fields("用户")
main.Show
Unload Me
Else
Text1.Text = ""
Text2.Text = ""
MsgBox "登录不成功,请重新登录!", 48, "提示"
End If
4.2 程序主界面
程序主界面为本软件的显示的核心部分。一切主要操作及显示都通过这里完成。整个界面主要由五部分组成。菜单部分、工具栏、左侧操作栏、右侧显示栏以及状态栏。
17
①界面效果图如下：

图4.2程序主界面
菜单栏的详见附录内容，这里就不提了。左侧操作栏和右侧显示栏会在下面的内容中做介绍，现在只简单介绍一下工具栏和状态栏，以及主窗体的各个事件。
工具栏主要是由coolbar制作而成。由它制做的工具栏的显示效果会更有立体感一些。这里只列出了几个常用的按钮。其中的添加按钮是用来对宿舍住宿人员进行添加，修改也是对所住宿人员进行修改，想要进行修改时必须显示所有记录时才可以进行。在这里值得一提的是删除DataGrid的操作，由于不知道它的当前数据源是哪个，所以在删除前要确定它的数据源，也就是它所链接的adodc1的数据源，或者是其它ado控件对它的数据源进行重新绑定后的数据库表，也有可能是经过一个查询后得到的记录。
②它的实现方法如下所示：
Dim o As Adodc
Set o = DataGrid1.datasource
o.Recordset.Delete
o.Recordset.Update
这里主要是用到了ado对像的方法。用这个方法得到数据源。
下面是整个工具栏运行时代码：
Select Case Button.Index
Case 1
sel.Show 1
Case 3
add.Show 1
Case 5
On Error GoTo next2
Dim s As Adodc
Set s = DataGrid1.datasource
If s.RecordSource = "users" Then
edit.Show 1
18
End If
next2:
Case 7
On Error Resume Next
Dim o As Adodc
Set o = DataGrid1.datasource
o.Recordset.Delete
o.Recordset.Update
Case 9
back.Show 1
Case 11
With Adodc1
.Mode = adModeReadWrite
.ConnectionString = provider & ";" & datasource
.CommandType = adCmdTable
.RecordSource = "users" '
.Refresh
End With
Set DataGrid1.datasource = Adodc1
DataGrid1.Refresh
Call dx
Case 13
Unload Me
End Select
状态栏分四个部分。第一个为固定显示当前所用软件名称及作者。其中第二个和第三部分为动态显示的，它会显示出每次用户登录名称及其管理模式。由上图可以看出，lf为本软件管理员。第四部分为日期与时间的显示。其中第三部分的代码实现如下：
main.Text1.Text = Adodc1.Recordset.Fields("级别")
main.Text2.Text = Adodc1.Recordset.Fields("用户")
StatusBar1.Panels(2).Text = "当前用户：" & Text2.Text
StatusBar1.Panels(3).Text = "用户模式：" & Text1.Text
StatusBar1.Panels(4).Text = Date & " " & Time
'设置普通用户模式
If Text1.Text = "普通用户" Then
yhgl.Visible = False
19
g1.Visible = False
jlsc.Visible = False
gysz.Visible = False
Toolbar1.Buttons(5).Visible = False
Toolbar1.Buttons(6).Visible = False
Toolbar1.Buttons(7).Visible = False
Toolbar1.Buttons(8).Visible = False
End If
主窗体在程序运行中会遇到不断改变其大小，最小化，最大化，以及用鼠标来改变，这里需要在窗体的Resize事件中添加代码，让程序中用到的各个控件随时可以适应窗体改变后的大小，在这里改变的控件主要有DataGrid、TreeView系列及Frame控件、StatusBar。下面就是设置它们大小的程序代码：
DataGrid1.Width = main.Width - SSTab1.Width
DataGrid1.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 750
SSTab1.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 750
Frame1.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200
Frame2.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200
Frame3.Height = main.Height - StatusBar1.Height - CoolBar1.Height - 1200
TreeView1.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 1500
TreeView2.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 1500
TreeView3.Height=main.Height - StatusBar1.Height - CoolBar1.Height - 1500
Y = main.Width
x = (Y - z) / 4
StatusBar1.Panels(1).Width = u + x
StatusBar1.Panels(2).Width = v + x
StatusBar1.Panels(3).Width = w + x
StatusBar1.Panels(4).Width = m + x
这个软件的主要部分都在这里运行、查看，所以在主窗体的load事件里要把所用的到的东西都要加载进来，例如所在程序运行时所用到的表，左侧treeview部分树形显示的初始化。在这里几乎用到了所有的表，如下所示：
provider = "provider=Microsoft.jet.oledb.4.0"
datasource = "data source=" & App.Path & "\DB.mdb"
With Adodc1
.Mode = adModeReadWrite
.ConnectionString = provider & ";" & datasource
20
.CommandType = adCmdTable
.RecordSource = "users" '
.Refresh
End With

With Adodc2
.Mode = adModeReadWrite
.Conne