VFP职员信息管理系统

系统设计目标……………………………………………….....2

开发和运行环境……………………………………………….2

系统功能………………………………………………………...2

系统功能模块结构图…………………………………….…..3

数据库逻辑结构设计……………………………….………..4

主要模块的设计说明和程序代码……………….………...6

系统主界面……………….………………………………..6

“增加记录”模块……………………………….….…….7

“修改记录”模块…………………………….…….….....9

“删除记录”模块…………………………………….....10

查询…………………………………………………..…...11

报表打印…………………………………………….…....14

“导航条”类……………………………………….……16

“setting.prg”代码…………………………….………...17

“reset.prg”代码…………………………………….…..18

“主程序.prg”代码……………………………………..18

测试情况……………………………………………………....19

主程序、数据表、功能模块及报表对应文件名…….20

程序使用说明………………………………………………...20

参考文献……………………………………………………….20

数据库应用

系统设计目标

随着经济的发展，企业正向着大型化、规模化的方向发展，企业职员数量急剧增加，有关职员的各种信息量也成倍增长。在这种情况下单靠人工来处理职员的信息，工作量将很大，若公司人员有几万甚至几十万，人工处理将变得不可想象。用计算机可使人们从繁重的劳动中解脱出来，仅使用一些简单的操作便可及时、准确地获得需要的信息。

该系统的具体任务就是设计一个企业职员信息管理系统，由计算机来代替人工执行一系列诸如增加新进职员信息、变更职员信息、删除离职职员信息、查询及打印等操作。这样就使办公人员可以轻松快捷地完成职员信息管理的任务，使企业的职员管理工作系统化、规范化、自动化，从而达到提高企业管理效率的目的。

设计的指导思想是一切为用户着想，界面要美观大方，操作尽量简单明了，而且作为一个实用的应用程序要有良好的容错性，在用户出现误操作时能尽量及时地给出警告，以便用户及时改正。

开发和运行环境

开发工具：Visual FoxPro 6.0

运行环境：Windows 9x 、Windows 2000、Windows XP

系统功能

●系统数据初始化；

●职员信息数据的增加；

●职员信息数据的修改；

●职员信息数据的删除；

●职员信息的一览和查询；

●职员信息的报表打印。

系统功能模块结构图

系统采用模块化程序设计方法，既便于系统功能的各种组合和修改，又便于未参与开发的技术维护人员补充、维护。在系统功能分析的基础上，考虑Visual FoxPro 6.0程序编制的特点，得到如下所示的系统功能模块结构图。

职员信息管理系统

主要模块的设计说明和程序代码

系统主界面

系统主界面是用户进入系统后主要接触的界面，由它可以进入各个功能模块。分别单击按钮“增加记录”、“修改记录”、“删除记录”、“查询”、“报表打印”可进入与之相对应的功能模块，单击“退出”按钮退出本系统。为使界面不至于单调，可以为主界面加入背景。

在“增加记录”按钮的“Click”事件中添加代码如下：

do form 增加记录

thisform.release

在“修改记录”按钮的“Click”事件中添加代码如下：

do form 修改记录

thisform.release

在“删除记录”按钮的“Click”事件中添加代码如下：

do form 删除记录

thisform.release

在“查询”按钮的“Click”事件中添加代码如下：

do form 查询

thisform.release

在“报表打印”按钮的“Click”事件中添加代码如下：

do form 报表打印

thisform.release

在“退出”按钮的“Click”事件中添加代码如下：

thisform.release

clear events

“增加记录”模块

企业新进职员都要为其建立人事档案，该模块的功能就是添加新职员信息。操作很简单，按需要输入完数据后，单击“确定”按钮即可，同时系统会弹出对话框提示输入成功。“取消”按钮的功能是清空所有文本框。该模块做了些性设计，以防用户误操作。如：将输入“职员号”、“进本单位年份”的文本框的Format和InputMask属性都设为“9999”，使用户只能输入四位数字，输入其它字符无效。同样在输入“生日”的文本框的Format和InputMask属性都设为“9999/99/99”。单击“确定”后，如果没有输入“职员号”或输入的“职员号”已存在，系统都会弹出提示信息，以便用户改正。

在“确定”按钮的“Click”事件中添加代码如下：

* 检查“职员号”是否为空

if empty(alltrim(thisform.txtID.value))

messagebox("职员号不能为空",48,"错误")

thisform.txtID.setfocus

else

    * 获取各输入值

inID=alltrim(thisform.txtID.value)

inName=alltrim(thisform.txtName.value)

inSex=alltrim(thisform.txtSex.value)

inBirth=alltrim(thisform.txtBirth.value)

inLearn=alltrim(thisform.txtLearn.value)

inPolitics=alltrim(thisform.txtPolitics.value)

inPhone=alltrim(thisform.txtPhone.value)

inAddress=alltrim(thisform.txtAddress.value)

inDepartment=alltrim(thisform.txtDepartment.value)

inFunction=alltrim(thisform.txtFunction.value)

inDate=alltrim(thisform.txtDate.value)

inMemo=alltrim(thisform.edtMemo.value)

* 检查输入的“职员号”是否已存在

set order to 职员号

seek inID

if !found()

本设计来自：计算机毕业设计论文网http://www.biye114.com/

登陆网站联系客服远程截图或者远程控观看完整全套论文图纸设计

客服QQ：8191040  

说明：本套毕业设计作品包括：论文＋源代码＋程序＋开提报告＋PPT答辨稿数据流程图、功能模块图、运行界面图、源代码和程序，按计算机毕业论文格式要求书写，适用于计算机专业！