超市零售管理系統(tǒng)總體設(shè)計

1、HYPERLINK N:整理后http：shu.nN:整理后http：shu.nHYPERLINK N:整理后ttp:wwwcN:整理后ttp:wwwc摘 要21世紀，超市的競爭也進入到了一個全新的領(lǐng)域,競爭已不再是規(guī)模的競爭，而是技術(shù)的競爭、治理的競爭、人才的競爭。技術(shù)的提升和治理的升級是超市業(yè)的競爭核心。零售領(lǐng)域目前呈多元進展趨勢,多種業(yè)態(tài):超市、倉儲店、便利店、特許加盟店、專賣店、貨倉等相互并存。如何在激烈的競爭中擴大銷售額、降低經(jīng)營成本、擴大經(jīng)營規(guī)模，成為超市營業(yè)者努力追求的目標。此次我使用Vsual FoxPro .編程,實現(xiàn)了一個簡易的超市零售治理系統(tǒng)。本系統(tǒng)通過對超市零售治理系統(tǒng)

2、進行需求分析和設(shè)計逐步將該系統(tǒng)的實現(xiàn)過程呈現(xiàn)出來。該系統(tǒng)能夠?qū)Τ猩唐返娜霂旌统鰩爝M行登記，同時還能對商品信息和價格進行查詢。關(guān)鍵詞:數(shù)據(jù)庫;Visua oPro 6.;零售；查詢目 錄 TOC 13 z u HYPERLINK N:整理后l1 前言PAGEEF _Toc29578h1 HYPRINK l _oc29857802 1. 作業(yè)背景 AGRF Toc29801HYPERLINK N:整理后1. 選題講明 PGEREF _To2985703hYERLIK l _Toc2857884 1.2.1 差不多思路 PAGRFoc9888 h 1HYPERLINK N:整理后l1.2. 作業(yè)目

3、標AERE _Toc295885 h 1 YELIN l_298578 .3 工作業(yè)績 PAGEF _T98578086 h HPRIN l _Toc2985708713.1要緊收獲 AGERF _To298578 h 2 RLI l oc29578088.3.2 自我評定 PEREF _Toc29857808 2HYPERLINK N:整理后2 系統(tǒng)總體設(shè)計 AGER Toc857889 3 HPERLINKl _To2957090 1系統(tǒng)結(jié)構(gòu)圖 PAGF _Tc8090 h HYPRLN l _To298789.2 數(shù)據(jù)庫總體設(shè)計 PAGEREF _o287891 h 3 PERINK l

4、 Toc987802 .3 需求分析 GRF _oc29857892h 3HYPERLINK N:整理后24 所需的數(shù)據(jù)表 PGERF _Toc85793 h HYERLIN l _Toc29580942.4.1 所需的數(shù)據(jù)表結(jié)構(gòu) PERE Tc29857094hHYPERLINK N:整理后.5 建立項目 PAGEREF _c2985785 h 5 HYRLINl _oc2985096 建立數(shù)據(jù)庫和數(shù)據(jù)庫表 PGREF_Tc29578096 7HYPRLINKl _To29578097 3. 建立數(shù)據(jù)庫 PAGERE To2987897 h 7HYPERLINK N:整理后l3.2 建立數(shù)據(jù)

5、表 PGERE _To2857098 7HYPERLINK N:整理后l4 表單的設(shè)計 AEREF_o2985099h HYERLINK l_Tc98578100 . 登錄表單設(shè)計 PGREF _oc9881 h8 HYPERLIN l _c9857811 4.2 商品入庫出庫輸入表單設(shè)計AGEEF_Toc9851 8ERLIN l _Toc985810 42.1商品入庫表單設(shè)計 PAGREF Toc298578102 h 8 HYPLINK l _Toc29857103 4.22商品出庫輸入表單設(shè)計 PAEREF_o2988103 h 0 HYPLINK l _Toc2878104 43 商

