实训报告(第三实训报告).doc

连云港职业技术学院 实训报告 课程名称：信息系统开发与应用 项目名称：人力资源管理系统 姓 名：周长青 学 号：090104130 组 别: 第三组 2011年11月6日 一、实训题目 人力资源管理系统 （人力资源管理系统所实现的功能是能够在本系统中查询，增加，删除员工的信息，实现对员工信息的管理） 二、实训要求 建立员工基本信息数据库，通过vf数据编程建立数据交换窗口与数据库链接，实现数据交换，便于数据库数据信息的管理。员工信息在本系统能够进行查询，增加，删除等，起到对员工基本信息，员工职位薪水的管理，员工流动情况的分析 添加的作用是在添加的窗体之中输入详细的员工信息然后通过VB来进行对数据库的增加来实现功能。删除的作用是有些调走或离职的员工信息进行清除。一旦删除只能通过添加功能进行弥补。查询的功能是通过输入员工号来对查询个别需要了解的员工的信息。。三个选项的功能一致，但用户点击人事信息的来查询整体员工职位情况的时候会出现一个员工人事信息窗口，这个窗口集合了所有人事信息。 三、任务分工 四、设计功能 图1-流程图 五、数据结构 1、数据库建立 （1）用“Access 2003”这个软件来建立学生信息数据库。 （2）在使用向导创建表，然后依次输入需要建立的字段名称。当完成向导，建立好新的数据库后，应该对其进行属性的设置（设计视图）” 1．打开这个软件后，建立新工程，取名为“人力资源管理系统”。如图 图6、人力资源管理界面 2、建立登陆界面 图7、登陆界面 3、在新建页面添加控件adodc1, DataGrid，Frame和菜单编辑器。然后在空白的地方右击鼠标，打开菜单编辑器，在菜单编辑器里面进行菜单名称的命名 图8、主菜单界面 4、建立查询员工窗口 图9、员工查询界面 5、添加员工窗口 图10、添加员工界面 6、删除员工窗口 图11、删除员工窗口 7、在新建立的工程里，点部件如下图： 图12、数据按钮设置 8.接着画出上面窗口的按钮，将按钮与数据库进行绑定，并设定如下： 图13、数据链接 图14、数据链接 9.再选上面的那个窗体，并设定为： 图15、数据链接 六、程序代码设计 (1) 跳转登陆面： Private Sub Command1_Click() frmLogin.Show Unload Me End Sub Private Sub Command2_Click() End End Sub Private Sub Text2_Change() nametext Text = 电子091 End Sub (2) 登陆界面： Private Sub cmdCancel_Click() 设置全局变量为 false 不提示失败的登录 LoginSucceeded = False Me.Hide End Sub Private Sub cmdOK_Click() 检查正确的密码 If txtUserName = 1 And txtPassword = 1 Then 将代码放在这里传递 成功到 calling 函数 设置全局变量时最容易的 LoginSucceeded = True renliziyuan.Show Me.Hide Else MsgBox 无效的密码，请重试!, , 登录 txtPassword.SetFocus SendKeys {Home}+{End} End If End Sub （3）菜单语言： Private Sub shanchubumen_Click() shanchubumenform22.Show End Sub Private Sub shanchuyuangong_Click() shanchuyuangongform1.Show End Sub Private Sub tianjiabumen_Click() tianjiabumenform11.Show End Sub Private Sub tianjiayuangong_Click() tianjiayuangongform2.Show End Sub Private Sub yuangongchaxun_Click() chaxunyuangongforml.Show End Sub （4）删除员工语言 P