河南城建学院《VisualFoxPro数据库程序设计》课程设计说明书题目：企业人事管理系统指导教师：王康平班级：房地产经营管理学号：053410143姓名：李洪会2011年12月30日目录【主题】.........................................................31.系统总体设计.................................................41.1系统功能简介...............................................41.2系统功能结构图.............................................42.数据库设计...................................................43.实验数据.....................................................54.程序设计界面.................................................64.1登录界面..................................................67职工信息查询74.4职工信息录入..............................................85.课程设计总结................................................10参考文献........................................................11【主题】本次课程设计我的课题是企业人事管理。主要培养我们的VFP的设计能力，提高我们的综合素质。我的任务是建立能够实现对一个公司人员登陆，查询，录入、修改功能的系统。在登录界面中，用户名是aaa，密码是123456我的设计思路现建立一个主菜单，然后将表单联系起来。再通过表单对自由表的查询、录入、修改等功能来实现我们系统的顺利运行。在制作过程中，我得到了同学的无私帮助，结合个人努力，最终成功完成了本次课程设计，实现了原先预想的功能。。人事管理系统职工信息查询职工信息录入职工信息修改退出1.系统总体设计1.1系统功能简介该系统可以进行职工信息查询，录入，修改和退出录入：录入姓名，年龄，性别，学历，籍贯，职工编号。修改：职工信息都可修改。查询：进入登陆界面后，会自动出现浏览查询界面，供人查询1.2系统功能结构图2.数据库设计职工表（姓名，年龄，性别，学历，籍贯，职工编号）普通关键字：职工编号通过登陆界面任职表（职工编号，部门编号，工资情况，任职年限，是否在职，考勤情况，工作表现）3.实验数据职工表数据如下所示：任职表数据如下所示：4.程序设计界面4.1登录界面系统登录界面设计1）控件属性设置图片winter的路径属性Picture设置为VFP的默认路径。标签label1的标题属性Caption设置为：用户名，并设置相应的字体、字号和颜色。2）代码设计表单的登录事件代码：USE密码GOTOPflag=0DOWHILE.NOT.EOF()IFAlltrim(用户名)==aaa(Thisform.Text1.Value)IFAlltrim(密码)==123456(Thisform.Text2.Value)doform主表单ELSEWAIT"密码错误"WINDOWTIMEOUT2ENDIFflag=1EXITENDIFSKIPENDDOIFFLAG=0WAIT"用户名错误"WINDOWTIMEOUT2ENDIF表单的Destroy事件代码：RELEASEMEUN4.3职工信息查询1）控件属性设置标签：label1标题：caption设置为：职工部门标签：label2标题：caption设置为：职工编号文本框：text1接收由键盘输入的数据文本框：text2接收由键盘输入的数据命令按钮：command1标题：caption设置为：查询Command2标题：caption设置为：清除表格：显示查询结果2）代码设计命令按钮command1的Click事件代码：SELECT职工.*;FROM数据1!部门INNERJOIN数据1!任职表;INNERJOIN数据1!职工;ON任职表.职工编号=职工.职工编号;ON部门.部门编号=任职表.部门编号;WHERE部门.部门名称=thisform.text1.value;INTOTABLE职工部门.dbfthisform.grid1.recordsource="职工部门"命令按钮command2的Click事件代码：SELECT职工.*;FROM数据1!部门INNERJOIN数据1!任职表;INNERJOIN数据1!职工;ON任职表.职工编号=职工.职工编号;ON部门.部门编号=任职表.部门编号;WHERE任职表.职工编号=thisform.text2.value;INTOTABLE职工编号.dbfthisform.grid2.recordsource="职工编号"命令按钮command2的Click事件代码：thisform.text2.value=''thisform.text1.value=''thisform.text1.setfocus命令按钮command2的Click事件代码：thisform.text2.value=''thisform.text1.value=''thisform.text1.setfocus4.4职工信息录入学生成绩录入表单设计1）控...