6、品價格查詢表單設(shè)計 PAGREF To2578104 h 12HYPERLINK N:整理后l4.查詢表單設(shè)計 PAGEREF _Tc28578105 h 2HYPERLINK N:整理后l4.3.2信息修改表單AEEF_To858106 1HYPERLINK N:整理后l.4 銷售表單設(shè)計AGEREF Toc2985707 h YPERLNK l _To29857108 4.4.1銷售價格信息表單設(shè)計 AEREF _c28108 hHYPEINK l_Toc8578109 .2表單銷售匯總表設(shè)計 PAGEEF _oc985789 27HYPERLINK N:整理后l5 主程序和系統(tǒng)連編 PA

7、GEEF _Tc9878110 h30HYPERLINK N:整理后 l _Toc29581115.1 主程序設(shè)計 PAGERE c29571 h3 HYPERLINK l_Toc287112 5.系統(tǒng)連編 PAEE Toc957812 h 31HYPERLINK N:整理后結(jié)束語 PGER _c878113 32HYPERLIN l _Toc2957114 參考文獻 AGERF Toc28581 h 31 前言1.1 作業(yè)背景本文依照數(shù)據(jù)庫應用與開發(fā)課程要求而做。課程作業(yè)要求如下:用數(shù)據(jù)庫治理系統(tǒng)開發(fā)工具(sual Foxro）開發(fā)一個有用的小型治理信息系統(tǒng)。依照課程設(shè)計時刻選擇適當規(guī)模大小

8、的設(shè)計題目，按照系統(tǒng)開發(fā)的流程及方法,踏實地開展課程設(shè)計活動。課程設(shè)計活動中，撰寫相關(guān)技術(shù)文檔。最后提交詳細的課程設(shè)計報告。開發(fā)出可上機運行的治理信息系統(tǒng),通過上機檢查。1.2 選題講明要在有限的兩周時刻設(shè)計出一個小型的超市零售治理系統(tǒng),考慮到我們知識面和視野以及信息系統(tǒng)的價值性,我決定設(shè)計一個日常生活中比較常見的超市零售治理系統(tǒng)。那個系統(tǒng)能夠?qū)Υ髮W生成績進行查詢和治理,比較貼近我們大學生的實際,具有較強的可行性、實踐性和價值性。1.2 差不多思路設(shè)計該系統(tǒng)時,采納自底向上的設(shè)計方法。首先設(shè)計數(shù)據(jù)結(jié)構(gòu),然后設(shè)計表單、菜單、報表，最后設(shè)計主程序。12.2 作業(yè)目標要實現(xiàn)對超市商品信息和銷售價格的

9、治理,應該有庫存治理和價格查詢功能。要退出系統(tǒng)，需要有退出功能。假如想打印價格表,應該提供打印功能。因此超市使用本系統(tǒng)，能夠迅速提升超市的治理水平，降低經(jīng)營成本,提高效益，增強超市擴張力,提供有效的技術(shù)保障。13 工作業(yè)績 31要緊收獲通過這學期對數(shù)據(jù)庫這門課的學習，我對數(shù)據(jù)庫有了差不多的了解。學會了如何樣制作表單,菜單等內(nèi)容,這對以后的學習工作有了專門重大的關(guān)心。我通過這兩周的課程設(shè)計:課程設(shè)計的選題，構(gòu)思，討論,分配任務(wù)，設(shè)計程序等工作，其中遇到了專門多的困難,然而沒有放棄,解決問題，排除困難，這才一步步完成每個任務(wù)，還使我掌握了使用各種關(guān)系數(shù)據(jù)庫為后臺數(shù)據(jù)庫設(shè)計一個信息治理系統(tǒng)?？傊?這

10、次課程設(shè)計受益匪淺，不僅鍛煉了我做事堅持不懈的心態(tài)，也慢慢地培養(yǎng)了我不明白就查書的好適應，我的自學能力也有了一定的提高，我更明白了搞計算機程序設(shè)計,要學到真正的技術(shù)完全要靠自己，在課堂上只能學到最差不多的東西，但這最差不多的東西也一定要學好。1.3. 自我評定 優(yōu) 良 中及格 不及格2 系統(tǒng)總體設(shè)計2.1系統(tǒng)結(jié)構(gòu)圖開發(fā)該系統(tǒng)前,先要有一個清晰的系統(tǒng)總體功能圖。在超市零售治理系統(tǒng)中,由項目治理器統(tǒng)一治理系統(tǒng)中的表單、數(shù)據(jù)表、程序、報表以及主菜單。系統(tǒng)的整體結(jié)構(gòu)是先運行主程序。表單和報表中的數(shù)據(jù)來自數(shù)據(jù)表中的數(shù)據(jù)。如圖2.圖21該系統(tǒng)應包括如下幾個功能模塊，功能模塊結(jié)構(gòu)如下圖所示（1）輸入單據(jù):出

