【正文】 肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻 羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆 螁肀蒀莃螀膂 芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇羆蒀蒆薃肈節(jié)莂薂膁蒈蝕薁袀芁薆蟻羃蒆蒂蝕肅艿莈蠆芇肂螇蚈羇莇蚃蚇聿膀蕿蚆膂莆蒅蚅袁膈莁蚅羄莄蠆螄肆膇薅螃膈莂蒁螂袈膅蕆螁肀蒀 莃螀膂芃螞蝿袂葿薈蝿羄節(jié)蒄螈肇蕆莀袇腿芀蠆袆衿肅薅裊羈羋 薁襖膃膁蕆袃袃莆莂袃羅腿蟻袂肈蒞薇袁膀膈蒃羀袀莃荿罿羂膆蚈羈膄莁蚄羇芆芄薀羇 。 =.f. =.f. =.f. 職務(wù)號 .enabled=.t. 職務(wù)名 .enabled=.t. 備注 .enabled=.t. else =39。 =39。 repl 職務(wù)號 with 職務(wù)號 .value repl 職務(wù)名 with 職務(wù)名 .value repl 備注 with 備注 .value =.t. =.t. =.t. 職務(wù)號 .enabled=.f. 職務(wù)名 .enabled=.f. 備注 .enabled=.f. endif 單位職務(wù)信息修改的源代碼： if =39。 =.f. =.f. =.f. 職務(wù)號 .enabled=.t. 職務(wù)名 .enabled=.t. 計算機應(yīng)用專業(yè) (專 )畢業(yè)論文 (設(shè)計 ) 第 15 頁 共 16 頁 備注 .enabled=.t. else =39。 appe blan 職務(wù)號 .value=space(0) 職務(wù)名 .value=space(0) 備注 .value=space(0) =39。 repl 部門號 with 部門號 .value repl 部門名 with 部門名 .value repl 備注 with 備注 .value =.t. =.t. =.t. 部門號 .enabled=.f. 部門名 .enabled=.f. 備注 .enabled=.f. endif 職員年度信息刪除的源代碼： dele ?? chr(7) =messagebox(確認要刪除嗎？ ,48,信息窗口 ) close database use bm again pack use bm again 單位職務(wù)信息添加的源代碼： if =39。 =.f. =.f. =.f. 部門號 .enabled=.t. 部門名 .enabled=.t. 備注 .enabled=.t. else =39。 =39。 repl 年度 with 年度 .value =.t. =.t. =.t. 計算機應(yīng)用專業(yè) (專 )畢業(yè)論文 (設(shè)計 ) 第 14 頁 共 16 頁 年度 .enabled=.f. endif 職員年度信息修改的源代碼： if =39。 =.f. =.f. =.f. 年度 .enabled=.t. else =39。 appe blan 年度 .value=space(0) =39。 參考文獻 [1] .劉瑞新 《 VFP程序設(shè)計教程》 機械工業(yè)出版社 出版日期 ： [2] .毛一心 《 》 人民郵電出版社 出版日期 ： [3] .章立民 《 Visual 基礎(chǔ)加強篇》 中國鐵道出版社 出版日期 :1999101 [4] .鄭剛 《 Visual FoxPro 實效編程百例》 人民郵電出版社 出版日期 :202071 [5] .李加福 《 Visual FoxPro 提高》 清華大學(xué)出版社 出版日期 :202071 計算機應(yīng)用專業(yè) (專 )畢業(yè)論文 (設(shè)計 ) 第 13 頁 共 16 頁 附錄（本人所承擔(dān)設(shè)計的部分源代碼） 職員考核信息的記載按鈕控件的源代碼： do case case len()=0 ?? chr(7) =messagebox(請選擇左邊的職員以確定記載對象！ ,48,信息窗口 ) case len()=0 ?? chr(7) =messagebox(請選擇年度！ ,48,信息窗口 ) case len()=0 ?? chr(7) =messagebox(請選擇考核等級！ ,48,信息窗口 ) case len()=0 ?? chr(7) =messagebox(備注不能為空！ ,48,信息窗口 ) otherwise appe blan in jcjz repl with repl with repl with repl with repl with ?? chr(7) =messagebox(該員工的本年度的考核記錄成功記載！ ,48,信息窗口 ) = = = = = endcase 職員年度信息添加的源代碼： if =39。 通過此 人事 管理 信息系統(tǒng)的開發(fā)，做到了理論聯(lián)系實際，將書本上學(xué)到的知識與具體實踐充分結(jié)合起來，既解決了工作中的一些問題，又進一步明確了開發(fā)管理信息系統(tǒng)的方法和思想；既加深了對管理信息系統(tǒng)的認識，又進一步鞏固了以前所學(xué)的計算機軟件開發(fā)方面的知識，提高了軟件開發(fā)的水平，從而為今后在實際工作中更好的應(yīng)用計算機進行信息管理打下了堅實的基礎(chǔ)。備份目錄和恢復(fù)數(shù)據(jù)和以上二個按鈕事件類似。 備份到按鈕控件是的 click事件：利用 GETDIR()函數(shù)得到系統(tǒng)目錄。刪除按鈕的 click事件邏輯刪除 ygtl表中的當(dāng)前記錄。修改按鈕的 click屬性設(shè)定為網(wǎng)格的只讀性為加。添加到退離表退離狀態(tài)根據(jù)按鈕的 caption屬性而定。同時邏輯刪除 jbqk的當(dāng)前記錄。文 本框控件的 activate 事件：設(shè)置二個網(wǎng)格控件的數(shù)據(jù)源分別是： jbqk， ygtl二個表。以免和基本信息表中的職員信息不一致。這里的職員號和職員名二個文本框設(shè)置了只讀屬性。激活該表單的語句是： do form nd 列表控件 list1的 click事件是將當(dāng)前列表框中的記錄值添加到表單中的職員號和職員名二個文本計算機應(yīng)用專業(yè) (專 )畢業(yè)論文 (設(shè)計 ) 第 11 頁 共 16 頁 框中。語句是： 年度添加按鈕控件的 click事件是激活年度添加表單。實現(xiàn)的語句是： appe blan in jcjz repl with repl with