基于VF人事管理系統(tǒng)-課程設(shè)計(jì)

1、VF人事管理系統(tǒng)-課程設(shè)計(jì)1 引言 在現(xiàn)今的商品社會(huì)是一個(gè)講究效率的社會(huì)，人們有很強(qiáng)的時(shí)間觀念，尤其在人事管理領(lǐng)域，人工對(duì)人事檔案的管理就不夠完善，為此開發(fā)了人事管理系統(tǒng)軟件，更適用于現(xiàn)今的辦公自動(dòng)化領(lǐng)域。該系統(tǒng)軟件簡(jiǎn)單、易學(xué)、便于管理，是對(duì)人事管理的一種工具。向用戶提供文檔是軟件設(shè)計(jì)者與用戶交互的一個(gè)重要手段，該用戶手冊(cè)就是必不可少的一部分。1.1 編寫目的：該手冊(cè)是為了方便用戶使用人事管理系統(tǒng)軟件，闡明如何使用人事管理系統(tǒng)，向用戶解釋該軟件的作用或在必要時(shí)作為參考。1.2 工程的名稱:人事管理系統(tǒng)1.3 定義 人事管理系統(tǒng)： 人事管理是幫助行政人員對(duì)人事檔案的管理軟件。使用Visual F

2、oxPro6.0編程語(yǔ)言，獨(dú)立完成其功能。1.4 參考資料 1.4.1VisualFoxPro6.0數(shù)據(jù) 冶金工業(yè)出版社 蔡卓毅 林盛雄 黃 竺 計(jì)算機(jī)世界日?qǐng)?bào) 蔡文水1.4.2軟件工程 鄧良松 劉海巖 陸麗娜 西安電子科技大學(xué)出版社1.4.3VisualFoxPro6.0程序設(shè)計(jì)教程 智西湖 雷治軍 西北農(nóng)林科技大學(xué)出版社1.4.4數(shù)據(jù)庫(kù)系統(tǒng)概論 薩師煊 王珊 高等教育出版社 1.4.5.計(jì)算機(jī)軟件工程環(huán)境與軟件工程 董士海 北京科學(xué)出版社 1.4.6數(shù)據(jù)庫(kù)和數(shù)據(jù)庫(kù)管理系統(tǒng)王珊陳紅 文繼榮2 運(yùn)行環(huán)境的要求 2.1 支持軟件 a. 操作系統(tǒng)：、WINDOWS 98 、WINDOWS NT、W

3、INDOWS ME、WINDOWS 2000 、WINDOWS XP均可運(yùn)行。 b. 編程語(yǔ)言： VFP6.02.2 硬件環(huán)境 CPU ：Celeron 300 或更高。 內(nèi)存：32M， 推薦128M。 硬盤：要求剩余空間大于2GB3 軟件的描述 3.1 目標(biāo)及作用范圍 該軟件應(yīng)用于管理領(lǐng)域，對(duì)人事檔案的管理提供了一個(gè)完善的工具，可以完成輸入、刪除、查詢的功能，減輕行政人員的工作負(fù)擔(dān)。它將會(huì)成為管理領(lǐng)域中極為完善的人事管理工具。 3.2 功能描述：人事管理系統(tǒng)軟件具有輸入、輸出、查找、刪除功能。 3.3 性能 a 時(shí)間:在軟件方面，響應(yīng)時(shí)間，更新處理時(shí)間，數(shù)據(jù)傳送和轉(zhuǎn)換時(shí)間，處理和解決問題時(shí)都

4、比較快且迅速，完全滿足用戶要求。 b 靈活性:當(dāng)用戶需求，如操作方式，運(yùn)行環(huán)境等發(fā)生變化時(shí)，設(shè)計(jì)的軟件要做適當(dāng)調(diào)整,靈活性非常大。 c有效性:用戶利用本軟件根據(jù)需要輸入所需關(guān)鍵字，界面就會(huì)輸出所需的相應(yīng)內(nèi)容。3.4主要模塊介紹a.主界面模塊當(dāng)用戶啟動(dòng)本軟件后，進(jìn)入登錄界面，用戶根據(jù)自己的權(quán)限進(jìn)行登陸該模塊提供管理系統(tǒng)的主界面，是主系統(tǒng)的唯一入口和出口，該界面提供用戶選擇并調(diào)用各子模塊。b.功能選擇界面功能選擇模塊只有管理員才能調(diào)用，其他用戶無此權(quán)限。此模塊是管理員接觸和操作的對(duì)象，管理員對(duì)系統(tǒng)的使用和管理幾乎都是通過此表單進(jìn)行的。c.瀏覽模塊該模塊是提供全部人事檔案瀏覽的界面。d.查詢模塊該模

