vfp课程设计报告人力资源管理系统(2)

代码很详细!!!

thisform.text22.value='' thisform.text23.value='' thisform.text24.value='' thisform.text25.value='' thisform.text1.setfocus

“退出”按钮click事件代码： thisform.release do form 档案更新 （2）人事记录修改

Init事件代码：

thisform.text1.readonly=.t. thisform.text2.readonly=.t. thisform.text3.readonly=.t. thisform.text4.readonly=.t. thisform.text5.readonly=.t. thisform.text6.readonly=.t. thisform.text16.readonly=.t. thisform.text17.readonly=.t. thisform.text18.readonly=.t. thisform.text19.readonly=.t. thisform.text20.readonly=.t. thisform.text21.readonly=.t. thisform.text7.readonly=.t.

代码很详细!!!

thisform.text9.readonly=.t. thisform.text10.readonly=.t. thisform.text11.readonly=.t. thisform.text12.readonly=.t. thisform.text13.readonly=.t. thisform.text14.readonly=.t. thisform.text15.readonly=.t. thisform.text22.readonly=.t. thisform.text23.readonly=.t. thisform.text24.readonly=.t. thisform.text25.readonly=.t. “第一个”按钮click事件代码： goto top

mand1.enabled=.f. mand2.enabled=.f. mand3.enabled=.t. mand4.enabled=.t. thisform.refresh

“前一个”按钮click事件代码： mand3.enabled=.t. mand4.enabled=.t. if not bof() skip-1

if recno()=1

mand1.enabled=.f. mand2.enabled=.f.

messagebox("已经到第一条记录了！",64,"提示") endif endif

thisform.refresh

“下一个”按钮click事件代码： mand1.enabled=.t. mand2.enabled=.t. if not eof() skip 1

if recno()=reccount()

mand3.enabled=.f. mand4.enabled=.f.

messagebox("已经到最后一条记录了！",64,"提示") endif endif

thisform.refresh

“最后一个”按钮click事件代码：

代码很详细!!!

goto bottom

mand1.enabled=.t. mand2.enabled=.t. mand3.enabled=.f. mand4.enabled=.f. thisform.refresh

“编辑”按钮click事件代码： thisform.text2.readonly=.f. thisform.text3.readonly=.f. thisform.text4.readonly=.f. thisform.text5.readonly=.f. thisform.text6.readonly=.f. thisform.text16.readonly=.f. thisform.text17.readonly=.f. thisform.text18.readonly=.f. thisform.text19.readonly=.f. thisform.text20.readonly=.f. thisform.text21.readonly=.f. thisform.text7.readonly=.f. thisform.text8.readonly=.f. thisform.text9.readonly=.f. thisform.text10.readonly=.f. thisform.text11.readonly=.f. thisform.text12.readonly=.f. thisform.text13.readonly=.f. thisform.text14.readonly=.f. thisform.text15.readonly=.f. thisform.text22.readonly=.f. thisform.text23.readonly=.f. thisform.text24.readonly=.f. thisform.text25.readonly=.f. “保存”按钮click事件代码： sele rskp

locate for dh=allt(thisform.text1.value)

repl xm with allt(thisform.text2.value) repl xrzw with allt(thisform.text3.value) repl mz with allt(thisform.text4.value) repl zzmm with allt(thisform.text5.value) repl whcd with allt(thisform.text6.value) repl jtcs with allt(thisform.text7.value) repl bm with allt(thisform.text8.value) repl xb with allt(thisform.text9.value) repl csny with thisform.text10.value repl jg with allt(thisform.text11.value)

代码很详细!!!

repl zc with allt(thisform.text12.value) repl jkzk with allt(thisform.text13.value) repl brcf with allt(thisform.text14.value) repl gzbt with thisform.text15.value repl gz with thisform.text16.value repl zh with thisform.text17.value

repl hyzk with allt(thisform.text18.value) repl jtzz with allt(thisform.text19.value) repl bh with thisform.text20.value repl dm with thisform.text21.value repl bz with thisform.text22.value repl jbdwsj with thisform.text23.value repl cjgzsj with thisform.text24.value repl nl with thisform.text25.value thisform.text2.readonly=.t. thisform.text3.readonly=.t. thisform.text4.readonly=.t. thisform.text5.readonly=.t. thisform.text6.readonly=.t. thisform.text16.readonly=.t. thisform.text17.readonly=.t. thisform.text18.readonly=.t. thisform.text19.readonly=.t. thisform.text20.readonly=.t. thisform.text21.readonly=.t. thisform.text7.readonly=.t. thisform.text8.readonly=.t. thisform.text9.readonly=.t. thisform.text10.readonly=.t. thisform.text11.readonly=.t. thisform.text12.readonly=.t. thisform.text13.readonly=.t. thisform.text14.readonly=.t. thisform.text15.readonly=.t. thisform.text22.readonly=.t. thisform.text23.readonly=.t. thisform.text24.readonly=.t. thisform.text25.readonly=.t. （3）人事记录删除