進(jìn)銷存管理系統(tǒng)優(yōu)秀畢業(yè)論文(參考版)
2025-06-23 12:46本頁面
【正文】 8．參考資料《數(shù)據(jù)庫系統(tǒng)概論 第四版》高等教育出版社 鄭若忠 王鴻武 著《SQL Server數(shù)據(jù)庫管理、設(shè)計與實現(xiàn)教程》清華大學(xué)出版社趙杰 李濤 朱慧著《Visual Basic 數(shù)據(jù)庫高級實例導(dǎo)航》 科學(xué)出版社鐘軍 等編著《軟件工程》機(jī)械工業(yè)出版社 瞿中 吳渝 劉群 劉冰著《Visual Basic 數(shù)據(jù)庫通用模塊及典型系統(tǒng)開發(fā)》人民郵電出版社劉韜 駱娟著《UML系統(tǒng)建模與分析設(shè)計》機(jī)械工業(yè)出版社刁成嘉 主編《軟件項目管理案例教程》機(jī)械工業(yè)出版社。每個人都有自己的長處和不足，我們不可能個人對什么方面都專長，各方面總有可以做我們老師的人，我們應(yīng)該多向他們學(xué)習(xí)、請教。7．小結(jié) 通過對此次項目的設(shè)計加深了對本專業(yè)知識的了解，提高了動手能力，讓自己有較為規(guī)范的獨立開發(fā)能力。3 沒有檢測文本框的路徑信息的安全性；解決方案：禁用路徑手動編輯功能。有可能會由于傳輸過程中數(shù)據(jù)的丟失造成軟件運行的錯誤。 as jsr from lsxsb) Set adoRs = (delete from lsxsb ) MsgBox 出售完成, 48, 進(jìn)銷存管理系統(tǒng) End IfEnd SubPrivate Sub Command4_Click() Unload MeEnd SubPrivate Sub DataGrid2_Click() If 0 Then = (0).CellText() End IfEnd SubPrivate Sub Form_Activate() If = 0 Then MsgBox 無任何庫存商品, 48, 進(jìn)銷存管理系統(tǒng) Else Do Until (spbh) Loop End IfEnd Sub 4．測試結(jié)果及相關(guān)表格檢查項內(nèi)容窗口切換、移動、改變大小時正常嗎？√各種界面元素的文字正確嗎？（如標(biāo)題、提示等）√各種界面元素的狀態(tài)正確嗎？（如有效、無效、選中等狀態(tài)）√數(shù)據(jù)項能正確回顯嗎？√各種界面元素的布局合理嗎？美觀嗎？√各種界面元素的形狀美觀嗎？√……此處取商品查詢（frmSPCX）窗體及商品銷售（frmSPXS）窗體作為測試樣本對商品查詢（frmSPCX）窗體：處理時點處理內(nèi)容實現(xiàn)狀態(tài)初始狀態(tài)1） 單選框在“商品編號”選項上2） 表格中顯示數(shù)據(jù)庫中的全部商品信息3） 除商品編號的文本框可以輸入外，其他的皆不可輸入、編輯已實現(xiàn)開始查詢1） 若單選框在“商品編號”上，則判斷編號是否為空，如為空則提示用戶輸入商品編號，否則在商品名單表中顯示查詢結(jié)果2） 若單選框在“商品名稱”上，則判斷名稱是否為空，如為空則提示用戶輸入商品名稱，否則在商品名單表中顯示查詢結(jié)果3） 若單選框在“商品類別”上，則判斷類別是否為空，如為空則提示用戶選擇查詢商品的類別，否則在商品名單表中顯示查詢結(jié)果已實現(xiàn)顯示全部在商品名單中顯示所有商品信息已實現(xiàn)打印打印全部結(jié)果已實現(xiàn)雙擊表格在商品信息文本框中將選中雙擊的該條信息顯示出來已實現(xiàn)返回退出本窗體，返回至主界面已實現(xiàn) 商品銷售（frmSPXS）窗體：處理時點處理內(nèi)容實現(xiàn)狀態(tài)初始狀態(tài)1） “商品信息”表格顯示數(shù)據(jù)庫商品信息2） “訂購列表”顯示需要訂購的商品列表3） 商品編號下拉框為數(shù)據(jù)庫已有商品編號選項已實現(xiàn)添加 按鈕檢測商品編號及訂購數(shù)量是否合法，合法：比較庫存量及訂購量，當(dāng)庫存量小于訂購量時顯示提示信息，否則在商品訂購表中添加訂購記錄，對應(yīng)編號的商品庫存量減少，刷新顯示。 as jsr from lsxsb If = 0 Then MsgBox 出售列表為空，請先添加待售商品, 48, 進(jìn)銷存管理系統(tǒng) Exit Sub Else Call Main Set adoRs = (insert into seller select spbh,spmc,dj,sl,dj*sl as je,39。) MsgBox 記錄刪除成功, 48, 進(jìn)銷存管理系統(tǒng) End If End If End IfEnd SubPrivate Sub Command3_Click() = select spbh,spmc,dj,sl,dj*sl as je,39。 where spbh = 39。 If = 0 Then MsgBox 對不起,該記錄不存在, 48, 進(jìn)銷存管理系統(tǒng) Else kcStr = kcStr + (sl) Call Main Set adoRs = (update goods set kc = 39。) MsgBox 記錄添加成功, 48, 進(jìn)銷存管理系統(tǒng) End If End If End IfEnd SubPrivate Sub Command2_Click() If = Then MsgBox 請輸入商品編號, 48, 進(jìn)銷存管理系統(tǒng) Else If = 0 Then MsgBox 訂購列表為空，沒有記錄可以刪除, 48, 進(jìn)銷存管理系統(tǒng) Else = select * from LSXSB where spbh = 39。 where spbh = 39。)) kcStr = kcStr Set adoRs = (update goods set kc = 39。 amp。,39。 djStr amp。,39。 spmcStr amp。,39。 amp。 spmcStr = (spmc) djStr = (dj)
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1