5、塊提供查詢符合某一條件的人事檔案的界面。e.統(tǒng)計(jì)模塊該模塊提供按某一條件進(jìn)行統(tǒng)計(jì)的界面。f.編輯模塊該模塊提供對(duì)按檔案進(jìn)行更改、刪除和新增的界面。g.報(bào)表模塊該模塊按一定格式將人事檔案以報(bào)表格式輸出4.本軟件還有很多的不足之處，如果遇到問題請(qǐng)與系統(tǒng)開發(fā)組聯(lián)系。引 言利用計(jì)算機(jī)進(jìn)行信息控制和數(shù)據(jù)處理，不僅提高了工作效率，而且大大的提高了其安全性。六十年代初期，計(jì)算機(jī)技術(shù)就開始應(yīng)用于數(shù)據(jù)庫(kù)的管理，形成了初期的信息系統(tǒng)。我國(guó)的信息管理系統(tǒng)是九十年代初開始快速發(fā)展的，對(duì)信息管理系統(tǒng)的應(yīng)用比起世界先進(jìn)水平還相當(dāng)落后。一直以來人們使用傳統(tǒng)人工的方式管理文件檔案，這種管理方式存在著許多缺點(diǎn),如:效率低、保密

6、性差,另外時(shí)間一長(zhǎng),將產(chǎn)生大量的文件和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來了不少的困難。作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)人事檔案信息進(jìn)行管理,具有手工管理所無法比擬的優(yōu)點(diǎn)，例如：檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高人事管理的效率，也是企業(yè)的科學(xué)化、正規(guī)化管理，與世界接軌的重要條件。人事管理系統(tǒng)是一個(gè)企業(yè)單位不可缺少的部分，它的內(nèi)容對(duì)于企業(yè)的決策者和管理者來說都至關(guān)重要。因此，開發(fā)這樣一套管理軟件成為很有必要的事情，在下面我們將以開發(fā)一套人事管理系統(tǒng)為例，談?wù)勂溟_發(fā)過程和所涉及到的問題及解決方法。 系 統(tǒng) 概 況2.1人事管理系統(tǒng)的簡(jiǎn)介人事

7、檔案管理系統(tǒng)主要包含職工個(gè)人基本情況，家庭情況，社會(huì)關(guān)系等各方面信息，內(nèi)容比較龐大復(fù)雜。同時(shí)還綜合考慮檔案管理工作的性質(zhì)，總結(jié)歸納出所需實(shí)現(xiàn)的功能。主要是為人事檔案進(jìn)行服務(wù)，針對(duì)人事的變動(dòng)對(duì)人事資料進(jìn)行的錄入、刪除、查詢、統(tǒng)計(jì)等功能。36 VF人事管理系統(tǒng)2.2人事管理系統(tǒng)的功能2.2.1.靈活的數(shù)據(jù)記錄編輯功能.可以隨時(shí)對(duì)記錄進(jìn)行增加，修改，更新，刪除，瀏覽等編輯操作。2.2.2.強(qiáng)大的數(shù)據(jù)庫(kù)表查詢功能.便于在實(shí)際檔案管理操作中對(duì)人員情況進(jìn)行統(tǒng)計(jì)查看。2.2.3具備分級(jí)用戶權(quán)限管理設(shè)置.以確保檔案的保密性和安全性。2.2.4.具有分類統(tǒng)計(jì)功能.使用表或表單顯示的功能，該統(tǒng)計(jì)表或表單可根據(jù)數(shù)據(jù)

8、庫(kù)中記錄情況的變化而變化。2.2.5.具有較友好的人機(jī)界面.各種操作可以在直觀的界面上通過人機(jī)交互進(jìn)行。需 求 分 析3.1系統(tǒng)功能分析人事管理系統(tǒng)的主要任務(wù) 是對(duì)人事檔案進(jìn)行整理，使得能方便快捷地對(duì)人事檔案進(jìn)行查詢、統(tǒng)計(jì)、更新、并且能按一定要求輸出報(bào)表。3.2模塊功能設(shè)計(jì)若圖片無法顯示請(qǐng)聯(lián)系QQ,本論文免費(fèi),轉(zhuǎn)發(fā)請(qǐng)注明源于 3.2.1用戶登錄模塊功能功能：設(shè)置使用人事管理系統(tǒng)的用戶及其使用權(quán)限。 操作：系統(tǒng)啟動(dòng)后，首先要做的就是用戶登錄。若不登錄系統(tǒng)，所有功能都無法使用。用戶只有登錄系統(tǒng)后，根據(jù)其具有的權(quán)限，才能執(zhí)行一定的操作。進(jìn)入該功能后，要求輸入用戶的登錄名及其口令，