11、庫、入庫、產(chǎn)成品清單(）查詢:出庫查詢、入庫查詢、產(chǎn)成品查詢()銷售：銷售費用、銷售退款、進/退貨(4)打印報表:入庫報表、出庫報表。2 數(shù)據(jù)庫總體設(shè)計進行數(shù)據(jù)庫總體設(shè)計首先要進行需求分析,由需求確定系統(tǒng)所需要的數(shù)據(jù)表，然后確定表所需的字段,最后確定各個表之間的關(guān)聯(lián)。23 需求分析超市銷售治理系統(tǒng)要緊包括商品入庫出庫情況登記、商品信息及價格查詢和銷售業(yè)績匯總等功能。每個功能都要通過表單和報表來操作數(shù)據(jù)表中的數(shù)據(jù)，每個數(shù)據(jù)表存儲了本系統(tǒng)所需要的數(shù)據(jù)信息。因此在進行數(shù)據(jù)庫設(shè)計之前,要分析出系統(tǒng)所需要的數(shù)據(jù)表。.4 所需的數(shù)據(jù)表分析超市零售治理系統(tǒng)的情況,首先需要了解商品的差不多信息，即需要差不多狀

12、況表。用戶需要查詢商品的生產(chǎn)廠商和價格等信息,因此需要的數(shù)據(jù)表有商品入庫表、商品廠商信息表和銷售表等。2.4.1 所需的數(shù)據(jù)表結(jié)構(gòu) 表1：入庫單 字段名 數(shù)據(jù)類型 長度（字節(jié))備注 入庫編號文本 20主鍵 商品型號 文本 2 計量單位 文本 單價 貨幣 16 數(shù)量 數(shù)字 金額 貨幣 6 生產(chǎn)廠商 文本 0外鍵 出廠日期日期16 倉管員 文本 20 外鍵表2：廠商信息表 字段名 數(shù)據(jù)類型 長度(字節(jié))備注 廠商編號 文本 20 主鍵 廠商名稱 文本 50 廠商地址 文本 5 聯(lián)系電話 數(shù)字 法人地表 文本 20 表：銷售單 字段名 數(shù)據(jù)類型 長度(字節(jié)） 備注 單據(jù)編號文本 20 主鍵 商品型號

13、 文本 2 計量單位文本 8 單價 貨幣 數(shù)量 數(shù)字 金額 貨幣6 生產(chǎn)廠商 文本50外鍵 銷售日期 日期 6 營業(yè)員 文本 20 外鍵 表：進貨單 字段名 數(shù)據(jù)類型 長度（字節(jié)）備注 單據(jù)編號 文本 20主鍵 廠商編號 文本 外鍵 進貨廠商 文本50 商品型號 文本 計量單位 文本 8 單價貨幣 16 數(shù)量數(shù)字 1 金額貨幣 16 進貨日期 日期 采購員 文本 20外鍵 備注 備注 20 2.5 建立項目項目治理器是val foxro 提供的強大的治理工具，它負責治理和組織本系統(tǒng)所需要的數(shù)據(jù)庫、菜單、報表、表單、程序以及一些其他的文件，它是系統(tǒng)中文件、數(shù)據(jù)、文檔和對象的集合。項目治理器共有個

14、選項卡,分不是【全部】選項卡、【數(shù)據(jù)】選項卡、【文檔】選項卡、【類】選項卡、【代碼】選項卡和【其他】選項卡。每個選項卡按一定的順序和邏輯關(guān)系治理著項目中的文件。項目文件以擴展名.pjx和pjt進行保存。通過項目治理器,用戶能夠快速、方便地存取存放在項目文件中的任何對象。建立項目治理器的步驟如下所示。（1)啟動visual fopo,進入程序主界面。單擊菜單欄的【文件】 【新建】命令，在彈出的【新建】對話框中選擇【項目】單選按鈕,如圖2.2。圖2.2單擊【新建文件】按鈕。在彈出的【創(chuàng)建】對話框中設(shè)置一個文件名,文件名設(shè)為大學生成績查詢系統(tǒng)，單擊【保存】按鈕后即可彈出【項目治理器】對話框，那個新項

