vfp課程設計報告--人力資源管理系統(tǒng)-在線瀏覽
2025-03-06 13:18本頁面
【正文】 .t.=.t.=.t.=.t.=.t.=.t.=.t.“第一個”按鈕click事件代碼：goto top=.f.=.f.=.t.=.t.“前一個”按鈕click事件代碼：=.t.=.t.if not bof()skip1if reo()=1 =.f. =.f. messagebox(已經(jīng)到第一條記錄了！,64,提示) endifendif“下一個”按鈕click事件代碼：=.t.=.t.if not eof()skip 1if reo()=reccount()=.f.=.f. messagebox(已經(jīng)到最后一條記錄了！,64,提示)endifendif“最后一個”按鈕click事件代碼：goto bottom=.t.=.t.=.f.=.f.“編輯”按鈕click事件代碼：=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.=.f.“保存”按鈕click事件代碼：sele rskplocate for dh=allt() repl xm with allt() repl xrzw with allt() repl mz with allt() repl zzmm with allt() repl whcd with allt() repl jtcs with allt() repl bm with allt() repl xb with allt() repl csny with repl jg with allt() repl zc with allt() repl jkzk with allt() repl brcf with allt() repl gzbt with repl gz with repl zh with repl hyzk with allt() repl jtzz with allt() repl bh with repl dm with repl bz with repl jbdwsj with repl cjgzsj with repl nl with =.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.=.t.（3）人事記錄刪除Init事件代碼同“人事記錄編輯”表單“第一個”、“前一個”、“下一個”、“最后一個”按鈕click事件代碼同“人事記錄修改表單”。例如：“統(tǒng)計技術職務”按鈕click事件代碼：do form 技術職務統(tǒng)計點擊進入如下界面：此表數(shù)據(jù)環(huán)境為：rskp“統(tǒng)計”代碼為：select rskpdo case case empty() and empty() select bm as 部門,zc as 職稱,count(*) as 人數(shù) from rskp group by bm,zc order by bm into cursor tj2 case !empty() and empty() select bm as 部門,zc as 職稱,count(*) as 人數(shù) from rskp where zc= group by bm order by bm into cursor tj2 case !empty() and empty() select bm as 部門,zc as 職稱,count(*) as 人數(shù) from rskp where bm= group by zc order by bm into cursor tj2 case !empty() and !empty() select bm as 部門,zc as 職稱,count(*) as 人數(shù) from rskp where bm= and zc= group by zc order by bm into cursor tj2 endcase=.t.=1
環(huán)評公示相關推薦
鄂ICP備17016276號-1