- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
项目设计实训报告.doc
西安郵電學院 实训题目 人事管理系统
一、实验目的
综合应用所学的高级语言程序设计知识,自行设计并实现一个较为完整的小型管理信息系统。通过系统分析、系统设计、编程实现,写实训报告等环节,初步掌握软件系统的设计方法和步骤,提高灵活运用程序语言进行软件开发的技能,提高程序设计水平和分析问题、解决问题的能力。
二、实验内容
(1):熟悉Visual Basic语言的语法、开发环境和各种内部控件和工具的用法;
(2):熟悉大型数据库的使用方法,练习使用MS SQL Server建立和修改数据库。
(3):学习Client/Server模式应用系统的开发。
三、需求分析和概要设计
1、所开发系统的各项功能的详细描述
功能描述:
该信息管理系统可以在Windows 2000Server平台上运行,开发工具采用Visual Basic语言开发。其工作流程为:用户可以通过注册登录,进行信息录入、修改和删除的操作。
系统的功能特点及描述:
用户登录与注册
该功能是系统在被访问之前,要对进入系统的用户进行核对,对系统安全性的保护。
主界面
(1)主窗体; 主窗体是程序操作过程中必不可少的,它是人机交互的重要环节,通过主窗体,用户可以调用系统相关的各子模块,快速掌握本系统的实现功能及操作方法。当登陆窗体成功以后,用户就会进入主窗体,在主窗体界面中,最上面是菜单栏,里面包含各个项目。
(2)系统管理:有用户信息进行注销,和用户注册的功能,对系统中用户信息,员工信息,部门管理,薪酬管理等基本信息进行维护,如用户的添加、修改、删除等。新部门的设立,已有部门的修改等。
(3)员工管理:对员工的基本信息进行管理,例如新建一个员工信息,对在职员工的详细信息进行查询、修改、删除、统计、排序操作。查询可以按照员工编号、姓名、电话、部门等多种条件进行查询;统计可以按照员工编号进行统计;排序按照员工编号可以实现升序与降序的功能。
(4)薪酬管理:对员工的薪酬信息进行管理,例如新建一个员工薪酬信息,对在职员工的基本工资、奖金、加班工资进行查询、修改、删除、统计、排序操作。查询可以按照员工编号、姓名、电话、部门这些条件进行查询。
(5)辅助项目管理:其中包括对部门的管理和员工报表的输出;部门管理中可以实现对部门的管理,例如新建一个部门,对部门信息进行查询、修改、删除、统计、排序操作。查询可以按照部门名称、负责人进行查询。员工报表实现对员工信息的输出报表可以帮助企业访问、格式化数据,并把数据信息以可靠和安全的方式呈现给使用者。Yuangong表
列名 数据类型 备注 职工编号 int 4 主键 姓名 char 10 民族 char 10 身份证号 char 50 性别 char 10 学历 char 10 部门 char 20 职称 char 20 电话 char 50 Email char 50 Salary表
列名 数据类型 备注 职工编号 char 10 主键 基本工资 char 500 奖金 char 500 加班工资 char 500 工资合计 char 800 Department表
列名 数据类型 备注 部门名称 char 20 负责人 char 20 部门介绍 char 800
四、详细设计和实现
1、登陆界面: 此界面用到了textbox控件、label控件、commandbotton控件利用存储过程读取数据判断用户名、密码是否匹配,如果不匹配则返回,匹配则进入下一个页面。
代码如下:
登录
Private Sub Form1_Load()
Option Explicit
Public LoginSucceeded As Boolean
引用Microsoft ActiveX Data Objects 2.6 Library
定义连接对象和记录集
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
对取消按钮单击事件的响应
Private Sub cmdCancel_Click()
设置全局变量为 false
不提示失败的登录
LoginSucceeded = False
Me.Hide
End Sub
对登录按钮单击事件的响应
Private Sub cmdOK_Click()
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
建立无源数据库连接
conn.ConnectionString = driver={sql server};server=Dell--181;uid=sa;pwd=;Dat
文档评论(0)