服裝公司進銷存管理系統-閱讀頁
2025-04-27 03:38本頁面
【正文】 單的信息并打印出來。為了實現信息查詢的功能，還需要設計“查詢窗體”、“產品進庫查詢窗體”、“訂單查詢窗體”、“客戶信息查詢窗體”。最后建立一個“切換面板”。有添加記錄、修改記錄。訂單處理窗體：向“訂單表”中添加訂單，查看產品的庫存量，確認產品的發(fā)貨信息。如圖11。如圖12。如圖13所示，其表屬性見附表2。 (庫存量) product_number amp。 amp。 39。最后經過不斷的修改數據類型得以成功。（1）產品進庫演示結果進入“產品進庫面板”，點擊“產品進庫查詢”，可以查詢產品進庫信息。接著點擊“產品進庫處理”，即可進行“添加記錄”“修改庫存”（即添加記錄到庫存），和“查看庫存”，再次查看庫存004號產品明顯增加了300個單位，如圖1820所示。然后退出輸入價格，點擊“確認”即可，如圖22所示，最后查看庫存005號產品減少了100各單位。 最后點擊“退出查詢”，返回系統主界面。最后點擊“退出”，返回系統主界面。七、實驗總結這次系統的設計遇到了很多問題，常常為了解決一個問題而長時間停滯不前，但經過自己不斷的思考、嘗試，問題都逐一的被解決了。首先就是理論和實踐的差距遠遠大于自己的想象；一些平時覺得很簡單的東西，真到要實踐操作的時候，就會發(fā)現很難下手。這次課程設計在一次次的修改與完善中總算是完成了。這也讓我知道在以后的學習中，我一定要多實踐，多練習，書本上知識的學習畢竟沒有實踐來的有效。（2）訂單查詢選擇查詢的建立SELECT 訂單表.*FROM 訂單表WHERE 訂單號=[請輸入訂單號]。（1）添加記錄Private Sub 添加記錄_Click()On Error GoTo Err_添加記錄_Click , , acNewRecExit_添加記錄_Click: Exit SubErr_添加記錄_Click: MsgBox Resume Exit_添加記錄_Click End Sub（2）修改庫存Private Sub CmdChange_Click()Dim curdb As DatabaseDim curRS As RecordsetDim deviceCnt As IntegerSet curdb = CurrentDbSet curRS = (select * from 庫存表 where 產品號=39。 amp。)If Not Then deviceCnt = (庫存量) deviceCnt = deviceCnt + CInt() update 庫存表 set 庫存量= amp。 where 產品號=39。 amp。Else With curdbRS .AddNew .Fields(產品號) = .Fields(庫存量) = CInt() .Fields(存放地點) = 第一倉庫 .Update End WithEnd If = True = FalseEnd Sub（3）發(fā)貨Private Sub 準備發(fā)貨_Click()
公司管理相關推薦
鄂ICP備17016276號-1