【正文】 金額 貨幣 16 進(jìn)貨日期 日期 16 采購(gòu)員 文本 20 外鍵 備注 備注 20 建立項(xiàng)目項(xiàng)目管理器是visual foxpro 提供的強(qiáng)大的管理工具，它負(fù)責(zé)管理和組織本系統(tǒng)所需要的數(shù)據(jù)庫(kù)、菜單、報(bào)表、表單、程序以及一些其他的文件，它是系統(tǒng)中文件、數(shù)據(jù)、文檔和對(duì)象的集合。項(xiàng)目管理器共有6個(gè)選項(xiàng)卡，分別是【全部】選項(xiàng)卡、【數(shù)據(jù)】選項(xiàng)卡、【文檔】選項(xiàng)卡、【類(lèi)】選項(xiàng)卡、【代碼】選項(xiàng)卡和【其他】選項(xiàng)卡。每個(gè)選項(xiàng)卡按一定的順序和邏輯關(guān)系管理著項(xiàng)目中的文件。通過(guò)項(xiàng)目管理器，用戶(hù)可以快速、方便地存取存放在項(xiàng)目文件中的任何對(duì)象。建立項(xiàng)目管理器的步驟如下所示。（1）啟動(dòng)visual foxpro ，進(jìn)入程序主界面。單擊菜單欄的【文件】 【新建】命令，在彈出的【新建】對(duì)話框中選擇【項(xiàng)目】單選按鈕。（2） 單擊【新建文件】按鈕。在彈出的【創(chuàng)建】對(duì)話框中設(shè)置一個(gè)文件名，文件名設(shè)為大學(xué)生成績(jī)查詢(xún)系統(tǒng)，單擊【保存】按鈕后即可彈出【項(xiàng)目管理器】對(duì)話框，這個(gè)新項(xiàng)目就在項(xiàng)目管理器中建立起來(lái)了。3 建立數(shù)據(jù)庫(kù)和數(shù)據(jù)庫(kù)表 建立數(shù)據(jù)庫(kù)首先創(chuàng)建數(shù)據(jù)庫(kù)，在項(xiàng)目管理器中創(chuàng)建數(shù)據(jù)庫(kù)，保存數(shù)據(jù)庫(kù)名為【】。 建立數(shù)據(jù)表我們要在數(shù)據(jù)庫(kù)中建立表。在數(shù)據(jù)庫(kù)設(shè)計(jì)器中建立商品入庫(kù)出庫(kù)輸入表、商品信息表、商品價(jià)格表為了保持表中數(shù)據(jù)的一致性，需要在各數(shù)據(jù)表之間建立參照完整性。當(dāng)插入、刪除或者修改表中記錄時(shí)，就會(huì)參照引用相關(guān)聯(lián)的另外一個(gè)表中的數(shù)據(jù)。關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)一個(gè)重要的功能就是參照完整性。必須先建立表之間的關(guān)系的，才能使用參照完整性。4 表單的設(shè)計(jì) 登錄表單設(shè)計(jì)登錄表單提供銷(xiāo)售者登錄接口。銷(xiāo)售者只有輸入了正確的用戶(hù)編號(hào)和密碼，才能登錄進(jìn)入系統(tǒng)。該表單使用基本情況表。 商品入庫(kù)出庫(kù)輸入表單設(shè)計(jì) 表單（輸入入庫(kù)單據(jù)）實(shí)現(xiàn)功能：可通過(guò)這個(gè)表單將商品的相關(guān)信息輸入，例如編號(hào)、單價(jià)、數(shù)量等， 起到一個(gè)存儲(chǔ)信息的作用，方便以后查詢(xún)、總結(jié)等工作需要。實(shí)現(xiàn)過(guò)程：實(shí)現(xiàn)過(guò)程：① 單擊“文件”下拉菜單，再點(diǎn)擊“新建”，選擇“表單”，再單擊“新建文件”后開(kāi)始表單輸入入庫(kù)單據(jù)的設(shè)計(jì)。設(shè)計(jì)界面如下：② ：“輸入”按鈕代碼e=ntom(val(alltrim()))f=alltrim()g=alltrim()h=val(alltrim())i=ctod(alltrim())if empty(a).(b).(c).(d).(e).(f).(g).(h).(i) messagebox(請(qǐng)輸入完整信息) returnendifinsert into 表\入庫(kù)單。(入庫(kù)編號(hào),商品型號(hào),計(jì)量單位,單價(jià),金額,生產(chǎn)廠商,倉(cāng)管員,數(shù)量,出廠日期) value(a,b,c,d,e,f,g,h,i)z=0scan for =b z=1endscanuseif z=1 update 商品庫(kù)存表 set 數(shù)量=數(shù)量+h where 商品型號(hào)=b messagebox(輸入入庫(kù)單據(jù)成功！,64,系統(tǒng)提示) returnelse insert into 表\商品庫(kù)存表。 (商品型號(hào),數(shù)量) value (b,h) insert into 表\商品資料單。 (商品型號(hào)) value (b) messagebox(你所輸入的是新商品,請(qǐng)輸入商品名稱(chēng)) use do form 表單\輸入新商品名 returnendif“取消”按鈕代碼實(shí)現(xiàn)功能：可通過(guò)這個(gè)表單將出庫(kù)的商品相關(guān)信息輸入，例如編號(hào)、單價(jià)、數(shù)量等， 起到一個(gè)存儲(chǔ)信息的作用，方便以后查詢(xún)，總結(jié)等工作需要。實(shí)現(xiàn)過(guò)程：① 單擊“文件”下拉菜單，再點(diǎn)擊“新建”，選擇“表單”，再單擊“新建文件”后開(kāi)始表單輸入入庫(kù)單據(jù)的設(shè)計(jì)。設(shè)計(jì)界面如下：“輸入”按鈕代碼a=alltrim()b=alltrim()c=alltrim()d=ntom(val(alltrim()))e=ntom(val(alltrim()))f=alltrim()g=alltrim()h=val(alltrim())i=ctod(alltrim())if empty(a).(b).(c).(d).(e).(f).(g).(h).(i) messagebox(請(qǐng)輸入完整信息) returnendifz=0x=0use 表\商品庫(kù)存表scan for =bz=1x=數(shù)量hendscanif z=0messagebox(庫(kù)存不足,無(wú)法出庫(kù)!)elseif x0 messagebox(庫(kù)存不足,無(wú)法出庫(kù)!) else update 表\商品庫(kù)存表 set 數(shù)量=數(shù)量h where 商品型號(hào)=b insert into 出庫(kù)單。 (出庫(kù)編號(hào),商品型號(hào),計(jì)量單位,單價(jià),金額,生產(chǎn)廠商,倉(cāng)管員,數(shù)量,出庫(kù)日期) value(a,b,c,d,e,f,g,h,i) messagebox(輸入出庫(kù)單據(jù)成功！,64,系統(tǒng)提示)endifendif取消按鈕代碼 商品價(jià)格查詢(xún)表單設(shè)計(jì)項(xiàng)目詳細(xì)設(shè)計(jì)查詢(xún)模塊：出庫(kù)查詢(xún)、入庫(kù)查詢(xún)、庫(kù)存查詢(xún)、商品資料查詢(xún)例：入庫(kù)查詢(xún)表單界面操作說(shuō)明：按鈕控制策略：組合框內(nèi)有9個(gè)選項(xiàng)，編輯框?yàn)榭?，查?xún)按鈕及取消按鈕一直為亮。查詢(xún)處理過(guò)程：此查詢(xún)?yōu)槟：樵?xún)，按下組合框內(nèi)的選項(xiàng)，在編輯框內(nèi)輸入內(nèi)容，點(diǎn)擊查詢(xún)，屏幕上將顯示一系列與輸入內(nèi)容相關(guān)的記錄。取消后將返回原界面。注意：出廠時(shí)間的輸入需要符合格式才能正確查詢(xún)，否則將出現(xiàn)運(yùn)行錯(cuò)誤的提醒。項(xiàng)目具體實(shí)現(xiàn)例：入庫(kù)查詢(xún)表單本表單用于查詢(xún)?nèi)霂?kù)商品情況。在組合框中選擇要查詢(xún)的條件，如入庫(kù)編號(hào)、商品型號(hào)等，在文本框中輸入信息，按查詢(xún)按鈕，即可顯示出相關(guān)信息。如若輸入信息有誤則會(huì)有信息“數(shù)據(jù)庫(kù)中不存在您所要查詢(xún)的記錄”提示。而按取消鍵則返回到主菜單。在表單上設(shè)計(jì)如下事件過(guò)程：新建表單form1，并將其caption屬性值設(shè)為“入庫(kù)查詢(xún)”，width屬性值設(shè)置為290，height屬性值設(shè)置為175，.，并將其保存為“”。向表單添加一個(gè)grid控件，并將其width屬性值設(shè)置為290，height屬性值設(shè)置為100。在grid控件的下方添加一個(gè)組合框控件Combo1和一個(gè)文本框控件， 并將組合框控件的RowSourceType屬性值設(shè)置為“8結(jié)構(gòu)”，RowSource屬性值設(shè)置為“入庫(kù)單”。在文本框的右側(cè)再添加兩個(gè)命令按鈕mand1和mand2，并將mand1和mand2的caption屬性