vf小组作业new

《vf小组作业new》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、企业工资管理系统下面介绍我们小组各成员分工：120412011021周三78节理论课梁煜坤2011级市场营销负责进入页面和密码管理120412011024周三56节理论课刘吟雪2011级市场营销负责企业工资管理系统菜单置于表单顶部120312011040周三78节理论课王运辉2011级旅游管理负责工资查询部分叶子青负责员工管理120312011039周三78节理论课王誉臻2011级旅游管理负责基础信息设置120222011007周三78节理论课啜秀楠2011级财务管理负责全部文档整理系统开发目的：随着信息技术的发展，

2、企业的工资管理也应该向标准化、规范化的方向发展，依靠传统的手工方法来记录、统计、发放和查询工资，不仅效率低下，而且容易出现错误。VisualFoxpro具有强大的数据库管理功能，可以使用VisualFoxpro来创建企业工资管理系统来实现工资管理的信息化。本系统的开发主要目的是使企业工资管理实现计算机管理。是管理员能够有序的管理员工的各项工资。克服人工管理效率低下等问题，能够实现科学管理工资数据，方便查询员工信息，对需要的数据进行打印。使企业工资管理工作系统化，规范化，自动化，从而达到提高企业管理效率的目的。系统开发

3、的总体任务是使办公人员可以轻松快捷地完成工资管理的任务。系统功能介绍：我们将介绍如何使用VisualFoxpro来进行企业工资管理系统的创建，实现的系统操作包括基础信息设置、工资管理、系统管理等。系统进入登陆页面“系统管理”模块该系统主表单用来调用系统所提供的所有功能“信息设置”模块该表单中包含了“学历设置”、“职务设置”、“民族设置”和“政治面貌”4个选项卡，分别用来设置相应的信息，设置的这些信息将在进行员工信息设置、惩罚记录和奖励记录的管理时作为选项使用。以”学历设置”为例:在”学历设置”选项卡的”Init”事件

4、中:SelectacademySetfiltertoThis.academylist.clearScanThis.academylist.additem(学历)Endscan“新增”按钮的”Click”事件Ifempty(allt(this.parent.parent.txtnew.value))Messagebox(“请输入要新增的内容”,48,”人力资源管理系统”)This.parent.parent.txtnew.setfocusReturnendifselectacademycountfor学历=allt(t

5、his.parent.parent.txtnew.value)torecnmuifrecnum>0messagebox(“学历名称已经存在”,48,”人力资源管理系统”)this.parent.parent.txtnew.value=””this.parent.parent.txtnew.setfocusreturnendifnewitem=allt(this.parent.parent.txtnew.value)insertintoacademyvalues(newitem)this.parent.parent.t

6、xtnew.value=””this.parent.refresh“修改”按钮的click事件Ifthis.parent.parent.academylist.listcount<1Messagebox(“没有可以修改的项目”,48,”人力资源管理系统”)This.parent.cmdnew.setfocusReturnEndifBsel=.F.Nsel=-1Sstr=””Forncnt=1tothis.parent.parent.academylist.listcountIfthis.parent.parent.a

7、cademylist.selected(ncnt)Bsel=.T.Nsel=ncntSstr=this.parent.parent.academylist.list(ncnt)ExitEndifEndforIfbsel=.F.Messagebox(“请选择要修改的列表项目”,48,”人力资源管理系统”)This.parent.parent.academylist.setfocusReturnEndifIfbsel=.T.DoforminputnewwithsstrtonewvalueIf.not.empty(newv

8、alue).and.newvalue!=sstrUpdateacademyset学历=newvaluewhere学历=sstrThis.parent.parent.academylist.list(nsel)=newvalueEndifEndif“退出”按钮的click事件:This.release“工资管理”模块在该表单中可以按照员工编号、姓