15、目就在項目治理器中建立起來了,如圖23。圖33 建立數(shù)據(jù)庫和數(shù)據(jù)庫表3. 建立數(shù)據(jù)庫首先創(chuàng)建數(shù)據(jù)庫,在項目治理器中創(chuàng)建數(shù)據(jù)庫，保存數(shù)據(jù)庫名為【銷售治理.c】。3.2 建立數(shù)據(jù)表我們要在數(shù)據(jù)庫中建立表。在數(shù)據(jù)庫設(shè)計器中建立商品入庫出庫輸入表、商品信息表、商品價格表為了保持表中數(shù)據(jù)的一致性,需要在各數(shù)據(jù)表之間建立參照完整性。當插入、刪除或者修改表中記錄時,就會參照引用相關(guān)聯(lián)的另外一個表中的數(shù)據(jù)。關(guān)系數(shù)據(jù)庫治理系統(tǒng)一個重要的功能確實是參照完整性。必須先建立表之間的關(guān)系的,才能使用參照完整性。4 表單的設(shè)計4.1 登錄表單設(shè)計圖.1登錄表單提供銷售者登錄接口。銷售者只有輸入了正確的用戶編號和密碼,才能

16、登錄進入系統(tǒng)。該表單使用差不多情況表,其界面如圖4.所示。4.2 商品入庫出庫輸入表單設(shè)計42.1商品入庫表單設(shè)計 、表單（輸入入庫單據(jù))實現(xiàn)功能：可通過那個表單將商品的相關(guān)信息輸入，例如編號、單價、數(shù)量等, 起到一個存儲信息的作用，方便以后查詢、總結(jié)等工作需要。實現(xiàn)過程：實現(xiàn)過程:單擊“文件”下拉菜單,再點擊“新建”,選擇“表單”，再單擊“新建文件”后開始表單輸入入庫單據(jù)的設(shè)計。如圖.2圖4.2設(shè)計界面如下:入入庫單據(jù)的設(shè)計的差不多結(jié)構(gòu)如圖.：圖43“輸入”按鈕代碼=ntm(vl(atri(iform.tex5.aue)=allrim（thisfr.Tt6.alue)g=altrim(hsf

17、orm.tex7.vue)h=vl(trim(thfrm.tt8.valu)i=ctd(allim(thisform.Text9.vau)）if mpty（a).o.epy(）orempty().or.epy(d）.or.epty(e)rempty(）or.empty().orempt(h)o.py（i)messgebx(請輸入完整信息) rturnndifinrt ino表入庫單；(入庫編號,商品型號,計量單位，單價，金額，生產(chǎn)廠商,倉管員,數(shù)量，出廠日期) valu(a，b,c,，f,g，h，i）z0can for 商品庫存表.商品型號=b =nscnsef z1updat 商品庫存表 s

18、 數(shù)量=數(shù)量+ whee商品型號=mesagebo(輸入入庫單據(jù)成功！,64,系統(tǒng)提示) eturnseine ito 表商品庫存表; (商品型號,數(shù)量) vale (b,h） iser into 表商品資料單;(商品型號) value () messgeox(你所輸入的是新商品,請輸入商品名稱) use form 表單輸入新商品名retrnedif“取消”按鈕代碼Thiorm.reese.2.2商品出庫輸入表單設(shè)計實現(xiàn)功能:可通過那個表單將出庫的商品相關(guān)信息輸入，例如編號、單價、數(shù)量等， 起到一個存儲信息的作用，方便以后查詢,總結(jié)等工作需要。實現(xiàn)過程:單擊“文件”下拉菜單，再點擊“新建”，選

19、擇“表單”,再單擊“新建文件”后開始表單輸入入庫單據(jù)的設(shè)計。設(shè)計界面如下：輸入入庫單據(jù)的設(shè)計表單如圖4.4圖4.“輸入”按鈕代碼aatrim(thisrm.tx1.vu)b=altrim(thisorm.Tet2.valu）c=lltrim（thisfr.tet3vlue)=nto（val(llti(thisrm.xt4.valu)entom(va（alltrim（thsform.tet5.alue)f=ltrim(thsorm.Txtva)g=alltrim(tsfom.tex7valu)h=val(alltim(thormtext8value)）ito(alrm(thiso.ext9val

20、u)if empty(a).or.empt(）.or.epty（).py（d）epy(e).or.empty(f).or.emty（g）.or.mpty(h）epty(i) messagox(請輸入完整信息) reurnend0 x0use 表商品庫存表sca fo 商品庫存表商品型號bz=1x=數(shù)量endscaif z=0essabox(庫存不足,無法出庫！)leif x mesebo(庫存不足,無法出庫?。?else pate 表商品庫存表set 數(shù)量=數(shù)量-h hre商品型號= insert into出庫單; (出庫編號，商品型號,計量單位，單價,金額,生產(chǎn)廠商，倉管員，數(shù)量,出庫日期)

21、vlue(a，b,c,d,e，f,g,h,i) esgeo(輸入出庫單據(jù)成功！，4,系統(tǒng)提示)ifendif取消按鈕代碼iform.rase.3 商品價格查詢表單設(shè)計4.3.1查詢表單設(shè)計1、項目詳細設(shè)計查詢模塊：出庫查詢、入庫查詢、庫存查詢、商品資料查詢例：入庫查詢表單如圖5圖4.2、界面操作講明：按鈕操縱策略:組合框內(nèi)有9個選項，編輯框為空，查詢按鈕及取消按鈕一直為亮。查詢處理過程:此查詢?yōu)槟：樵?，按下組合框內(nèi)的選項，在編輯框內(nèi)輸入內(nèi)容,點擊查詢,屏幕上將顯示一系列與輸入內(nèi)容相關(guān)的記錄。取消后將返回原界面。注意:出廠時刻的輸入需要符合格式才能正確查詢，否則將出現(xiàn)運行錯誤的提醒。3、項目具

22、體實現(xiàn)例:入庫查詢表單本表單用于查詢?nèi)霂焐唐非闆r。在組合框中選擇要查詢的條件，如入庫編號、商品型號等,在文本框中輸入信息,按查詢按鈕,即可顯示出相關(guān)信息。如若輸入信息有誤則會有信息“數(shù)據(jù)庫中不存在您所要查詢的記錄”提示。而按取消鍵則返回到主菜單。在表單上設(shè)計如下事件過程:、新建表單form1，并將其aption屬性值設(shè)為“入庫查詢”,width屬性值設(shè)置為290,heigt屬性值設(shè)置為175,AuoCeter屬性值設(shè)置為.，并將其保存為“入庫查詢.sc”。2、向表單添加一個gi控件，并將其dth屬性值設(shè)置為290,heigh屬性值設(shè)置為1。、在grd控件的下方添加一個組合框控件Comb1和一個

23、文本框控件, 并將組合框控件的RowSourcp屬性值設(shè)置為“8-結(jié)構(gòu)”,RowSu屬性值設(shè)置為“入庫單”。4、在文本框的右側(cè)再添加兩個命令按鈕commad1和commn，并將commnd1和comad2的caption屬性值分不設(shè)置為“查找”和“取消”。5、對表單上各控件的位置進行適當?shù)恼{(diào)整,調(diào)整后的表單設(shè)計器如圖4.6圖重點:（1)“查找”按鈕(command1） 的ic事件如下 :i emty(tisorm.Tet.vu)=.gotophiorm.omb1value=alltrim（thifom.Tet1vale）locee if =入庫編號 Slec*fro 入庫單 whee 入庫編號

24、 lkeb +% inoso bas sele bs c=rccut（) if 1 (圖“查詢”按鈕（comd）的click事件如下: use msgebox（數(shù)據(jù)庫中不存在您所要查詢的記錄,系統(tǒng)提示) thisrmcomand2clik() eturn endif edif if a商品型號 lt * frm 入庫單 hre 商品型號 ke b+% into cusor bas le bas c=ccount（） i 1 ue messgebox(數(shù)據(jù)庫中不存在您所要查詢的記錄,16，系統(tǒng)提示) d2.lck（) rtun eni nf if a計量單位 Slec * m 入庫單 here

25、計量單位 ik b+% no cursor ba selebs =recn() i cue mesagebx（數(shù)據(jù)庫中不存在您所要查詢的記錄,1，系統(tǒng)提示） thmand2click() reurn endifend f a=生產(chǎn)廠商 ect* fro 入庫單 whr 生產(chǎn)廠商 like +% itocrsor bs selebs ceccout() c us messgebx(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) thsformcomnd.cli() rtrn endif edi fa=倉管員 Selct * fom入庫單whr 倉管員 lkeb+into curor b sel

26、e bas c=rccout（) f1 us messgebox（數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) thifmand2lick() tur endif ndi if a=單價 b=nm(al(alltm(thisform.text1.alue）)） Select from入庫單whre 單價 =b ito crsor bas sl bas c=ccoun() f c1 e essagebx(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示） mand2ick() etun endf enifif a=金額 b=ntom(val(alltrim(thifor.tet1.vaue)

27、Select * from 入庫單 where金額 b no csr ba s c=reccoun（) if c1 use messagex（數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示） hsfrmcommand2.clck() reurn edi endif =數(shù)量 val(alltrim(thisfomtex1.vle) Select * from 入庫單wher數(shù)量 =b nto curso as selebas crnt() i 1 se messageox(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) thisformommand2click() ren endif edf

28、if a=出廠日期 b=ct(allti(tsfo.text1.valu) Seec * frm 入庫單 whee 出廠日期 =binocr bs selebas c=reccunt（) if c1 ue ssabox(數(shù)據(jù)庫中不存在您所要查詢的記錄，16,系統(tǒng)提示) hisformcomm2.lick() reurn endif endif ih hisform.gd入庫單 .idt=58 .heght=200 .left=10 .recrdsourcebas .deetmrk=.f. .visible=.t. .eadnl=t.ColumnCut .olumn1.HaerCaptin=入庫

29、編號 .olun1Heaer1BackCoor=RB(55,25，19) .Colun2.Heade.BcCoo=RG（25,25,190) .Coumn2.Header1.aption=商品型號 .Coumn3Her1.BackClor=GB(255,25，10) Colmn.Hader1.aton=計量單位 .Colmn.eade.BackCl=RGB(5,25，190） .Colum4.Header.Caption=單價 .Column5.eader.Bckolor=GB(25，25,90） .Column.Hader1.Capin=數(shù)量 .Column6.eader.cCor=RB（2

30、55,255，10) .Colmn6.er1.Capton=金額 .Clmn7.Hade.Bakolr=GB(2,255，10) .Colun7.eade1.Cption=生產(chǎn)廠商 .Clumn8.Header1.Bckoor=RB(25，5,19) .Coumn8.HeaderCapton出廠日期 .Colun9.Hader1akColor=G(25,55,10) .Coum.Headerati=倉管員 .Colun1with=0 Colum2.widh=8 Coumn3width=0 .Cln4.width=8 .Cou.wdth .Column6.width=80 .Colun7wid=

31、0 omn8.idth=0 .Column9width80endwithto.gr入庫單.Seall(ynicaCoor,RGB(24,225，25),Col） tisform.gd入庫單.stfocuselse mesaebo(請輸入要查找的內(nèi)容！，1,系統(tǒng)提示) sfrmText1.vle= thisfrm.Text.Setfcusnf取消”按鈕（cmmnd2)的cick事件如下：Thiom.rlease下圖為查詢模塊其余的出庫查詢、庫存查詢和商品資料查詢的界面設(shè)計，其制作過程與入庫查詢相似。如圖47和48圖7圖4.8.2信息修改表單1、項目詳細設(shè)計修改模塊:出庫修改、入庫修改、商品資料修

32、改例：入庫修改 如圖49圖42、界面操作講明：按鈕操縱策略:查找方式組合框共有個選項,查找內(nèi)容為空，查找、修改、取消按鈕一直為亮。修改處理過程:需要修改時,在組合框中選擇要查找的條件,在文本框中輸入相應信息(輸入信息要正確,否則系統(tǒng)會出現(xiàn)錯誤提示），按按鈕查找，即下面的文本框中會出現(xiàn)所要查找的記錄的詳細信息(其中入庫編號是固定的)。對相應信息進行修改后,按按鈕修改，即可保存修改好的信息。、項目具體實現(xiàn)例：入庫修改本表單用于對入庫商品的相關(guān)信息進行修改。在組合框中選擇要查找的條件,在文本框中輸入相應信息（輸入信息要正確,否則系統(tǒng)會出現(xiàn)錯誤提示），按按鈕查找,即下面的文本框中會出現(xiàn)所要查找的記錄的

33、詳細信息（其中入庫編號是固定的)。對相應信息進行修改后，按按鈕修改，即可保存修改好的信息。按取消按鈕則返回主菜單。本表單使用的數(shù)據(jù)環(huán)境為入庫單和廠商信息表。在表單上設(shè)計如下事件過程:1、新建表單fom1,并將其cpto屬性設(shè)置為“入庫修改”，wdth屬性值設(shè)為20,eigt屬性值設(shè)為2，AutoCnter屬性值設(shè)為.t.,并將其保存為“入庫修改.scx”。2、向表單添加一個grid控件，將其readonl屬性設(shè)置為.t，其RecdoucType值采納默認的“1-不名”,在表單設(shè)計器中將其寬和高粗略調(diào)小一些即可,具體屬性值我們將在表單的int事件代碼中對其進行設(shè)置。3、在i控件下方添加兩個Lab

34、e控件,使其排成一行,并將其caption屬性依次設(shè)為“請選擇查找方式”和“請輸入要查找的內(nèi)容”。4、在abel控件下方添加一個組合框控件Com1及一個文本框控件Text1,文本框控件的屬性值采納默認即可,組合框控件ombo1的owSorceType屬性值設(shè)置為“值”,RwSoure屬性值設(shè)置為“入庫編號、商品型號、計量單位、單價、數(shù)量、金額、生產(chǎn)廠商、生產(chǎn)日期和倉管員”,如此在運行時我們能夠在該組合框中選擇要查詢的字段。5、在表單上添加3個命令按鈕oman1omand2和commad,將其cpton屬性依次設(shè)為“查找”、“修改”和“取消“。6、在命令按鈕下方添加9個l控件，將這9個ae控件排

35、成兩行，并將其cption屬性依次設(shè)置為“入庫編號”、“商品型號”和“計量單位”等等。7、在這兩行l(wèi)abel控件下方添加9個文本框控件,屬性值采納默認,并把這9個文本框排成兩行。8、調(diào)整表單上各個控件的位置,調(diào)整后的表單設(shè)計器如圖40重點：圖4.0“查找”按鈕(cmmand）的i事件如下：if mty(thior.ext1value）.f. go topatisform.mbo1valueb=alltim(hisfm.Text1.ale）c=.f if =入庫編號 loatfr 入庫編號=b feo()messaebo(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) gotop rturn

36、ele (圖） c=.t ndif enif if a=商品型號 locate or商品型號=b if eof() egbx(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) go to rturn es =. ndf endif ifa=計量單位 ocate fo 計量單位=b （) msagebox(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) go tp reurn es =. ndif endif f a=單價 b=ntom（val(lltim(thsformtext1.value) oae for 單價= if (） ssaebox(數(shù)據(jù)庫中不存在您所要查詢的記錄,1,系統(tǒng)提示）

37、 o top reun ele .t enif eniff a=數(shù)量 b=vl(altrim(thisform.text1alue）) lcate or 數(shù)量= i eof（) mesgebo(數(shù)據(jù)庫中不存在您所要查詢的記錄,，系統(tǒng)提示) g op reurn se c=.t. endf ndif if a金額 =ntom(v（lltm（thsfomtext1.au) oct for 金額 if (） messgeb(數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示) go top retur ls c= endif enff a=生產(chǎn)廠商 ocat or生產(chǎn)廠商=b ieof() messae

38、box(數(shù)據(jù)庫中不存在您所要查詢的記錄,16，系統(tǒng)提示) go top reurn ele . nif endif if=出廠日期 b=cto（va(alltri(thiform.text1value) oct or出廠日期=b f o（) messaebox（數(shù)據(jù)庫中不存在您所要查詢的記錄,16,系統(tǒng)提示） goop return se t. edif ndi i=倉管員 lateor倉管員=b f eo(） essgebx(數(shù)據(jù)庫中不存在您所要查詢的記錄,1,系統(tǒng)提示) top rtun ee c=.t endif edif fc tior.ext1.eale=.f. grecno() t

39、hfom.xt2visible=.t. thiform.ext2.nabld=.f. tisform.ext3.visibl.t. thisfrm.ext4.visible. tisfrm.Text5.iile=.t. thiorm.Text6.visibe=. thisfrm.Txt7.visile=.t. hisorm.Text8.sbl=.t hisfor.Text9.visble=.t. thsform.Tet0.visl.t. hifor.Label.visible.t. tiformlabel4.viib=t thisform.Labelisilet thirmael6.vibe.

40、t. thisfrm.ael7.vsib=.t. thisform.Label8.visible=. thiformLabel9.vsile=. thsfoLabe1.visible=.t. thisobe1.ible.t. tsforTex2.alue=入庫單.入庫編號 thifom.t.lue=入庫單商品型號 tsfor.et4.vale=入庫單.計量單位 thsformex5.value=入庫單.單價 thisform.ext6value=入庫單.數(shù)量 hsfomText7.valu=入庫單.金額 thisformText8.ale=入庫單生產(chǎn)廠商 hisforTet.value=入庫單

41、.出廠日期 thsorm.Tet1.alu=入庫單.倉管員 thiorm.r入庫單.setfocus thisnab=.f isfomand2.ealed=.t. endiesemessagebox（請輸入要查找的內(nèi)容!，16,系統(tǒng)提示) thisom.Te1.alue= thisform.Txt1Setfcusedfhisfrmrfreh“修改”按鈕的lick的事件如下:tisfo.tet3readonly.thiform.textreadony.f.thisortext5eaonly.f.thsform.txt6radnly=f.tiform.tet7.readol.f.thisr.tt8

42、.readoly=.thsfom.tex9.readony=.f.thirmtext0.reanly=.“取消”按鈕的cck的事件如下:thisorm.elase下圖4.11為修改模塊的其余的出庫修改和商品資料修改的界面設(shè)計,其制作過程與入庫修改的制作過程相似。圖4.114.4銷售表單設(shè)計4.1銷售價格信息表單設(shè)計表 銷售單 如圖.1、43、4.字段名數(shù)據(jù)類型長度(字節(jié)）備注單據(jù)編號文本20主鍵商品型號文本0計量單位文本8單價貨幣16數(shù)量數(shù)字16金額貨幣16生產(chǎn)廠商文本50外鍵銷售日期日期16營業(yè)員文本20外鍵圖.12圖4.3圖41表 退貨單 如圖4.5字段名數(shù)據(jù)類型長度(字節(jié)）備注單據(jù)編號文

43、本0主鍵商品型號文本0計量單位文本單價貨幣8數(shù)量數(shù)字16金額貨幣16退貨日期日期1圖4.154.4.表單銷售匯總表設(shè)計實現(xiàn)功能:商品正常銷售治理。銷售情況的明細記錄、各地收銀員收銀記錄以及交結(jié)帳情況等，實現(xiàn)對數(shù)據(jù)庫添加銷售記錄 。實現(xiàn)過程：單擊“文件”下拉菜單,再點擊“新建”，選擇“表單”,再單擊“新建文件”后開始表單輸入入庫單據(jù)的設(shè)計。如圖4.圖4.16設(shè)計界面如下:表單銷售情況記錄表的設(shè)計的差不多結(jié)構(gòu)如圖4.17：圖4.17數(shù)據(jù)環(huán)境(如圖4.1)圖418“輸入”按鈕代碼:對象：con 過程：clicka=altri（hiform.tt1.vue)balrim（thisformet2.ve）c=alrm（thiformtx3.vau）=ntm(vl(allti(thsfor.Text4.vle)e=nto（l(altrim(tifomtet5value)faltri（ifrm.Txt6.vaue）gllri(thisformte7.value)h=al(allt