9、只有其登錄名和口令完全正確，才能進(jìn)入人事管理系統(tǒng)。系統(tǒng)會(huì)根據(jù)為用戶分配的權(quán)限，設(shè)置其對(duì)應(yīng)的功能有效，用戶就可操作該功能用戶分為管理員、一級(jí)用戶、二級(jí)用戶。通常，系統(tǒng)的權(quán)限分為三大部分，即：管理權(quán)限：設(shè)置用戶和系統(tǒng)參數(shù)。輸入權(quán)限：個(gè)人檔案輸入、家庭成員輸入和社會(huì)關(guān)系輸入。查詢權(quán)限：檔案查詢、檔案統(tǒng)計(jì)。根據(jù)需要，可以把這些功能分配給不同的員工。管理員具有對(duì)系統(tǒng)的最大權(quán)限，管理員才可以修改所以用戶密碼和權(quán)限。其他用戶不能執(zhí)行此功能。二級(jí)用戶對(duì)系統(tǒng)有最小權(quán)限。每一權(quán)限對(duì)應(yīng)系統(tǒng)菜單上的一項(xiàng)功能，可為該用戶選擇任意的權(quán)限整個(gè)人事管理系統(tǒng)由多個(gè)功能模塊組成，不同的模塊完成不同的功能，可以為不同的職工分配不同

10、的功能，使其具有不同的權(quán)限，完成其權(quán)限所對(duì)應(yīng)的功能，從而很好地管理好整個(gè)系統(tǒng)。 該模塊提供管理系統(tǒng)的主界面，是主系統(tǒng)的唯一入口和出口。3.2.2查詢模塊功能 功能:對(duì)檔案卡片的查詢功能，包括精確條件查詢和模糊條件查詢。該模塊的主要分為兩部分：一是在文本框中輸入要查詢的字段等；二是用來顯示用戶進(jìn)行查詢的字段及查詢、退出按鈕。當(dāng)查詢的條件輸入完畢，點(diǎn)擊確定按鈕，完成該模塊的查詢功能。會(huì)調(diào)出另外一個(gè)窗口來顯示用戶所要查詢的符合條件的所有員工的資料。根據(jù)人事檔案中的各字段，選擇相應(yīng)的條件操作符輸入相應(yīng)的值即可進(jìn)行檔案查詢。在這里可以查到符合程序要求的任何信息。在這里的選項(xiàng)中輸入規(guī)定的范圍即可查到相關(guān)的

11、人事信息。該模塊提供查詢符合某一條件的人事檔案的界面。3.2.3統(tǒng)計(jì)模塊功能功能：按規(guī)定的要求進(jìn)行的統(tǒng)計(jì),它可以較詳細(xì)直觀的統(tǒng)計(jì)出要求的結(jié)果。統(tǒng)計(jì)可以詳細(xì)的按職務(wù)按職稱、按部門、按學(xué)歷以數(shù)字的形式或者以表的形式顯示出來。將單位內(nèi)所有的人事信息進(jìn)行全面的統(tǒng)計(jì)。該模塊主要是綜合各方面的人數(shù)統(tǒng)計(jì)；對(duì)各部門的人數(shù)、各職稱的人數(shù)、各職位段人數(shù)以及學(xué)歷段人數(shù)等的統(tǒng)計(jì)并且以報(bào)表的形式顯示。并且本模塊提供重新統(tǒng)計(jì)功能，方便在一定時(shí)間段內(nèi)對(duì)各項(xiàng)人數(shù)的進(jìn)行更新，保持?jǐn)?shù)據(jù)庫(kù)中數(shù)據(jù)的即時(shí)性。3.2.4編輯模塊功能檔案編輯模塊中有3個(gè)子模塊。他們是檔案卡片、家庭成員和社會(huì)關(guān)系等功能。這些功能因管理員的權(quán)限不同所表示出的

12、功能使用也不同，只有管理員才擁有數(shù)據(jù)修改及刪除的權(quán)利。在這些功能里詳細(xì)的記錄了所有單位員工的資料。a.檔案卡片管理功能：對(duì)全部員工的信息進(jìn)行全局瀏覽,除了瀏覽信息的功能外，還有一些基本操作的功能：添加記錄,對(duì)員工的詳細(xì)資料進(jìn)行修改,刪除員工記錄。 b.家庭成員管理功能：對(duì)全部員工的家庭成員信息進(jìn)行編輯,瀏覽;實(shí)現(xiàn)方法同個(gè)人簡(jiǎn)歷功能實(shí)現(xiàn)的方法一樣。c.社會(huì)關(guān)系表功能：對(duì)全部員工的家庭成員信息進(jìn)行編輯,瀏覽;實(shí)現(xiàn)方法同個(gè)人簡(jiǎn)歷功能實(shí)現(xiàn)的方法一樣。有些功能普通用戶沒有此權(quán)限。3.2.5報(bào)表模塊對(duì)數(shù)據(jù)庫(kù)數(shù)據(jù)和文檔的輸出通常有兩種方式：屏幕顯示和打印機(jī)打印。屏幕顯示因?yàn)槭芷聊坏某叽绾筒荒苡谰眯员４娴南拗?/p>

