1、一、需求分析根據(jù)任務(wù)書給定的“課程設(shè)計內(nèi)容”和“課程設(shè)計要求”作如下的需求分析。該系統(tǒng)是一個較典型的數(shù)據(jù)管理系統(tǒng)，其使用者被假定為某高校的設(shè)備信息管理人員，系統(tǒng)應(yīng)該具有穩(wěn)定、安全、功能齊全等特點。1. 安全性分析系統(tǒng)管理的數(shù)據(jù)涉及到某高校的所有設(shè)備，數(shù)據(jù)量較大且是一種重要性數(shù)據(jù)，能夠為其它方面的設(shè)備信息管理工作提供重要參考，所以要通過設(shè)置密碼等手段確保數(shù)據(jù)不能被隨意的刪減和修改。2. 穩(wěn)定性分析指系統(tǒng)比較穩(wěn)定，只要是用戶的合理操作，系統(tǒng)都應(yīng)給出合理正確的回應(yīng)，而不能出現(xiàn)令用戶感到意外的系統(tǒng)錯誤或系統(tǒng)崩潰。3. 主要功能分析（1）系統(tǒng)登錄：允許用戶輸入用戶名、密碼等進(jìn)入系統(tǒng)。（2）數(shù)據(jù)維護(hù)：該模

