《VB6.0课程设计职工工资管理系统》由会员分享，可在线阅读，更多相关《VB6.0课程设计职工工资管理系统（20页珍藏版）》请在金锄头文库上搜索。
1、沈阳理工大学课程设计专用纸课程设计任务书学 院信息科学与工程学院专 业计算机科学与技术学 生 姓 名学 号设 计 题 目职工工资管理系统内容及要求：内容：利用VB6.0及SQL Server2000自行设计一个职工工资管理系统，数据库里至少包括3个表：用户表、职工基本信息表、职工工资信息表。用户表用于记录用于登录系统的用户名及密码；职工基本信息表用于记录职工的基本信息；职工工资信息表用于记录职工的工资信息。要求：1.拥有用户登录窗体、主窗体2.能够进行对职工基本信息的浏览、编辑3.能够进行对职工工资信息的浏览、编辑4.能够实现按某个字段查询职工的基本信息及工资信息5.能够显示打印报表进度安排：
2、第19周：系统需求分析，设计E-R图数据库设计和模块设计进行软件编码设计，实现各模块功能第20周：继续完成软件设计，调试与完善系统的各项功能书写课程设计报告。验收程序，答辩。指导教师（签字）：年 月 日学院院长（签字）：年 月 日目 录第1章 系统功能概述.21.1 系统功能.21.2 系统层次图.2第2章 数据库设计.32.1 需求分析.32.2 E-R模型42.3 关系模型.52.4 表结构设计.5第3章 系统各功能模块的详细设计.73.1 系统界面.73.2 主窗体界面.73.3 登录模块.83.3.1 用户登录83.3.2 用户注册93.4 用户管理模块.103.5 数据管理模块.11
3、3.5.1 职工基本信息浏览.113.5.2 职工基本信息录入.133.6 数据查询模块.163.7 打印报表模块.17第4章 课设总结.18参考文献.18第1章 系统功能概述1.1 系统功能职工工资管理系统是针对系统服务对象的具体要求设计的，其主要任务是用计算机对企业内部各职工的基本信息、工资信息进行日常管理，如查询、修改、添加、删除等操作。职工工资管理系统的目标是能迅速并且准确地完成对职工基本信息及工资信息的查询、录入、修改，以及对工资信息的统计计算及汇总工作。本系统运用VB 6.0及SQL Server2000实现，主要设计了以下几大功能：(1)按某字段对职工基本信息的录入、查询及更新(
4、2)按某字段对职工工资信息的录入、查询及更新(3)系统自动根据所输入的工资信息进行统计计算 应发工资基本工资+补助+奖金 缴税基本工资10%实发工资应发工资缴税水电费保险费(4)利用DataReport设计器实现对职工基本信息及工资信息的打印预览1.2 系统层次图职工工资管理系统用户管理数据管理数据查询打印报表修改密码退出职工基本信息浏览职工基本信息录入职工工资浏览职工工资录入打印职工信息报表打印职工工资报表查询职工信息查询工资信息图1.1系统层次图第2章 数据库设计2.1 需求分析本系统运用VB 6.0及SQL Server2000实现，拥有1个登录窗体、1个主窗体、10个子窗体、1个数据环
5、境设计器及2个数据报表设计器。登录窗体里可以由单击事件调用注册窗体，登录成功后进入主窗体，主窗体有4个主菜单：用户管理、数据管理、数据查询、打印报表。1. 用户管理：用户管理包括修改密码及退出2项子菜单。2. 数据管理：数据管理有4个子菜单，可实现对职工基本信息、职工工资信息的浏览及录入功能。3. 数据查询：数据查询中应用了DataGrid控件，用来查询职工基本信息及工资信息。4. 打印报表：打印报表调用DataReport设计器，实现对职工基本信息表、职工工资信息表的打印预览。本系统在SQL Server2000数据库里设计了3个数据表：用户表：(用户名，密码) 用于记录注册过的用户名及密码
6、职工基本信息表：(职工编号，姓名，性别，出生日期，职称，部门，入职时间)职工工资信息表：(职工编号，年份，月份，基本工资，补助，奖金，应发工资，缴税，水电费，保险费，实发工资)应发工资基本工资+补助+奖金 缴税基本工资10%实发工资应发工资缴税水电费保险费2.2 E-R模型1.用户实体：密码用户名用户图2.1 用户实体及其属性2.职工实体与工资实体的E-R模型：职 工出生日期入职时间部门性别姓名职称职工编号 1发放 1工 资补助水电费缴税基本工资年份月份职工编号奖金应发工资实发工资保险费图2.2 职工实体与工资实体的E-R模型2.3 关系模型本系统设计了3个实体，用户实体，职工实体，工资实体，
7、其中用户实体是相对独立的，与另外两个实体不存在联系；职工实体与工资实体存在着1：1的联系，且两个实体取决于同一个属性职工编号。因此可将本系统的E-R模型转化为下述关系模型：用户：(用户名，密码) 职工：(职工编号，姓名，性别，出生日期，职称，部门，入职时间)工资：(职工编号，年份，月份，基本工资，补助，奖金，应发工资，缴税，水电费，保险费，实发工资)2.4 表结构设计本系统在SQL Server2000数据库里共设计了3个数据表来记录数据：用户表，职工基本信息表，职工工资表。1.用户表：表2.1用户表的结构列名数据类型长度约束用户名char10主键密码char6不为空2.职工基本信息表：表2.
8、2 职工基本信息表的结构列名数据类型长度约束职工编号char10主键姓名char10不为空性别char2不为空出生日期datetime8不为空职称char10允许空部门char10允许空入职时间datetime8不为空3.职工工资表：表2.3 职工工资表的结构列名数据类型长度约束职工编号char10主键年份char4不为空月份char2不为空基本工资int4不为空补助int4允许空奖金int4允许空应发工资int4不为空缴税int4不为空水电费int4不为空保险费int4不为空实发工资int4不为空第3章 系统各功能模块的详细设计3.1 系统界面设计有定时器实现滚动字幕效果，单击“点击进入”会
9、弹出用户登录窗口。图3.1 系统界面3.2 主窗体界面主窗体设计了四个主菜单：用户管理，数据管理，数据查询，打印报表。用户管理可以实现用户密码的修改；数据管理可对数据库里的信息进行浏览、录入；数据查询可按某个字段查询数据；打印报表实现对数据的打印预览。图3.2 系统主窗体3.3 登录模块3.3.1 用户登录在正确输入用户表里的用户名以及对应的密码后，点击“登录”，才能进入主窗体，否则会提示相关的警告信息；按“取消”则退回系统界面。图3.3 用户登录窗体Private Sub CommandLand_Click()Dim sqlstr As StringIf Text1 = Then MsgBo
10、x 请输入用户名！, vbExclamation, 确认用户名 Text1.SetFocus Exit SubElsesqlstr = select * from 用户表 where 用户名= & Text1 & Adodc1.RecordSource = sqlstrAdodc1.RefreshIf Adodc1.Recordset.BOF Then MsgBox 用户名不存在，请重新输入, vbExclamation, 警告 Text1.Text = Text1.SetFocusElse If Adodc1.Recordset.Fields(密码) = Text2 Then Form3.Show Form3.Label2.Caption = Adodc1.Recordset.Fields(用户名) Unload Me Else MsgBox 密码错误，请重新输入, vbExclamation, 警告 Text2.Text = Text2.SetFocus End IfEnd IfEnd IfEnd SubPrivate Sub CommandCancel_Click()Unload MeForm1.ShowEnd Sub3.3.2 用户注册本模块提供用户注册功能，并把文本框里的用户名、密码录入用户表里。图3.4 用户注册窗体Private Sub Command