13、而不能廣泛使用，因而通過打印機(jī)打印就成為數(shù)據(jù)庫(kù)文檔輸出不可替代的手段。報(bào)表就是用戶使用打印機(jī)輸出數(shù)據(jù)庫(kù)數(shù)據(jù)和文檔的一種常用的方式。 功能：該模塊按一定格式和要求以報(bào)表形式輸出。此模塊中有4個(gè)子模塊。它們是個(gè)人檔案輸出、員工社會(huì)關(guān)系輸出、職工基本信息輸出和單位部門名冊(cè)。操作：在該模塊中，可以有兩種方式把數(shù)據(jù)庫(kù)數(shù)據(jù)顯示出來。在計(jì)算機(jī)屏幕預(yù)覽或通過打印機(jī)打印作為永久數(shù)據(jù)保存。 VF人事管理系統(tǒng)3.3數(shù)據(jù)流程圖數(shù)據(jù)庫(kù)設(shè)計(jì)若圖片無法顯示請(qǐng)聯(lián)系QQ,本論文免費(fèi),轉(zhuǎn)發(fā)請(qǐng)注明源于 創(chuàng)建數(shù)據(jù)庫(kù)是設(shè)計(jì)系統(tǒng)的第一步，其關(guān)鍵問題在于確定所需的表結(jié)構(gòu)并為之建立索引。為了使系統(tǒng)設(shè)計(jì)精練實(shí)用，體現(xiàn)關(guān)系型

14、數(shù)據(jù)庫(kù)的特點(diǎn)，本系統(tǒng)還為各相關(guān)表建立關(guān)系。4.1數(shù)據(jù)項(xiàng)設(shè)計(jì)通過需求分析，可確定系統(tǒng)的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)如下：a.人事檔案（編號(hào)、姓名、性別、出生年月、聯(lián)系電話、住址、籍貫、文化程度、職稱、部門、職務(wù)、基本工資、簡(jiǎn)歷）。b.家庭成員（編號(hào)、家屬姓名、與員工關(guān)系、出生年月）。c.社會(huì)關(guān)系（編號(hào)、關(guān)系姓名、與員工關(guān)系、出生年月）。d.密碼表（S1編碼、S2操作員、S3密碼）4.2概念結(jié)構(gòu)設(shè)計(jì)本系統(tǒng)在需求分析的基礎(chǔ)上設(shè)計(jì)出能夠滿足用戶需求的各種實(shí)體。根據(jù)上面的分析所得的實(shí)體有：人事檔案實(shí)體、家庭成員實(shí)體和社會(huì)關(guān)系實(shí)體。各實(shí)體間的關(guān)系如圖：若圖片無法顯示請(qǐng)聯(lián)系QQ,本論文免費(fèi),轉(zhuǎn)發(fā)請(qǐng)注明源于myeducs

15、.cn簡(jiǎn)歷關(guān)系姓名出生年月家屬姓名出生年月家庭成員4.3邏輯結(jié)構(gòu)設(shè)計(jì)人事檔案表列名數(shù)據(jù)類型寬度可否為空說明編號(hào)數(shù)值型（10）否編號(hào)姓名字符型（10）否姓名性別字符型（2）否性別出生年月日期型（8）否出生年月住址字符型（30）可住址電話數(shù)值型（11）可電話籍貫字符型（10）否籍貫文化程度字符型（10）可文化程度職稱字符型（10）可職稱部門字符型（10）否部門職務(wù)字符型（10）否職務(wù)工資數(shù)值型（10）否工資簡(jiǎn)歷備注型否簡(jiǎn)歷家庭成員表列名數(shù)據(jù)類型寬度可否為空說明編號(hào)數(shù)值型（10）否編號(hào)家屬姓名字符型（10）否家屬姓名關(guān)系字符型（10）否關(guān)系出生年月日期型（8）否出生年月 社會(huì)關(guān)系表列名數(shù)據(jù)類型寬度可

16、否為空說明編號(hào)數(shù)值型（10）否編號(hào)關(guān)系姓名字符型（10）否關(guān)系姓名與員工關(guān)系字符型（10）否與員工關(guān)系出生年月日期型（8）否出生年月密碼表字段字段名類型寬度小數(shù)位1S1字符型12S2字符型83S3字符型4Windows下Visual FoxPro6.0的程序?qū)崿F(xiàn)在VFP6.0中，所提供的“項(xiàng)目管理器”和“應(yīng)用程序生成器”是系統(tǒng)開發(fā)人員的強(qiáng)大工具，利用應(yīng)用程序向?qū)?，無需編寫任何代碼，就可以創(chuàng)建一個(gè)項(xiàng)目和一個(gè)VFP6.0應(yīng)用程序框架，簡(jiǎn)化開發(fā)工作。5.1 創(chuàng)建主程序 “人事管理系統(tǒng)”就是用向?qū)Ы⒌捻?xiàng)目和應(yīng)用程序框架。系統(tǒng)的主程序是自動(dòng)生成的，為了滿足系統(tǒng)需求，對(duì)主程序做如下修改： 在主文件的首部

