《VisualBasic数据库开发ACCESS》由会员分享，可在线阅读，更多相关《VisualBasic数据库开发ACCESS（44页珍藏版）》请在金锄头文库上搜索。
1、员工信息管理系统第6章VSISUAL BASIC数据库开发员工信息管理系统公司员工信息管理系统是现代企业管理工作不可缺少的一部分，是适应现代企业制度要求、推动企业劳动人事管理走向科学化和规范化的必要条件。公司员工信息管理系统可以用于支持企业完成劳动人事管理工作，它具备如下处理信息的能力：(1) 新增信息，包括新增员工信息和新增员工考勤；(2) 编辑信息，包括员工信息编辑和员工考勤编辑；(3) 查询信息，包括员工信息查询和员工考勤查询；(4) 系统信息，包括用户管理和密码管理。这些，需要有合理的数据库结构保存数据信息，并要有有效的程序结构支持各种数据操作的执行。本章以一个公司员工信息管理系统为例
2、，介绍如何建立一个信息管理系统。 6.1 系统设计本项目的数据库系统的设计分为下列的几步：(1) 需求分析；(2) 概念结构设计。下面就按照这个步骤对这个数据库系统进行设计。6.1.1 需求分析系统功能分析是在系统开发的总体任务的基础上完成的。本例中的公司员工信息管理系统需要完成的功能主要如下：(1) 员工信息的输入、修改和查询，包括姓名、生日、性别、籍贯、参加工作时间和进入公司时间等。(2) 考勤信息的输入、修改和查询，包括员工、考勤年月、迟到次数、请假天数、早退次数、加班天数等。6.1.2 概念结构的设计将需求分析得到的用户需求抽象为信息结构，即概念模型的过程就是概念结构设计，概念结构的设
3、计是本数据库项目设计的关键。将上面的需求分析画出功能模块图，如图6-1所示。图6-1 系统的功能模块图本实例根据上面的设计规划出的实体有新增员工信息实体、新增员工考勤实体、员工信息编辑实体、员工考勤编辑实体、员工信息查询实体、员工考勤查询实体。各个实体具体的描述E-R图如下。新增员工信息实体E-R图如图6-2所示。图6-2 新增员工信息实体E-R图新增员工考勤实体E-R图如图6-3所示。图6-3 新增员工考勤实体E-R图员工信息编辑实体E-R图如图6-4所示。图6-4 员工信息编辑实体E-R图员工考勤编辑实体E-R图如图6-5所示。图6-5 员工考勤编辑实体E-R图员工信息查询实体E-R图如图
4、6-6所示。图6-6 员工信息查询实体E-R图员工考勤查询实体E-R图如图6-7所示。图6-7 员工考勤查询实体E-R图 6.2 实现数据库本数据库采用Access数据库。所以先要根据需求分析建立数据表，然后通过Access编写数据表，最后通过对ODBC数据引擎的设置，就可以把Access数据库连接到VB项目中。本项目VB通过ADO对象连接数据库。6.2.1 建立Access 数据库启动Access，建立一个空的数据库man.mdb，如图6-8所示。图6-8 建立数据库man.mdb使用程序设计器建立系统需要的表格如下。employee表，如图6-9所示。checkin表，如图6-10所示。
5、图6-9 employee雇员表 图6-10 checkin登记表title表，如图6-11所示。department表，如图6-12所示。 图6-11 title名称表 图6-12 department系统表duty表，如图6-13所示。sysuser表，如图6-14所示。 图6-13 duty责任,职责权限表 图6-14 sysuser操作员表6.2.2 连接数据在Visual Basic环境下，选择“工程”“引用”命令，在随后出现的对话框中选择“Microsoft ActiveX Data Objects 2.1 Library”，然后单击“确定”按钮，如图6-15所示。图6-15 引用
6、ADO连接数据库在程序设计的公共模块中，先定义ADO连接对象。语句如下：Public conn As New ADODB.Connection 标记连接对象然后在子程序中，用如下的语句即可打开数据库：Dim connectionstring As Stringconnectionstring = provider=Microsoft.Jet.oledb.4.0; &_data source=man.mdbconn.Open connectionstring6.2.3 设置ODBCVB的ADO对象是通过ODBC来访问数据库，所以还要建立ODBC数据引擎接口。打开控制面板中的“管理工具”“数据源”
7、(ODBC)，出现如图6-16所示的对话框。图6-16 ODBC对话框单击“添加”按钮，出现“创建新数据源”对话框，如图6-17所示。图6-17 “创建新数据源”对话框选择Microsoft Access Driver(*.mdb)，单击“完成”按钮，出现如图6-18所示对话框。在“数据源名”文本框中添加一个名字，单击“确定”按钮完成系统默认连接设置。然后在ODBC对话框中单击“确定”按钮完成ODBC设置。图6-18 设置连接数据源 6.3 界面设计完成有关数据库结构的所有后台工作后，就可以创建用Visual Basic数据库系统的客户端程序了。在创建窗体时首先是创建主窗体。6.3.1 创建主
8、窗体启动VB，选择“文件”“新建工程”命令，在工程模板中选择“标准EXE”，Visual Basic将自动产生一个Form窗体，属性都是默认设置。这里删除这个窗体，选择“文件”“保存工程”命令，将这个工程项目命名为man。这个项目使用多文档界面，窗体和控件的属性设置如表6-1所示。创建好的窗体如图6-19所示。表6-1 主窗体属性设置控 件属 性值MDIFormNameMDIForm1Caption公司员工信息管理系统StartUpPositonCenterScreenWindowStateMaximizedSbStatusBar(StatusBar)NameSbStatusBarPanels
9、(1)StyleSbrTextPanels(2)StyleSbrDatePanels(3)StyleSbrTime图6-19 公司员工信息管理系统主窗体这是一个多文档界面(MDI)应用程序，可以同时显示多个文档，每个文档显示在各自的窗体中。MDI 应用程序中常有包含子菜单的“窗体”选项，用于在窗体或文档之间进行切换。菜单应用程序中，有5个菜单选项，每个选项对应着E-R图的一个子项目。在主窗体中加入状态栏控件，可以实时反映系统中的各个状态的变化。状态栏控件需要在通常的属性窗口中设置一般属性，还需要在其特有的弹出式菜单中进行设置。6.3.2 创建主窗体的菜单在主窗体中的工具栏中，选择菜单编辑器，创
10、建如图6-20所示的菜单结构。图6-20 主窗体中的菜单结构设置好的主窗体如图6-21所示。图6-21 主窗体6.3.3 创建公共模块公共模块用来存放整个工程项目公用的函数、过程和全局变量等，使用它可以提高代码的效率。创建公共模块的步骤如下：(1) 在项目资源管理器中为项目添加一个Module，保存为Module1.bas。在菜单中选择“工程”“添加模块”命令，则出现模块对话框，如图6-22所示。图6-22 模块对话框(2) 如果添加新的公共模块，在“新建”中选择“模块”；如果添加已经建好的功用模块，在“现存”中选择要添加的公用模块，然后单击“打开”按钮，这样就创建完毕了。下面就可以开始添加需
11、要的代码。Option ExplicitPublic dbConn As New ADODB.ConnectionPublic loginUser As StringPublic loginOK As BooleanPublic cmdType As StringPublic tUser_id As StringPublic tDept_id As IntegerPublic tEmp_id As IntegerPublic tCheck_ym As StringPublic tQx As StringSub Main() If ConnectToDatabase = False Then M
12、sgBox 连接数据库出错！ End End If loginOK = False cmdType = frmLogin.Show vbModal Unload frmLogin If loginOK Then MDIForm1.Show End IfEnd Sub 连接到数据库Function ConnectToDatabase() As Boolean On Error GoTo ERR_CONN 设置服务器名称，数据库名称，登录名(此时假设密码为空) dbConn.ConnectionString = dsn=rsgl;Database=man;uid=sa;pwd= dbConn.Co
13、nnectionString = Provider=msdasql;Database=man;server=computer;uid=sa;pwd= dbConn.Open ConnectToDatabase = True Exit FunctionERR_CONN: ConnectToDatabase = FalseEnd Function 6.4 创建各子窗体选择“工程”“添加窗体”命令，添加子窗体。在这个项目中，要创建的子窗体如表6-2所示。表6-2 所有子窗体列表子 窗 体 名Text增加员工信息frmEmpAdd增加员工考勤frmCheckAdd员工信息编辑frmEmpInfo员工考
14、勤编辑frmCheckSel员工信息查询frmEmpInfo2员工考勤查询frmCheckInfo2用户管理frmUserManger密码管理frmPwdChange关于frmGuanYu下面分别给出这些子窗体，以及它们所使用的控件。6.4.1 创建增加员工信息子窗体增加员工信息模块可以实现员工信息的添加入库。增加员工信息子窗体如图6-23所示，其控件如表6-3所示。图6-23 增加员工信息子窗体表6-3 增加员工信息子窗体控件控 件 类 别控件Name控件TextLabelLabel1姓名Label2性别Label3生日Label4学历Label5籍贯Label6专业Label7毕业学校Label8政治面貌Label9技术特长Label10
