【正文】
數(shù)據(jù)字典 數(shù)據(jù)字典是對(duì)描述數(shù)據(jù)流程圖中的數(shù)據(jù)項(xiàng)、數(shù)據(jù)流、數(shù)據(jù)存儲(chǔ)、加工處理邏輯等組成部分的嚴(yán)格定義,下面是本系統(tǒng)的 部分 數(shù)據(jù)字典。 采購(gòu)訂單號(hào)是由廠家名和產(chǎn)品類別構(gòu)成的。若錯(cuò)誤,則會(huì)彈出對(duì)話框提醒“用戶名密碼錯(cuò)誤 ,請(qǐng)重新輸入!”并且它的輸入密碼為“ *”,是在屬性欄中的 passwordchar 設(shè)置“ *”。 + + 39。 它 的具體代碼為: Private Sub Command1_Click() End Sub Private Sub Command2_Click() End Sub Private Sub Command3_Click() End Sub 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 15 Private Sub Command4_Click() End Sub Private Sub Command5_Click() End Sub Private Sub Command7_Click() End End Sub Private Sub Command8_Click() End Sub 采購(gòu)訂單 企業(yè)向供應(yīng)商訂貨物時(shí),開據(jù)入庫(kù)訂單,以便了解收貨情況并預(yù)先安排存放貨物的倉(cāng)庫(kù)。 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 16 圖 53 商品信息的錄入 它的具體代碼為: Private Sub Command1_Click() If = Then MsgBox 請(qǐng)輸入完整信息,輸入訂單號(hào) 編號(hào)為數(shù)字! , vbOKOnly + vbExclamation, 警告! Else (時(shí)間 ) = (訂單號(hào) ) = (供應(yīng)商 ) = (經(jīng)手人 ) = (入庫(kù) ) = (是否交貨 ) = 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 17 (名稱 ) = (數(shù)量 ) = Val() (單價(jià) ) = Val() (金額 ) = Val() (商品編號(hào) ) = Val() MsgBox 已保存訂單! , vbOKOnly + vbExclamation, 提示 = = = = = = = = = = End If End Sub Private Sub Command2_Click() End Sub Private Sub Command5_Click() End Sub Private Sub Text8_Change() If Not IsNumeric() Or Not IsNumeric() Then MsgBox 請(qǐng)?jiān)趩蝺r(jià)和數(shù)量中輸入數(shù)字 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 18 Else Text8 = Val(Text6) * Val(Text7) End If End Sub 訂單收貨 訂單收貨:是“采購(gòu)訂單”上的貨到后入庫(kù)完 成交易。 圖 54訂單收貨 它的具體代碼為: Private Sub Command1_Click() (是否交貨 ) = 是 MsgBox 完成交易,已入倉(cāng)庫(kù) , vbOKOnly 訂單號(hào) = amp。 If Then MsgBox 無(wú)該訂單 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 20 Else = 訂單號(hào) = + 39。保存到庫(kù)存管理表中,對(duì)于倉(cāng) 庫(kù)中已有的商品,數(shù)量上會(huì)在原有的基礎(chǔ)上增加。 amp。 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 23 圖 56 倉(cāng)庫(kù)調(diào)撥 具體代碼如下: Private Sub Command1_Click() (是否付款 ) = 是 MsgBox 完成付款交易! , vbOKOnly = End Sub Private Sub Command2_Click() End Sub Private Sub Command3_Click() If = Or Not IsNumeric(Text1) Then MsgBox 輸入訂單號(hào)! , vbOKOnly Else 沈陽(yáng)理工大學(xué)課程實(shí)踐(論文) 24 = 訂單號(hào) = + 39。 amp。 + + 39。如果你是系統(tǒng)的用戶,輸入用戶名可對(duì)自己的密碼進(jìn)行修改。 寫完這個(gè)課程設(shè)計(jì)報(bào)告,一個(gè)完整的采購(gòu)供應(yīng)管理系統(tǒng)就創(chuàng)建完畢 了。 經(jīng)過(guò)幾個(gè)星期的不斷實(shí)踐與探索 ,采購(gòu)供應(yīng)管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)己經(jīng)初步完成 ,基本上達(dá)到了預(yù)期的設(shè)計(jì)要求和目的。 主要功能有:數(shù)據(jù)入庫(kù)、查詢、修改和刪除等。 短短幾個(gè)星期的課程設(shè)計(jì),使我從中受到很大的教育和啟迪,不僅將大學(xué)所學(xué)的知識(shí)進(jìn)行了實(shí)際應(yīng)用,還學(xué)到了很多書本上學(xué)不到的知識(shí)