17、，添加下面語(yǔ)句： _screen.caption=人事管理系統(tǒng) _screen.picture=3.JPG_SCREEN.WINDOWSTATE=2PUBLIC k1,k2,k3,k4,k5,k6,k7,k8,k9,k10,k11,k12,k13,k14,k15,k16 ,k18STORE 0 TO k1,k2,k3,k4,k5,k6,k7,k8,k9,k10,k11,k12,k13,k14,k15,k16,k18 DO FORM 登錄表單.SCX其目的是控制系統(tǒng)主菜單，讓相應(yīng)的菜單命令“跳過”是之成為灰色顯示而不起作用。當(dāng)不同權(quán)限用戶進(jìn)入系統(tǒng)是在更改這些變量的值，使菜單命令可用。通過這種方法

18、，實(shí)現(xiàn)對(duì)不同權(quán)限的用戶賦予不同的操作權(quán)限目的。再者就是執(zhí)行系統(tǒng)登陸表單。退出并保存主程序文件。5.2登錄界面的制作過程：1.新建一個(gè)表單 添加兩個(gè)按鈕，分別為“確認(rèn)”、“退出”；添加一個(gè)組合框和一個(gè)文本框，屬性設(shè)置為：ROWSOURCE，CONTROLSOURCE和DISPLAYVALUE：密碼表.S2操作員 ROWSOURCE TYPE ：6-字段 STYLE ：2-下拉列表框2.表單初始為：public nn=1 VF人事管理系統(tǒng) “確定”按鈕的CLICK代碼為： yhm =bo1.valuemm=allt(thisform.text1.value)locate f

