【文章內(nèi)容簡(jiǎn)介】 第 16 頁(yè) 共 55 頁(yè) 入庫(kù) 現(xiàn)有庫(kù)存 出庫(kù) 還庫(kù) 部門需求 設(shè)備采購(gòu) 3． 3 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 在上面的實(shí)體以及實(shí)體之間的關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。 倉(cāng)庫(kù)管理系統(tǒng)數(shù)據(jù)庫(kù)中的各個(gè)表格的設(shè)計(jì)結(jié)果如下面的幾個(gè)表格所示。每個(gè)表格表示在數(shù)據(jù)庫(kù)中的一個(gè)表。 （ 1）設(shè)備代碼表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 設(shè)備名稱 字符型（ 50） 可為空 （ 2）設(shè)備入庫(kù)表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 入庫(kù)時(shí)間（主鍵） 日期型（ 8） 可為空 供應(yīng)商 字符型（ 50） 可為空 供應(yīng)商電話 字符型（ 15） 可為空 入庫(kù)數(shù)量 數(shù)值型（ 20） 可為空 價(jià)格 字符型（ 10） 可為空 采購(gòu)員 字符型（ 20） 可為空 （ 3）設(shè)備出庫(kù)表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 出庫(kù)時(shí)間（主鍵） 日期型（ 8） 可為空 使用部門 字符型（ 50） 可為空 倉(cāng)庫(kù)管理系統(tǒng) 第 17 頁(yè) 共 55 頁(yè) 出庫(kù)狀況 數(shù)值型（ 20） 可為空 經(jīng)手人 字 符型（ 20） 可為空 出庫(kù)數(shù)量 數(shù)值型（ 10） 不能為空 領(lǐng)取人 字符型（ 50） 可為空 用途 字符型（ 50） 可為空 （ 4）現(xiàn)有庫(kù)存表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 現(xiàn)有庫(kù)存 數(shù)值型（ 20） 可為空 最大庫(kù)存 數(shù)值型（ 20） 可為空 最小庫(kù)存 數(shù)值型（ 20） 可為空 總數(shù) 數(shù)值型（ 20） 可為空 （ 5）部門需求表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 部門名稱 字符型（ 20） 不能為空 需要數(shù)量 數(shù)值型（ 20） 可為空 需求開(kāi)始時(shí)間 日期型（ 8） 可為空 需求結(jié)束時(shí)間 日期型（ 8） 可為空 （ 6）設(shè)備還庫(kù)表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 還庫(kù)時(shí)間 日期型（ 8） 不能為空 倉(cāng)庫(kù)管理員 數(shù)值型（ 20） 可為空 歸還數(shù)量 數(shù)值型（ 20） 可為空 歸還人 字符型（ 10） 可為空 倉(cāng)庫(kù)管理系統(tǒng) 第 18 頁(yè) 共 55 頁(yè) （ 7）操作日志表： 列名 數(shù)據(jù)類型 可否為空 操作員 字符型（ 50） 不能為空 操作內(nèi)容 字符型（ 50） 不能為空 操作時(shí)間 日期型（ 8） 可為空 （ 8）設(shè)備采購(gòu)計(jì)劃表 ： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 現(xiàn)有庫(kù)存 數(shù)值型（ 20） 可為空 總庫(kù)存 數(shù)值型（ 20） 可為空 最大庫(kù)存 數(shù)值型（ 20） 可為空 購(gòu)買數(shù)量 數(shù)值型（ 20） 可為空 供應(yīng)商 字符型（ 20） 不能為空 價(jià)格 字符型（ 10） 可為空 計(jì)劃采購(gòu)時(shí)間（主鍵） 日期型（ 8） 可為空 3． 4 數(shù)據(jù)庫(kù)結(jié)構(gòu)的實(shí)現(xiàn) 在需求分析、概念結(jié)構(gòu)設(shè)計(jì)的基礎(chǔ)上得到數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)設(shè)計(jì)之后，我們就可以在 Visual 數(shù)據(jù)庫(kù)系統(tǒng)中實(shí)現(xiàn)該邏輯結(jié)構(gòu)。 打開(kāi)如圖所示的“倉(cāng)庫(kù)管理 ”項(xiàng)目后，在項(xiàng)目管理器中展開(kāi)數(shù)據(jù)文本夾，用鼠標(biāo)倉(cāng)庫(kù)管理系統(tǒng) 第 19 頁(yè) 共 55 頁(yè) 選中數(shù)據(jù)庫(kù)，單擊右側(cè)的“新建”按鈕，在彈出的對(duì)話框中將該數(shù)據(jù)庫(kù)文件存儲(chǔ)為 c:\倉(cāng)庫(kù)管理 \倉(cāng)庫(kù)管理 .dbc。 在彈出的如圖所示的數(shù)據(jù)庫(kù)設(shè)計(jì)器中單擊鼠標(biāo)右鍵，選擇“新建表”，為數(shù)據(jù)庫(kù)添加數(shù)據(jù)表（表的內(nèi)容見(jiàn)上節(jié)）。下面以表設(shè)備代碼表為例來(lái)介紹表的建立過(guò)程。 選擇“新建表”，在彈出的對(duì)話框中將表存儲(chǔ)為 c:\倉(cāng)庫(kù)管理 \設(shè)備代碼 .dbf 。在彈出的如圖所示的表設(shè)計(jì)器中填寫(xiě)表的內(nèi)容。 字段設(shè)置完成后，單擊“確定”按鈕后為表輸入數(shù)據(jù)，如不想現(xiàn)在輸入，可以先“取消”，以后再輸 入。具體方法如下： （ 1） 如圖所示，選中要輸入數(shù)據(jù)的表，單擊“瀏覽”按鈕。 倉(cāng)庫(kù)管理系統(tǒng) 第 20 頁(yè) 共 55 頁(yè) （ 2） 此時(shí)彈出無(wú)數(shù)據(jù)的表，在 Visual 的主窗口中選擇“表”，選擇“追加新記錄”后，就 可以在表中輸入數(shù)據(jù)了。如圖所示。不過(guò)這種方法只能一次輸入一條記錄，如果要輸入第二條記錄時(shí)，需再次選擇追加新記錄。如果有一個(gè)已有的數(shù)據(jù)表，就可以使用“使用追加記錄”將這個(gè)有數(shù)據(jù)的表追加到當(dāng)前表中，不過(guò)執(zhí)行該操作要求這二個(gè)表的結(jié)構(gòu)完全相同。 第四章 系統(tǒng)主要功能模塊的創(chuàng)建 按照前面的分析，我們將管理系統(tǒng)的邏輯模塊統(tǒng)一到 6 個(gè)實(shí)際功能 模塊中，如圖所示。切換面板用于切換不同的操作，每項(xiàng)具體操作結(jié)束后，都會(huì)返回到切換面板。 切換面板 設(shè) 設(shè) 設(shè) 設(shè) 設(shè) 顯 備 備 備 備 備 示 入 出 還 需 采 報(bào) 庫(kù) 庫(kù) 庫(kù) 求 購(gòu) 表 下面對(duì)各模塊的作用進(jìn)行說(shuō)明： （ 1） 設(shè)備入庫(kù)模塊：添加設(shè)備到庫(kù)存中。 倉(cāng)庫(kù)管理系統(tǒng) 第 21 頁(yè) 共 55 頁(yè) （ 2） 設(shè)備出庫(kù)模塊：將設(shè)備從庫(kù)存取出并記錄。 （ 3） 設(shè)備還庫(kù)模塊：將歸并到庫(kù)存的設(shè)備保存到數(shù)據(jù)庫(kù)。 （ 4） 設(shè)備需求模塊：記錄各部門的設(shè)備需求。 （ 5） 設(shè)備采購(gòu)模塊：記錄要采購(gòu)的設(shè)備。 （ 6） 切換面板：用于切換到不同的操作，如設(shè)備入庫(kù)、設(shè)備出庫(kù)等。 （ 7） 顯示報(bào)表：顯示庫(kù)存過(guò)多、庫(kù)存不足等信息。 下面就按照功能模塊圖來(lái)設(shè)計(jì)該倉(cāng)庫(kù)管理系統(tǒng)。首先在 Visual 中建立一個(gè)項(xiàng)目管理器，以便管理本系統(tǒng)中所有的數(shù)據(jù)，命名為“倉(cāng)庫(kù)管理”。一下操作均在該項(xiàng)目管理器中進(jìn)行。以下所有表單的“ desktop”屬性全部設(shè)為“ .真”。 4． 1 功能選擇界面的設(shè)計(jì)： 這一模塊的主要功能是作為系統(tǒng)主界面為進(jìn)入本系統(tǒng)不同功能界面選擇提供一個(gè)接口，使用一個(gè)窗口來(lái)實(shí)現(xiàn)這一功能。 首先建立一個(gè)表單，設(shè)取“ caption”屬性為“倉(cāng)庫(kù)管理”。在該表單上添加6 個(gè)“按鈕”控件，它們的“ caption”屬性分別為“設(shè)備入庫(kù)”，“設(shè)備出庫(kù)”，“設(shè)備還庫(kù)”，“部門需求”，“設(shè)備采 購(gòu)”，“顯示報(bào)表”。然后在表單上添加“圖象控件”，并設(shè)其“ stretch”屬性為“ 2strech（擴(kuò)展）”，“ pictrue”屬性為圖片所在的位置，本例中為“ c:\倉(cāng)庫(kù)管理 \”。 在“ ” (“ caption”屬性為“設(shè)備入庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備入庫(kù)表 在“ ” (“ caption”屬性為“設(shè)備出庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備出庫(kù)表 在“ ” (“ caption”屬性為“設(shè)備還庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備還庫(kù)表 倉(cāng)庫(kù)管理系統(tǒng) 第 22 頁(yè) 共 55 頁(yè) 在“ ” (“ caption”屬性為“部門需求” )控件的“ click”事件中添加如下代碼： do form 部門需求表 在“ ” (“ caption”屬性為“設(shè)備采購(gòu)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備采購(gòu)表 在“ ” (“ caption”屬性為“顯示報(bào)表” )控件的“ click”事件中添加如下代碼： do form 顯示報(bào)表 在“ form1”的屬性里選擇“ autocenter”設(shè)置為“ .”，同時(shí)將“ backcolor” 設(shè)置為“ 255,255,255”，“ windowstate”設(shè)置為“ 0普通”。 添加“ form1”的“ init”事件的代碼如下： set directory to c:\倉(cāng)庫(kù)管理 \ *將程序的默認(rèn)的路徑指向資源所在的文 件夾 該表單設(shè)計(jì)結(jié)果如圖所示： 4． 2 設(shè)備入庫(kù)模塊的設(shè)計(jì) 在設(shè)備入庫(kù)模塊中將實(shí)現(xiàn)設(shè)備數(shù)據(jù)的添加和入庫(kù)等功能。本模塊設(shè)計(jì)采用先倉(cāng)庫(kù)管理系統(tǒng) 第 23 頁(yè) 共 55 頁(yè) 用向?qū)杀韱?，然后修改的方法?shí)現(xiàn)。 首先在項(xiàng)目管理器的文檔視圖下單擊“新建”按鈕， 在接下來(lái)的向?qū)е?，“?shù)據(jù)庫(kù)和表”選擇“倉(cāng)庫(kù)管理”以及“設(shè)備入庫(kù)表”，這是前面定義好的數(shù)據(jù)庫(kù)和表。 由于設(shè)備入庫(kù)需要顯示所有的字段，因此我們將可用字段全部移至選定字段，如圖所示，單擊“下一步”按鈕， 倉(cāng)庫(kù)管理系統(tǒng) 第 24 頁(yè) 共 55 頁(yè) 在表單樣式中，選擇“陰影式”以及“圖片按鈕”，如圖所示。左上角的窗口提供了表單樣式的預(yù)覽功能，圖片按鈕和文本按鈕的區(qū)別在于顯示的時(shí)候是以圖片來(lái)表達(dá)功能還是文字來(lái)表達(dá)，實(shí)現(xiàn)功能的函數(shù)沒(méi)有區(qū)別。選擇“上一步”按鈕可以跳回上一個(gè)界面對(duì)表單中顯示的字段進(jìn)行修改。 單擊“下一步”按鈕后，向?qū)нM(jìn)行到“步驟 3排序次序”，如圖所示，選擇“設(shè)備號(hào)”為索引，并選擇升序排列。最后預(yù)覽表單，核對(duì)每項(xiàng)的設(shè)置，完成表單向?qū)В鐖D所示。 倉(cāng)庫(kù)管理系統(tǒng) 第 25 頁(yè) 共 55 頁(yè) 值得注意的是，在結(jié)束表單向?qū)?，可選擇“保存表單以備將來(lái)使用”，“保存并運(yùn)行表單”，或者“保存表單并用表單設(shè)計(jì)器修改表單”。由于 Visual 向?qū)傻谋韱沃痪哂衅毡樾?，?duì)于當(dāng)前設(shè)計(jì)的倉(cāng)庫(kù)管理系統(tǒng)還需要一定的改變，因此以我們選擇“保存表單并用表設(shè)計(jì)器修改表單”。 單擊“完成”按鈕系統(tǒng)提示保存表單，將表單保存為“設(shè)備入庫(kù)表 .scx”，存于 c:\倉(cāng)庫(kù)管理目錄下。然后打開(kāi)表單修改器生成的表單，如圖所示。 在修改 BUTTONSET 時(shí)，可以通過(guò)屬性窗口的下拉列表選定單個(gè)按鈕，調(diào)整其位置和其它屬性。如圖所示。 倉(cāng)庫(kù)管理系統(tǒng) 第 26 頁(yè) 共 55 頁(yè) 根據(jù)功能需求，把“ cmdprint”、“” cmdexit、“ cmdDelete”和“ cmdedit”的Visible 屬性都設(shè)為“ .”。添加 2 個(gè)命令按鈕， Caption 屬性分別設(shè)為“修改庫(kù)存”和“回主界面”。 在“回主界面”命令按鈕的 click 事件中添加代碼如下： do form 倉(cāng)庫(kù)管理 在修改庫(kù)存命令按鈕的 click 事件中添加代碼如下： select 現(xiàn)有庫(kù)存表 getid= set order to 設(shè)備號(hào) seek getid if found() getnum= update 現(xiàn)有庫(kù)存表 set 現(xiàn)有庫(kù)存 =(現(xiàn)有庫(kù)存 +getnum) where (設(shè)備號(hào)=getid) else insert into 現(xiàn)有庫(kù)存表 (設(shè)備號(hào) ,現(xiàn)有庫(kù)存 ,最大庫(kù)存 ,最小庫(kù)存 )。 value (thisform. 設(shè)備號(hào) ,thisform. 入庫(kù)數(shù)量倉(cāng)庫(kù)管理系統(tǒng) 第 27 頁(yè) 共 55 頁(yè) ,1000,10) endif insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 )。 values ( ,39。設(shè)備入庫(kù) 39。,date()) 保存后運(yùn)行表單，界面如圖所示： 4． 3 設(shè)備出庫(kù)模塊的設(shè)計(jì)： 在設(shè)備出庫(kù)模塊中將實(shí)現(xiàn)設(shè)備出庫(kù)數(shù)據(jù)的添加和修改庫(kù)存等功能。該模塊的倉(cāng)庫(kù)管理系統(tǒng) 第 28 頁(yè) 共 55 頁(yè) 功能和設(shè)備入庫(kù)的功能相似。具體操作可以參考設(shè)備入庫(kù)模塊的設(shè)計(jì)，設(shè)計(jì)最終的界面如圖所示。 在表單的左上角加上了顯示當(dāng)前時(shí)間的功能，添加標(biāo)簽 label2 的 caption 屬性設(shè)為“當(dāng)前時(shí)間”；添加 label3 的 caption屬性設(shè)為空；為當(dāng)前表單的 label3init事件添加如下代碼： =dtoc(date()) 該模塊具體實(shí)現(xiàn)過(guò)程不再一一詳細(xì)說(shuō)明。下面列出了表單中所用到控件的屬性值。 (1) Form1 控件的主要屬性： 屬性名稱 屬性值 Caption 設(shè)備出庫(kù)表 Autocenter . BackColor （ 2） ButtonSet1 控件的主要屬性： 控件名 屬性名稱 屬性值