2、塊是針對于管理員操作，一般包括查詢、修改等，對于輸入的數(shù)據(jù)，或被修改的數(shù)據(jù)應(yīng)該保存到某個磁盤文件中，實現(xiàn)永久存儲。（3）數(shù)據(jù)查詢：用戶可以選擇按照設(shè)備名稱，設(shè)備編號，設(shè)備類別查詢，當(dāng)輸入查詢條件，系統(tǒng)規(guī)則地在界面顯示查詢結(jié)果，且顯示的數(shù)據(jù)盡量全面詳細(xì)。 (4）功能界面：用戶可以根據(jù)實際需要如購買設(shè)備及報廢設(shè)備等對數(shù)據(jù)進(jìn)行添加和刪除，對數(shù)據(jù)進(jìn)行完善。二、系統(tǒng)主要功能模塊設(shè)備信息管理系統(tǒng)基于Visual FoxPro 6.0中文版開發(fā)，VFP在數(shù)據(jù)庫開發(fā)方面具有方面，實用，簡單，直接等優(yōu)點，同時其也具有一定的局限性。本系統(tǒng)主要面向高校設(shè)備信息管理人員開發(fā)使用，因此主要側(cè)重于系統(tǒng)的使用性和方便性，同

3、時在安全性方面，也十分重視。特別是系統(tǒng)登陸界面中的登錄操作，我們都做了仔細(xì)的分析研究。1. “學(xué)生信息管理系統(tǒng)”的模塊結(jié)構(gòu)圖（如圖1）系統(tǒng)主界面登陸界面設(shè)備信息管理功能菜單設(shè)備信息統(tǒng)計退出信息維護(hù)信息查詢購買設(shè)備報廢設(shè)備信息統(tǒng)計正確圖1 系統(tǒng)模塊化分2、本系統(tǒng)的主要內(nèi)容(如圖2)圖 2 項目管理器三、數(shù)據(jù)庫設(shè)計數(shù)據(jù)庫設(shè)計是總體設(shè)計階段中非常重要的環(huán)節(jié)，數(shù)據(jù)庫結(jié)構(gòu)的變化會造成編碼的改動，所以必須認(rèn)真設(shè)計數(shù)據(jù)庫結(jié)構(gòu)后再進(jìn)行編碼，從而避免無謂的重復(fù)工作。本系統(tǒng)的數(shù)據(jù)庫包括2個表，即密碼表及設(shè)備信息表。1.密碼表(密碼.dbf)密碼表(密碼.dbf)用于記錄用戶名，密碼等信息，其邏輯結(jié)構(gòu)如表1所示。表

4、1 密碼表字段名稱字段類型寬度小數(shù)位NULL用戶名C10否密碼C10否2.設(shè)備信息表(設(shè)備信息.dbf)設(shè)備信息表(設(shè)備信息.dbf)用于記錄設(shè)備基本信息，包括設(shè)備名稱，編號，類別，數(shù)量，購進(jìn)時間，購進(jìn)價格，所屬單位，運行情況等信息，其邏輯結(jié)構(gòu)如表2所示。表2設(shè)備信息字段名稱字段類型寬度小數(shù)位NULL類別C10否設(shè)備名稱C10否編號C10否數(shù)量C10否購進(jìn)價格Y8否購進(jìn)時間D8否所屬單位C10否運行情況C10否四、各功能模塊的具體設(shè)計根據(jù)系統(tǒng)規(guī)劃和需要分析，把系統(tǒng)劃分為登陸界面，用戶主界面，各級功能模塊等。本系統(tǒng)用到的主要有以下文件：系統(tǒng)登錄界面(表單1.scx)，用戶主界面（高校設(shè)備管理界面

5、1.scx）主菜單（高校設(shè)備管理界面.mpr）等。程序的調(diào)用關(guān)系如下：系統(tǒng)登錄界面(表單1.scx)中調(diào)用界面表單用戶主界面（高校設(shè)備管理界面1.scx），各菜單項調(diào)用相對應(yīng)的表單。1登陸界面表單(表單1.scx)(圖3)密碼驗證作為系統(tǒng)最基本的安全管理步驟。用戶如果不輸入合法的用戶名和密碼，系統(tǒng)是不能進(jìn)入的。當(dāng)用戶輸入合法的用戶名和密碼時，系統(tǒng)管理會自動判斷此用戶，使用戶的操作具有合法性。：用戶在文本框輸入操作員及口令，若正確則調(diào)用用戶主界面。圖3 登陸界面1）將密碼表添加到系統(tǒng)調(diào)用表單的數(shù)據(jù)環(huán)境中。2）系統(tǒng)調(diào)用界面中主要控件屬性如表3所示。表3 登陸界面表單控件屬性對象名稱屬性名稱屬性值F

6、orm1caption登陸界面AutoCenter.T.Command1caption確定Command2caption取消Text1NameText1Text2NameText2passwordchar*3）主要事件代碼：Command1的click事件代碼：set exact on select 密碼 if allt(thisform.text1.value)= messagebox(用戶名為空，請輸入!,64,提示) thisform.text1.setfocus else if allt(thisform.text2.value)= messagebox(密碼為空，請輸入,64,提示)

7、 thisform.text2.setfocus else locate for allt(用戶名)=allt(thisform.text1.value) and allt(密碼)=allt(thisform.text2.value) if found() do form 高校設(shè)備管理界面1 thisform.release else messagebox(輸入用戶名或密碼錯誤,45,提示) endif endif endif Command2的click事件代碼：close all thisform.release2用戶主界面（高校設(shè)備管理界面1.scx）(圖4)當(dāng)操作員的名稱和密碼均正確的

8、時候，系統(tǒng)便會進(jìn)入系統(tǒng)主界面使用主菜單。主菜單共分為四個分菜單項：設(shè)備信息管理，功能菜單，設(shè)備信息統(tǒng)計及退出。如圖(4)圖4 用戶主界面在設(shè)備信息管理中分為信息維護(hù)和查詢兩個菜單項，在功能菜單中含有購買設(shè)備和報廢設(shè)備表4 用戶主界面表單控件屬性對象名稱屬性名稱屬性值Form1caption用戶主界面AutoCenter.T.label1caption沈陽航空航天大學(xué)Label2caption設(shè)備管理系統(tǒng)Label3caption歡迎您！3用戶主界面菜單設(shè)計1)用戶主界面的菜單在應(yīng)用系統(tǒng)中，各個了模塊是通過菜單組織在一起的。通過對用戶主界面功能模塊的設(shè)計，可以交系統(tǒng)劃分為4大模塊：設(shè)備信息管理，

9、功能菜單，設(shè)備信息統(tǒng)計及退出，具體的菜單設(shè)計見表5：表5用戶主界面菜單設(shè)備信息管理信息維護(hù)管理員對數(shù)據(jù)的操作及應(yīng)用查詢功能菜單購買設(shè)備管理員對系統(tǒng)的應(yīng)用報廢設(shè)備設(shè)備信息統(tǒng)計管理員對系統(tǒng)的應(yīng)用退出退出系統(tǒng)4. 設(shè)備信息維護(hù)表單(高校設(shè)備信息維護(hù).scx)設(shè)備信息維護(hù)表單(如圖5)包換下列功能：數(shù)據(jù)添加、修改、刪除、查詢、瀏覽等。本表單左邊是瀏覽窗口，便于用據(jù)；右邊是查詢結(jié)果輸出及編輯窗口，主要用于查詢結(jié)果輸出及輸入修改數(shù)據(jù)戶瀏覽數(shù)。圖5學(xué)生數(shù)據(jù)維護(hù)界面1) 在表單數(shù)據(jù)環(huán)境中添加表：設(shè)備信息.dbf。在表單數(shù)據(jù)環(huán)境中的設(shè)備信息.dbf 的exclusive屬性為.t.2）學(xué)生數(shù)據(jù)維護(hù)表單界面中主要