19、or S2操作員=yhmdo case allt(密碼表.S1編碼)=00000.and.mm=allt(密碼表.S3密碼) messagebox(程序員，你有權(quán)修改數(shù)據(jù)!+chr(13)+請(qǐng)按確定進(jìn)入，0+48，歡迎進(jìn)入!) store 1 to K1，K2，K3，K4，K5，K6，K7，K8，K9，K10，K11，K12，K13，K14，K15，K16，k18 thisform.release DO FORM MAIN case allt(密碼表.S1編碼)=00001.and.mm=allt(密碼表.S3密碼) messagebox(普通用戶，可以瀏覽數(shù)據(jù)!+chr(13)+請(qǐng)按確定進(jìn)入

20、，0+48，歡迎進(jìn)入!) store 1 to k6，k7，K8，K9，K10，K11，K12，K13，K14，K15，K16 thisform.release case allt(密碼表.S1編碼)=00002.and.mm=allt(密碼表.S3密碼) messagebox(普通用戶，可以瀏覽數(shù)據(jù)!+chr(13)+請(qǐng)按確定進(jìn)入，0+48，歡迎進(jìn)入!) store 1 to K6，K7，K9，K10，K11，K12，K13，K14，K15 thisform.release otherwise n=n+1 if n=3 messagebox(口令錯(cuò)誤，請(qǐng)重新輸入!你還有+allt(str(4

21、-n)+次機(jī)會(huì)，0+48，口令最多3次) thisform.text1.value= thisform.text1.setfocus else messagebox(，0+48，) quit *thisform.release endif endcase5.3主界面表單1.建立一個(gè)表單.在項(xiàng)目管理器的文檔頁(yè)中選擇表單，單擊“新建”，彈出表單設(shè)計(jì)器，設(shè)置“Caption”屬性“功能功能選擇界面”2.在該表單上添一個(gè)“容器”控件“Container1”.“容器”控件是可包含其他控件的空間，并且允許訪問被包含控件3.在“Container1”控件上添加六個(gè)“按鈕”控件.他們的“Caption”屬性分

22、別為“瀏覽”、 “查詢”、 “統(tǒng)計(jì)”、 “編輯”、 “打印”、 “退出”4.在表單上添加“圖象”控件“Image1”，并設(shè)置“Stretch”屬性為“2Stretch”、“Picture”屬性為圖片所在位置.5.雙擊按鈕控件可以彈出代碼編輯器 瀏覽 DO FORM LN 查詢 DO FORM JMCX 編輯 DO FORM DABJ 統(tǒng)計(jì) DO FORM TJ 打印 DO FORM DADY 退出 THISFORM.RELEASE6.表單名為”MAIN”5.4瀏覽表單1.新建一個(gè)表單， Caption屬性為“瀏覽檔案”然后在表單加一個(gè)“表格”控件。2.用“表格生成器”為表格設(shè)定數(shù)據(jù)源.右擊“表

23、格”控件彈出快捷菜單.選擇“生成器”，彈出“表格生成器”對(duì)話框。 3.在“數(shù)據(jù)庫(kù)和表”中選擇“人事管理”數(shù)據(jù)庫(kù)，在選“人事檔案”表. 單擊向左的單箭頭，排除“簡(jiǎn)歷”。4.單擊“確定”按鈕。5.為表單添加按鈕控件，“Caption”屬性“確定”， 代碼為release thisform6.調(diào)整后.將表單取名LN5.5查詢表單1. 有項(xiàng)目管理器建一個(gè)表單.設(shè)置“CAPTION” 屬性為“查詢”.添加一個(gè)選項(xiàng)按鈕設(shè)置“AUTOSIZE”屬性“T.-真”，設(shè)置“BOTTONCOUNT”屬性為“2”。2.將兩個(gè)選項(xiàng)按鈕的“CAPTION”屬性修改為“按編號(hào)查詢”和“按姓名查詢”；設(shè)置“AUTOSIZE”

24、屬性“T.-真”，設(shè)置”按編號(hào)查詢”按鈕的”VALUE “屬性為1。3.在表單中添加一個(gè)按鈕和一個(gè)文本框控件.“Caption”屬性改為“開始查詢”.這樣，當(dāng)單擊“開始查詢”按鈕時(shí)，系統(tǒng)將根據(jù)選項(xiàng)按鈕的值，即是“按編號(hào)查詢”還是“按姓名查詢”“開始查詢“按鈕的CLICK 事件代碼 select go topif thisform.OPTIONgroup1.value=1 locate for 編號(hào)=val(trim(thisform.text1.value)else locate for 姓名=trim(thisform.text1.value)endif thisform.refresh i

25、f.not.found() wait window沒有找到所要的記錄!按任意鍵或鼠標(biāo)繼續(xù).Endif4. 查到記錄顯示出來.先右擊表單，選擇“生成器”命令，或從“表單”菜單選擇“快速表單”，彈出“表單生成器”，在“數(shù)據(jù)庫(kù)和表”中選擇“人事管理”數(shù)據(jù)庫(kù)，其下選“人事檔案”表.單擊向右的雙箭頭，選所有的字段.5. 為表單添加一個(gè)“退出”，“ Caption” 屬性為“退出”，其CLICK事件代碼 THISFORM.RELEASE6. 表單名字為CX 保存5.6編輯表單5.6.1 dabj表單1.建立一個(gè)表單。在項(xiàng)目管理器的文檔頁(yè)中選擇表單，單擊“新建”，1彈出表單設(shè)計(jì)器，設(shè)置“Caption”屬性

26、“檔案編輯”。在表單中添加一個(gè)Lable1，設(shè)置其“Caption”屬性“請(qǐng)先選擇要更新的檔案”，其“Backstyle”屬性為“0-透明”。2.在表單中添加“Optiongroup1”其“backstyle”屬性為“0-透明”，“Buttoncount”屬性為“3”，“Value”值為“1”單擊“單選按鈕組”選擇編輯，3個(gè)按鈕的“Caption”分別設(shè)置為“人事卡片編輯”，“家庭成員表編輯”，“社會(huì)關(guān)系表編輯”。3.在表單中添加4個(gè)按鈕 分別為“添加”、“刪除”、“修改”、“退出” 代碼如下： 添加代碼： do case case thisform.optiongroup1.option1.

27、value=1do form bj case thisform.optiongroup1.option2.value=1 do form jtbj case thisform.optiongroup1.option3.value=1 do form shehuln endcase 刪除代碼： do case case thisform.optiongroup1.option1.value=1 do form bj case thisform.optiongroup1.option2.value=1 do form jtbj case thisform.optiongroup1.option3.

28、value=1 do form shehuln endcase 修改代碼： do case case thisform.optiongroup1.option1.value=1 do form bj case thisform.optiongroup1.option2.value=1 do form jtbj case thisform.optiongroup1.option3.value=1 do form shehuln endcase4. 保存表單名為dabj.5.6.2 BJ表單1.在項(xiàng)目管理器的文檔頁(yè)中選擇表單，單擊“新建”，彈出表單設(shè)計(jì)器，設(shè)置“Caption”屬 VF人事管理系統(tǒng)

29、性“編輯”， 從“表單”菜單中選擇“快速表單”，彈出表單生成器. 在“數(shù)據(jù)庫(kù)和表”中選擇“人事管理”數(shù)據(jù)庫(kù)，其下選“人事檔案”表.單擊向右的雙箭頭，選所有的字段.2.按編輯表單要實(shí)現(xiàn)的功能，表單應(yīng)有“更改”、“新增空記錄”、“刪除”等記錄，還添加 “第一個(gè)”、“最后一個(gè)”等按鈕?！暗谝粋€(gè)”代碼go topwait已到開頭window mand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.thisform.r

30、efresh“前一個(gè)”代碼skip-1if bof() &假如指針已到開頭wait已到開頭window nowaitgo mand1.enabled=.mand2.enabled=.f.else &指頭還沒有指向第一個(gè)記錄mand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.thisform.refresh“后一個(gè)”代碼

31、mand1.enabled=.mand2.enabled=.t.if eof() &假如指針已到結(jié)尾 wait 已到結(jié)尾window nowait go mand3.enabled=.mand4.enabled=.f.else &指針尚未到結(jié)尾mand3.enabled=.mand4.enabled=.t.endif &假設(shè)結(jié)束thisform.refresh“最后一個(gè)”代碼 go bottomwait已到結(jié)尾window nowaitthisform

32、.command1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.thisform.refresh3.編輯時(shí)，選擇相應(yīng)的記錄，便可以在對(duì)應(yīng)的文本框中進(jìn)行編輯，然后單擊“更改”按鈕，編輯的結(jié)果會(huì)反映到人事檔案表4.若要添加一個(gè)記錄，則先添加“新增空記錄”按鈕，在相應(yīng)的文本框中添入數(shù)據(jù)，然后單擊“更改”，記錄就會(huì)添加到數(shù)據(jù)庫(kù)中.若要?jiǎng)h除一個(gè)記錄，選擇相應(yīng)的記錄，單擊“刪除”按鈕， 5.為表單添加一個(gè)“退出”按鈕，以退出編輯表單。 “新增空記錄”代碼：

33、 append blankthisform.refresh“更改”代碼：result= (.f.)if result=.t. ?chr(7)=messagebox(“修改成功!”，48，”信息窗口”)thisform.refreshendif“刪除”代碼：use 人事檔案if messageBOX(確實(shí)要?jiǎng)h除記錄嗎?，1+64+256，提示)=1 delete pack thisform.refresh else thisform.refresh endif6.保存表單取名 BJ5.7統(tǒng)計(jì)程序5.7.1 tj表單1.新建一個(gè)表單“統(tǒng)計(jì)”添加一個(gè)按鈕組4個(gè)按鈕2.四個(gè)按鈕為“統(tǒng)計(jì)職務(wù)”、“統(tǒng)計(jì)部

