【正文】 助四、系統(tǒng)設(shè)計建立項目管理器為提高軟件開發(fā)、維護(hù)和效率，應(yīng)使用項目管理器設(shè)計一個應(yīng)用系統(tǒng)。建立項目管理器的步驟如下：（3） 在visual FoxPro “文件”菜單中選擇“新建”命令，將會彈出“新建”對話框，在該對話框的“文件類型”中選擇“項目”單選鈕，并單擊“新建文件”按鈕。單擊“保存”按鈕后，這個新的項目就建立起來了。在Visual ，可以使用數(shù)據(jù)庫來組織和關(guān)聯(lián)表和視圖。此外，還可利用參照完整性來幫助維護(hù)數(shù)據(jù)庫中相關(guān)表中記錄的一致性等。在彈出的“創(chuàng)建”對話框中輸入數(shù)據(jù)庫名“wupin”后，單擊“保存”按鈕數(shù)據(jù)庫建好了以后，就可以創(chuàng)建數(shù)據(jù)表了，單擊鼠標(biāo)右鍵，彈出快捷菜單，單擊“新建表”命令；也可單擊“數(shù)據(jù)庫設(shè)計器”工具欄中的“新建表”按鈕，彈出“新建表”對話框，單擊“新建表”按鈕，彈出“創(chuàng)建”對話框。用表設(shè)計器建立系統(tǒng)所需的表與字段。表單是用戶與Visual FoxPro ，用戶能通過表單控件實現(xiàn)與應(yīng)用程序的連接。用戶還能向表單中添加各種控件，設(shè)計出非常美觀、操作方便的用戶界面。系統(tǒng)登錄表單的主要任務(wù)就是驗證操作員和進(jìn)入系統(tǒng)的密碼，如果密碼正確，可調(diào)用系統(tǒng)主菜單，進(jìn)入系統(tǒng)環(huán)境，否則，就退出系統(tǒng)。該表單包括了9個標(biāo)簽、5個組合框、1個編輯框、3個文本框、1個命令按鈕組，其中：其中：組合框要注冊生成器（單擊鼠標(biāo)右鍵），命令按鈕的“caption”屬性分別為確定和取消，命令按鈕“確定”的“click”事件代碼如下：cleibie=ALLTRIM()cpinpai=ALLTRIM()cdanjia=VAL(ALLTRIM())cshuliang=VAL(ALLTRIM())cgoumairen=ALLTRIM()criqi=CTOD(ALLTRIM()+.+ALLTRIM()+.+ALLTRIM())cbeizhu=ALLTRIM()IF NOT USED(jiku) SELECT 0 USE jikuENDIFSELECT jikuLOCATE FOR ALLTRIM(leibie)==cleibie AND ALLTRIM(pinpai)=cpinpaiIF FOUND() UPDATE jiku set shuliang=shuliang+cshuliang,danjia=(danjia+cdanjia)/2,riqi=criqi。 values(cleibie,cpinpai,cdanjia,cshuliang,cgoumairen,criqi,cbeizhu)endif cMessageTitle=數(shù)據(jù)錄入cMessageText=數(shù)據(jù)添加成功，還要繼續(xù)嗎？nDialogType=4+32nanswer=MESSAGEBOX(cMessageText,nDialogType,cMessageTitle)if nAnswer=6 = = = =ELSE USE ENDIF命令按鈕“取消”的“click”事件代碼如下：㈢　物品領(lǐng)取表單領(lǐng)取時，領(lǐng)取人須寫明日期、領(lǐng)取物品名稱及規(guī)格、數(shù)量、用途等項，嚴(yán)格控制辦公用品的領(lǐng)取數(shù)量和次數(shù)，保證辦公需要。 WHERE ALLTRIM(leibie)==cleibie AND ALLTRIM(pinpai)==cpinpai into ARRAY cdanjia*根據(jù)領(lǐng)取庫，自動計算剩余數(shù)量UPDATE jiku set shuliang=shuliangcshuliang。 order by bumen INTO dbf c:\newsoft\myreport。 order by bumen INTO dbf c:\newsoft\myreport。 order by bumen INTO dbf c:\newsoft\myreport。 order by bumen INTO dbf c:\newsoft\myreport。)月報表生成表單該表單包括了4個標(biāo)簽、1個組合框、2個命令按鈕組；然后對各表單控件進(jìn)行設(shè)置，將2個命令按鈕的“caption”屬性設(shè)置為“確定”和“取消”，對“確認(rèn)”命令按鈕的“click”事件編程： IF NOT USED(lingquview) SELECT 0 USE lingquviewENDIFSELECT lingquviewcyue=ALLTRIM()LOCATE FOR year(riqi)=val(alltrim()) AND month(riqi)=val(cyue)IF FOUND() SELECT * from lingquview。 WHERE year(riqi)=val(alltrim()) AND month(riqi)=val(cyue) report form c:\newsoft\myreport prevELSE MESSAGEBOX(對不起，沒有此記錄！)ENDIF對“取消”命令按鈕的“click”事件編程：五、報表設(shè)計 報表是數(shù)據(jù)庫管理系統(tǒng)中最常使用的查看數(shù)據(jù)的手段之一。 報表設(shè)計是應(yīng)用程序設(shè)計中非常重要的工作，報表設(shè)計主要分兩個步驟來完成：第一步，用報表設(shè)計器設(shè)計報表；第二步，編程調(diào)用報表。本系統(tǒng)報表界面如下圖：六、菜單設(shè)計 Visual FoxPro “菜單設(shè)計器”可以簡便、快捷地創(chuàng)建菜單，提高應(yīng)用程序的質(zhì)量。主菜單用來控制系統(tǒng)中的各項操作，從開始的總體結(jié)構(gòu)圖，我們不難得出應(yīng)用程序的菜單，如下圖： 系統(tǒng)數(shù)據(jù)處理報表生成用戶管理幫助 初始化系統(tǒng)新購物品錄入 年報表修改口令幫助主題 物品類別添加領(lǐng)取物品錄入 季報表用戶添加自述文件物品類別修改 月報表關(guān)于退出系統(tǒng)本系統(tǒng)采用菜單作為初始化界面，并設(shè)置一個主文件來調(diào)用該菜單程序；也可以采用表單作為初始界面，則需要在表單上設(shè)置若干個按鈕來表示各子系統(tǒng)的功能；菜單中的各項功能，要對它進(jìn)行設(shè)計和編碼才能實現(xiàn)。（5） 在菜單設(shè)計器對話框中分別將主菜單項的名稱輸入到“菜單名稱”文本框中。在Visual FoxPro 。但使用主程序顯得更規(guī)范。 the effort to be even formally polite nearly strangled him. Even then the inspector was not brisk. He dismounted in a leisurely fashion, and strolled into the house, chatting about the weather. Father, red in the face, handed him over to Mary who took him along to mother39。d for an unconscionable time while he examined the baby in minutest detail. At last, however, he emerged, with an expressionless face. In the littleused sittingroom he sat down at the table and fussed for a while about getting a good point on his quill. At last he took a form from his pouch, and in a slow, deliberate hand wrote that he officially found the child to be a true female human being, free from any detectable form of deviation. He regarded that thoughtfully for some moments, as though not perfectly satisfied. He let his hand hesitate before he actually dated and signed it, then he sanded it carefully, and handed it to my enraged father, still with a faint air of uncertainty. He had, of course, no real doubt in his mind, or he would have called for another opinion。s existence could be admitted. I was formally told that I had a new sister, and presently I was taken to see her where she lay in a crib beside my mother39。 she did appear to be as normal as a newborn baby ever looks. ...While we were taking turns to look at her somebody started to ring the stable bell in the customary way. Everyone on the farm stopped work, and very soon we were all assembled in the kitchen for prayers of thanksgiving.Two, or it may have been three, days after Petra was born I happened upon a piece of my family39。 bedroom where my mother still lay in bed. It was a matter of chance, and strategy, too. It was the latest place that I had found to stay hidden awhile after the midday meal until the coast was clear and I could slip away without being given an afternoon job。 she did not have a somewhat damping manner of listening only to correct.I edged over carefully on stockinged feet to the window, watched her tether the horse, pick a white bundle out of the trap, and carry it into the house. She cannot have met anyone, for a few seconds later her steps passed the door, and the latch of the next room clicked.39。 my mother39。 So soon! You don39。ve brought a tiny baby all that way!39。I know,39。s voice, accepting the reproof in my mother39。but I had to, Emily. I had to. I heard your baby had e early, so I — oh, there she is! Oh, she39。s a lovely baby.39。 Mine39。t she? Isn39。There was a certain amount of mutual congratulation which did not interest me a lot. I didn39。 I am glad, my dear. Henry must be delighted.39。Of course he is,39。She was born a week ago. I didn39。 She paused, and then added with a casualness which somehow failed to be casual: 39。ve got the certificate for her?39。 Of course.39。s tone was sharp, ready for offence. I knew the expression which went with the tone. When she spoke again there was a disturbing quality in her voice.39。 she demanded sharply. 39。My aunt made no reply, but I thought I caught the sound of a suppressed sob. My mother said coldly, forcibly:39。For some seconds I could hear nothing but another sob or two from my aunt. Then she said, un