10、控件屬性如表6所示。表6 設(shè)備信息維護(hù)表單控件屬性對象名稱屬性名稱屬性值Form1caption設(shè)備信息維護(hù)AutoCenter.T.Grid1recordsourcetype1-別名recordsource設(shè)備信息維護(hù)Commandgroup1buttoncount3value1Text1nameText1Text2controlsource設(shè)備名稱Text3controlsource類別Text4controlsource編號Text5controlsource數(shù)量Text6controlsource購進(jìn)價格Text7controlsource購進(jìn)時間Text8controlsource所

11、屬單位Text9controlsource運行情況3) 事件代碼：“上一個“的CLICK事件代碼：skip-1if bof()go bottomendifthisform.refresh“下一個“的CLICK事件代碼：skipif eof()go topendifthisform.refresh“瀏覽“的CLICK事件代碼：select 設(shè)備信息set filter to do casecase thisform.optiongroup1.value=1set filter to 設(shè)備名稱=alltrim(thisform.text1.value)locate for 設(shè)備名稱=alltrim

12、(thisform.text1.value)case thisform.optiongroup1.value=2set filter to 類別=alltrim(thisform.text1.value)locate for 類別=alltrim(thisform.text1.value)case thisform.optiongroup1.value=3set filter to 所屬單位=alltrim(thisform.text1.value)locate for 所屬單位=alltrim(thisform.text1.value)endcasethisform.refresh“添加“按

13、鈕的CLICK事件代碼：if this.caption=添加this.caption=保存endif select 設(shè)備信息append blankgo bottom thisform.text4.setfocus()thisform.refresh “刪除“按鈕的CLICK事件代碼：select 設(shè)備信息sel=messagebox (真的要刪除嗎？,4,提示)if sel=6deletepackmessagebox(刪除成功！,4,提示)use thisform.grd設(shè)備信息.recordsourcetype=0thisform.grd設(shè)備信息.recordsource=設(shè)備信息endi

14、f“修改“按鈕的CLICK事件代碼：select 設(shè)備信息replace 設(shè)備名稱 with alltrim(thisform.text2.value)replace 類別 with alltrim(thisform.text3.value)replace 編號 with alltrim(thisform.text4.value)replace 數(shù)量 with alltrim(thisform.text5.value)replace 購進(jìn)價格 with thisform.text6.valuereplace 購進(jìn)時間 with thisform.text7.valuereplace 所屬單位

15、with alltrim(thisform.text8.value)replace 運行情況 with alltrim(thisform.text9.value)messagebox(修改成功,1,提示)thisform.refresh“退出“按鈕的CLICK事件代碼：thisform.release4）運行界面：(如圖6)圖6學(xué)生數(shù)據(jù)維護(hù)5.設(shè)備信息查詢表單(高校設(shè)備信息查詢.scx)的設(shè)計首先，信息查詢表單的設(shè)計與信息維護(hù)表單的設(shè)計比較類似。表單調(diào)用的是設(shè)備信息.dbf。設(shè)備信息的查詢?nèi)鐖D7，是基于設(shè)備信息.dbf表，提供設(shè)備名稱，設(shè)備編號，設(shè)備類別，設(shè)備數(shù)量等查詢。分別利用不同的命令代碼

16、方式實現(xiàn)查詢打印功能。功能是便于設(shè)備信息管理員檢索查詢。圖7學(xué)生信息查詢表單1) 在表單數(shù)據(jù)環(huán)境中添加表：設(shè)備信息.dbf。在表單數(shù)據(jù)環(huán)境中的設(shè)備信息.dbf 的exclusive屬性為.t.2）設(shè)備信息查詢表單界面中主要控件屬性如表7所示。表7設(shè)備信息查詢表單控件屬性對象名稱屬性名稱屬性值Form1caption設(shè)備信息維護(hù)AutoCenter.T.Grid1recordsourcetype1-別名recordsource設(shè)備信息維護(hù)Commandgroup1buttoncount3value1Text1nameText1Text2controlsource設(shè)備名稱Text3controls

17、ource編號Text4controlsource類別Text5controlsource數(shù)量Text6controlsource購進(jìn)價格Text7controlsource所屬單位Text8controlsource購進(jìn)時間Text9controlsource運行情況3)各事件的代碼如下：，“上一個“的CLICK事件代碼：skip-1if bof()go bottomendifthisform.refresh“下一個“的CLICK事件代碼：skipif eof()go topendifthisform.refresh“查詢“的CLICK事件代碼：select 設(shè)備信息set filter t

