公司倉(cāng)庫(kù)管理系統(tǒng)(參考版)
2025-04-10 20:16本頁(yè)面
【正文】 最后，我還要感謝多方面的支持以及幫助過(guò)我的人，尤其是我的指導(dǎo)老師，她仔細(xì)認(rèn)真的態(tài)度，對(duì)我的幫助是非常大的，使得我更完善地完成了次管理系統(tǒng)。當(dāng)然這次的管理系統(tǒng)也一定存在著許多不足之處，但可以適合與如佳雪公司這樣的小型銷(xiāo)售型公司，但為將來(lái)的升級(jí)提供了更多的方便的途徑。在編譯過(guò)程中，最讓我印象深刻的是用DATA控件訪問(wèn)數(shù)據(jù)，由于DATA控件的局限性，因此在查詢時(shí)，碰到了一些不能查詢數(shù)據(jù)的麻煩，可以直接通過(guò)此控件來(lái)訪問(wèn)數(shù)據(jù)庫(kù)，當(dāng)我找到此方法時(shí)，那么所完成的查詢就更為完善了。在從中曾出現(xiàn)過(guò)以下幾個(gè)具體問(wèn)題：1. MSDN不存在2. 524數(shù)據(jù)轉(zhuǎn)換錯(cuò)誤3. 當(dāng)單擊“上一個(gè)”和“下一個(gè)”按鈕時(shí)會(huì)出現(xiàn)數(shù)據(jù)不存在而退出程序4. DBLIST控件不能正確引入數(shù)據(jù)當(dāng)出現(xiàn)以上問(wèn)題是，經(jīng)過(guò)嚴(yán)密與反復(fù)的調(diào)試同樣用了一些方法來(lái)解決1. 改變數(shù)據(jù)原來(lái)的設(shè)計(jì)方法，改用文本型的數(shù)據(jù)為多2. 仔細(xì)表明正確的日期輸入法3. 當(dāng)進(jìn)行數(shù)據(jù)更新時(shí)，沒(méi)有確定或取消，系統(tǒng)將提示以下對(duì)話框， “型號(hào)”沒(méi)有輸入時(shí)，系統(tǒng)也將提示以下對(duì)話框， ，為了保證不誤操作，系統(tǒng)也將提出一個(gè)對(duì)話框， ，還將程序打包，進(jìn)行安裝，在打包過(guò)程中，也出現(xiàn)以下對(duì)話框，第四章 思想小結(jié)在短短的兩個(gè)月內(nèi)，通過(guò)參考各種VB編程書(shū)籍、網(wǎng)上查找信息以及老師的耐心知道下，完成了這次畢業(yè)設(shè)計(jì)——浙江佳雪倉(cāng)庫(kù)管理系統(tǒng)。l 再回到登陸主窗口，（），單擊“退出”按鈕，系統(tǒng)將退出程序，顯示以下窗口（），單擊圖中的“再見(jiàn)”，此程序也將結(jié)束。l 再回到查詢界面，單擊“按單位”按鈕，此時(shí)系統(tǒng)將進(jìn)入按單位查詢的截面，216。 單擊Dblist框中的型號(hào)，F(xiàn)rame中將自動(dòng)顯示記錄，以供用戶查詢。216。 單擊“按型號(hào)”，系統(tǒng)將進(jìn)入以型號(hào)為關(guān)鍵字段的查詢。l 當(dāng)用戶單擊“查詢”按鈕時(shí)，系統(tǒng)將出現(xiàn)密碼登陸框，因?yàn)椴樵兊氖莾?nèi)部資料，因此，需身份驗(yàn)證，l 隨后將進(jìn)入查詢功能，l 用戶可根據(jù)不同需要進(jìn)行“按型號(hào)”和“按單位”的查詢。其主要程序如下：39。為了在“入庫(kù)情況”表中建立一個(gè)有效的記錄，就必須要有主關(guān)鍵字段“型號(hào)”的值。216。 用CancelUpdata方法放棄增加和修改如果用戶修改了約束控件里的數(shù)據(jù)后，在沒(méi)有單擊“確定”命令按鈕之前，想放棄剛才的增加或修改，則可以單擊“取消”命令。單擊“確定”按鈕時(shí)，記錄將被記如數(shù)據(jù)庫(kù)。 用Updata方法確認(rèn)增加和修改當(dāng)用戶修改和增加完一個(gè)記錄的數(shù)據(jù)后，需要將數(shù)據(jù)保存到數(shù)據(jù)庫(kù)中。如果是第一個(gè)記錄，BOF屬性為T(mén)RUEIf Then = FalseElse = True = TrueEnd IfEnd SubPrivate Sub Command2_Click()xg = False39。同樣，當(dāng)記錄集的BOF屬性為T(mén)rue時(shí)，置“下一個(gè)”命令按鈕為非激活狀態(tài)。如果單擊“上一個(gè)”和“下一個(gè)”命令按鈕將導(dǎo)致記錄指針指向空指針，則分別調(diào)用Movefirst和Movelast方法，這是防止“NO Current Record”錯(cuò)誤出現(xiàn)的最簡(jiǎn)單和最有效的方法。 移動(dòng)數(shù)據(jù)當(dāng)用戶單擊“上一個(gè)”和“下一個(gè)”按鈕是，系統(tǒng)將自動(dòng)轉(zhuǎn)換數(shù)據(jù)，但注意，當(dāng)移至第一個(gè)記錄時(shí)，“下一個(gè)”按鈕將失效；移至最后一個(gè)記錄是，“上一個(gè)”按鈕也將失效。對(duì)記錄進(jìn)行編輯End SubPrivate Sub Command7_Click()ss = MsgBox(真的要?jiǎng)h除嗎？, vbYesNo + vbInformation, 刪除記錄)39。其主要程序如下：Private Sub Command6_Click()xg = True = True = True39。如果用戶單擊對(duì)話框上的“確定”按鈕，程序調(diào)用記錄集的Delete方法，將記錄集的當(dāng)前記錄設(shè)置為空
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1