34、門”、“統(tǒng)計(jì)職稱”、“統(tǒng)計(jì)文化程度”在右邊添加一個(gè)“圖象”空間，并設(shè)“STRETCH”屬性為”2-STRETCH”，”PICTURE”屬性所在位置 “統(tǒng)計(jì)職務(wù)”代碼 wait window 正在統(tǒng)計(jì)。 timeout 2report form tjzw environment preview *調(diào)用一個(gè)報(bào)表 “統(tǒng)計(jì)部門”代碼 DO form tjbmRELEASE THISFORM“統(tǒng)計(jì)職稱”代碼Do form tjzcRELEASE THISFORM“統(tǒng)計(jì)文化程度”代碼wait window 正在統(tǒng)計(jì)。 timeout 2report form tjwh environment previe

35、w *調(diào)用一個(gè)報(bào)表 5.7.2 tjzc表單設(shè)計(jì)如下： 這一表單主要統(tǒng)計(jì)了兩個(gè)方面的數(shù)據(jù)：一是總?cè)藬?shù)、男職工、女職工的人數(shù)，另一方面是統(tǒng)計(jì)各類職稱的教師人數(shù)。1.創(chuàng)建新表單，在表單中添加一個(gè)標(biāo)簽Label1，設(shè)置起標(biāo)題為“統(tǒng)計(jì)職稱”，再添加兩個(gè)容器控件Container1，Container2，設(shè)置它們的SpecialEffect屬性值為：“1-凹下”。2編輯容器控件Container1，添加三個(gè)標(biāo)簽，caption屬性分別設(shè)置為“職工總?cè)藬?shù)”、“男性人數(shù)”、“女性人數(shù)”，再添加三個(gè)文本框控件用來顯示統(tǒng)計(jì)結(jié)果，分別把他們的Read Only設(shè)置為真。3同理，編輯容器控件Container2，添

36、加四個(gè)標(biāo)簽，caption屬性分別設(shè)置為“教授”、“副教授”、“講師”、“助教”，再添加四個(gè)文本框控件用來顯示統(tǒng)計(jì)結(jié)果，分別把他們的Read Only設(shè)置為真。 VF人事管理系統(tǒng)編輯表單的初始化事件（Init Event）程序代碼為 private js，ja，jq，zc1，zc2，zc3，zc4use 人事檔案count to jsthisform.container1.text1.value=jscount for 性別=男 to jathisform.container1.text2.value=jacount for 性別 =女 to jqthisform.container1.tex

37、t3.value=jqcount for 職稱=教授 to zc1thisform.container2.text1.value=zc1count for 職稱=副教授 to zc2thisform.container2.text2.value=zc2count for 職稱=講師 to zc3thisform.container2.text3.value=zc3count for 職稱=助教 to zc4thisform.container2.text4.value=zc4use5.8報(bào)表設(shè)計(jì) 創(chuàng)建報(bào)表rj是一對(duì)多報(bào)表，數(shù)據(jù)源為數(shù)據(jù)表“人事檔案”和“家庭成員”。制作過程：1利用“項(xiàng)目管理器”