18、o do casecase thisform.optiongroup1.value=1set filter to 設(shè)備名稱=alltrim(thisform.text1.value)locate for 設(shè)備名稱=alltrim(thisform.text1.value)case thisform.optiongroup1.value=2set filter to 類別=alltrim(thisform.text1.value)locate for 類別=alltrim(thisform.text1.value)case thisform.optiongroup1.value=3set fil

19、ter to 所屬單位=alltrim(thisform.text1.value)locate for 所屬單位=alltrim(thisform.text1.value)endcasethisform.refresh“打印預(yù)覽“的CLICK事件代碼：report form 設(shè)備信息.frx preview“打印“的CLICK事件代碼：report form 設(shè)備信息.frx to printer“退出“按鈕的CLICK事件代碼：thisform.release4）該表單的運行圖示如下(圖8)圖8學(xué)生信息查詢表單6.購買設(shè)備表單(設(shè)備購買.scx)設(shè)計1）將設(shè)備信息.dbf添加到該表單的數(shù)據(jù)環(huán)

20、境中2）設(shè)備購買表單界面中主要控件屬性如表8所示。表8設(shè)備購買表單控件屬性對象名稱屬性名稱屬性值Form1caption設(shè)備購買AutoCenter.T.Command1caption信息輸入Command2caption取消設(shè)計界面如圖9，界面如下：3) 各事件代碼均類似于學(xué)生信息查詢的事件代碼?！靶畔⑤斎搿钡腃LICK的事件代碼為：go bottomdimension a(8)a(1)=alltrim(thisform.text3.value)a(2)=alltrim(thisform.text1.value)a(3)=alltrim(thisform.text2.value)a(4)=a

21、lltrim(thisform.text4.value)a(5)=thisform.text6.valuea(6)=thisform.text5.valuea(7)=alltrim(thisform.text7.value)a(8)=alltrim(thisform.text8.value)insert into 設(shè)備信息 from array a messagebox(輸入成功,1,提示)“取消”的CLICK的事件代碼為：thisform.release4）該表單的運行圖示如下(圖10)7.報廢設(shè)備表單(設(shè)備報廢.scx)設(shè)計1）將設(shè)備信息.dbf添加到該表單的數(shù)據(jù)環(huán)境中2）設(shè)備購買表單界面

22、中主要控件屬性如表9所示。表9設(shè)備購買表單控件屬性對象名稱屬性名稱屬性值Form1caption報廢設(shè)備AutoCenter.T.Command1caption確認(rèn)報銷Command2caption取消Commandgroup1buttoncount3value1設(shè)計界面如圖11，界面如下：3)各事件代碼?！安樵儭钡腃LICK的事件代碼為：select 設(shè)備信息set filter to do casecase thisform.optiongroup1.value=1set filter to 設(shè)備名稱=alltrim(thisform.text4.value)locate for 設(shè)備名稱

23、=alltrim(thisform.text4.value)case thisform.optiongroup1.value=2set filter to 類別=alltrim(thisform.text4.value)locate for 類別=alltrim(thisform.text4.value)case thisform.optiongroup1.value=3set filter to 所屬單位=alltrim(thisform.text4.value)locate for 所屬單位=alltrim(thisform.text4.value)endcasethisform.refr

24、esh“確認(rèn)報銷”的CLICK的事件代碼為：select 設(shè)備信息sel=messagebox (真的要報銷嗎？,4,提示)if sel=6deletepackmessagebox(操作成功,4,提示)*use Endif“取消”的CLICK的事件代碼為：thisform.release4）該表單的運行圖示如下(圖12)8.設(shè)備信息統(tǒng)計表單(設(shè)備信息統(tǒng)計.scx)設(shè)計設(shè)備信息統(tǒng)計表單用于系統(tǒng)的使用者對整個數(shù)據(jù)進(jìn)行統(tǒng)計，便于對數(shù)據(jù)整體情況的了解。1）將設(shè)備信息.dbf添加到該表單的數(shù)據(jù)環(huán)境中。2）設(shè)備信息統(tǒng)計表單界面中主要控件屬性如表10所示。表10設(shè)備信息統(tǒng)計表單控件屬性對象名稱屬性名稱屬性值Form1caption設(shè)備信息統(tǒng)計AutoCenter.T.Command1caption統(tǒng)計Command2caption退出設(shè)計界面如圖1