38、里的“一對(duì)多報(bào)表向?qū)А?，按確定按鈕，進(jìn)入“一對(duì)多報(bào)表向?qū)А辈襟E1窗口：從父表選擇字段。2在“數(shù)據(jù)庫(kù)和表”列表框中選擇要輸出的數(shù)據(jù)表“人事檔案”做為父表，然后在“可用字段”列表中選擇要輸出的字段。3單擊“下一步”進(jìn)入步驟2窗口“從子表選擇字段”，先在“數(shù)據(jù)庫(kù)和表”列表框中選擇要輸出的數(shù)據(jù)表“家庭成員”作為子表，在“可用字段”列表框中選擇要輸出的字段。4數(shù)據(jù)表“人事檔案”和“家庭成員”事先已經(jīng)建立索引。因而在步驟3窗口中，兩個(gè)表選取匹配的字段“編號(hào)”。5單擊“下一步”進(jìn)入步驟4：排序記錄。再“下一步”進(jìn)入步驟5：選擇報(bào)表樣式，選擇一個(gè)報(bào)表樣式，輸出方向可以根據(jù)需要選擇縱向或橫向。單擊“下一步”進(jìn)入

39、步驟6窗口：完成。6在步驟6中可以輸入表的標(biāo)題，可單擊“預(yù)覽”按鈕進(jìn)行預(yù)覽，不滿意時(shí)有單擊“上一步”來逐步返回進(jìn)行修改：最后，選擇適當(dāng)選項(xiàng)后單擊“完成”按鈕，則一個(gè)新的報(bào)表建立。5.9主菜單設(shè)計(jì)菜單的設(shè)計(jì)從一開始就是為了方便用戶界面的使用。在以往的DOS界面里，程序員為了編寫一個(gè)自己的菜單系統(tǒng)，往往要花費(fèi)大量的時(shí)間和精力?，F(xiàn)在，有了可視化的編程工具，WINDOWS用戶界面已經(jīng)越來越來趨于簡(jiǎn)單化，其結(jié)果是只要了解一些最基本的工具，在加上簡(jiǎn)單的代碼，用戶就完全可以編寫自己的操作界面。今天，盡管WINDOWS的各種快捷工具越來越起著重要的作用，但是菜單作為一種方便地操作方式，起作用仍然是不可替代的。

40、使用Visual FoxPro 6.0的“菜單設(shè)計(jì)器”可以把用戶的任務(wù)和操作組織起來，并放入合乎邏輯的菜單組。菜單設(shè)計(jì)提高了Visual FoxPro 6.0應(yīng)用程序能力。以下給出主菜單系統(tǒng)參數(shù)設(shè)置：主菜單中三個(gè)過程文件程序代碼如下：a.系統(tǒng)初始化的過程代碼：SET SAFETY OFFCLOSE DATABASEA=MESSAGEBOX(系統(tǒng)記錄將被清空，你真的這樣做?!，4+16+256，系統(tǒng)警告)IF A=4 USE 人事檔案 ZAP USE 家庭成員 ZAP USE 社會(huì)關(guān)系 ZAPENDIFUSEb.系統(tǒng)備份的過程代碼：CLOSE DATABASEA=MESSAGEBOX(請(qǐng)把備份盤

41、插入軟驅(qū)!，4+64+256，提示信息)USE 人事檔案IF A=4 COPY TO A:人事檔案.DBF USE 家庭成員 COPY TO A:家庭成員.DBF USE 社會(huì)關(guān)系 COPY TO A:社會(huì)關(guān)系.DBFENDIF USEb.系統(tǒng)恢復(fù)的過程代碼：SET SAFETY OFFCLOSE DATABASEA=MESSAGEBOX(請(qǐng)把備份盤插入軟驅(qū)!，4+64+256，提示信息)IF A=4 USE A:人事檔案.DBF COPY TO 人事檔案.DBF USE A:家庭成員.DBF COPY TO 家庭成員.DBF USE A:社會(huì)關(guān)系.DBF COPY TO 社會(huì)關(guān)系.DBFEN

42、DIF USE主菜單參數(shù)設(shè)置一覽表：菜單名稱結(jié)果編輯或命令跳過文件子菜單K18=0系統(tǒng)初始化過程K1=0恢復(fù)系統(tǒng)過程K2=0系統(tǒng)備份過程K3=0數(shù)據(jù)更新命令Do form babj.scxK4=0更改口令命令Do form 密碼修改表單.scxK5=0查詢子菜單K6=0模糊查詢命令Do form rskpcx.scxK8=0精確查詢命令Do form cxl.scxK7=0統(tǒng)計(jì)子菜單K9=0職務(wù)統(tǒng)計(jì)命令Report form tjzw.frx previewK10=0學(xué)歷統(tǒng)計(jì)命令Report form wh.frx previewK11=0職稱統(tǒng)計(jì)命令Do form tjzc.scxK12=0部門統(tǒng)計(jì)命令Do form tjbm.scxK13=0報(bào)表子菜單K14=0個(gè)人檔案命令Report form rj.frx pr