訂單管理信息系統(tǒng)論文(文件)
【正文】 系統(tǒng)功能的分析來決定系統(tǒng)的組成模塊進(jìn)而進(jìn)行系統(tǒng)設(shè)計，并根據(jù)系統(tǒng)的實現(xiàn)條件來確定所利用的程序設(shè)計語言和后臺數(shù)據(jù)庫的處理方式，最后經(jīng)過多次調(diào)試使該系統(tǒng)得以成功運行。 圖 查詢信息顯示 訂單管理系統(tǒng)程序運行結(jié)束 。 如果庫存中沒有足夠的數(shù)量提供給訂單，那么將彈出對話框“庫存數(shù)量不夠”，那么訂單信息就不能添加成功；如果訂單信息的文本框沒有填完整，那么將彈出對話框“ **不能為空”，那么訂單信息不能添加成功。 測試內(nèi)部數(shù)據(jù)結(jié)構(gòu)的有效性，等等。因此白盒測試又稱為結(jié)構(gòu)測試或邏輯驅(qū)動測試。因此黑盒測試又叫功能測試或數(shù)據(jù)驅(qū)動測試。 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 15 系統(tǒng)運行與測試 黑盒測試：已知產(chǎn)品的功能設(shè)計規(guī)格，可以進(jìn)行測試證明每個實現(xiàn)了的功能是否符合要求。 商品與訂單之間存在聯(lián)系“訂貨”，為一對一；一種商品只能對應(yīng)一個訂單，并且一個訂單只能對應(yīng)一種商品。 數(shù)據(jù)庫設(shè)計一般經(jīng)過需求分析與數(shù)據(jù)分析、概念設(shè)計、邏輯設(shè)計和物理設(shè)計等多個步驟，下面將詳細(xì)介紹概念設(shè)計 、 結(jié)構(gòu)設(shè)計。 Set mrc = ExecuteSQL(txtsql, msgtext) 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 12 ‘將符合條件的信息顯示在表格中 With myflexgrid .Rows = 1 .CellAlignment = 4 .TextMatrix(0, 0) = 款號 .TextMatrix(0, 1) = 商品名稱 .TextMatrix(0, 2) = 計量單位 .TextMatrix(0, 3) = 商品類別 .TextMatrix(0, 4) = 商品數(shù)量 .TextMatrix(0, 5) = 商品單價 .TextMatrix(0, 6) = 所在倉庫 .TextMatrix(0, 7) = 入庫時間 .TextMatrix(0, 8) = 生產(chǎn)廠家 .TextMatrix(0, 9) = 備注信息 .FixedRows = 0 ‘設(shè)定表格中每列的寬度 For i = 0 To 9 .ColAlignment(i) = 0 Next i .FillStyle = flexFillRepeat .Col = 0 .Row = 0 .RowSel = 0 .ColSel = .Cols 1 .CellAlignment = 4 .ColWidth(0) = 2020 .ColWidth(1) = 1000 .ColWidth(2) = 3000 .ColWidth(3) = 1000 .ColWidth(4) = 1000 .ColWidth(5) = 1000 .ColWidth(6) = 2020 .ColWidth(7) = 2020 .ColWidth(8) = 2020 .ColWidth(9) = 4000 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 13 .Row = 0 ‘從數(shù)據(jù)庫中調(diào)取所要查詢的記錄信息 Do While Not .Rows = .Rows + 1 .CellAlignment = 4 .TextMatrix(.Rows 1, 0) = (0) .TextMatrix(.Rows 1, 1) = (1) .TextMatrix(.Rows 1, 2) = (2) .TextMatrix(.Rows 1, 3) = (3) .TextMatrix(.Rows 1, 4) = (4) .TextMatrix(.Rows 1, 5) = (5) .TextMatrix(.Rows 1, 6) = (6) .TextMatrix(.Rows 1, 7) = (7) .TextMatrix(.Rows 1, 8) = (8) .TextMatrix(.Rows 1, 9) = (9) Loop End With End If （其他兩種查詢方式和上述相同） ‘判斷是否設(shè)置查詢方式 If Trim(txtsql) = Then MsgBox 請設(shè)置查詢條件！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If End Sub 單擊按鈕“重新查詢”，將清空輸入框，可以重新查詢，代碼如下： Private Sub cmdagain_Click() ‘關(guān)閉該窗體 Unload frmproducthuinquire ‘重新顯示該窗體 End Sub 取消按鈕的代碼如下： 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 14 Private Sub cmdexit_Click() Unload Me End Sub 數(shù)據(jù) 庫 訪問 技術(shù) 系統(tǒng)采用的數(shù)據(jù)庫 類型 是 Access 2020 數(shù)據(jù)庫 ， Access 2020 是 Microsoft Access 2020 的一個組件，是最常見的本地數(shù)據(jù)庫 管理系統(tǒng)之一，是一種功能強大且使用方便的關(guān)系性桌面數(shù)據(jù)庫管理軟件，通過直觀的可視化操作可以完成大部分的數(shù)據(jù)管理工作 ，它充分利用了 Windows 操作平臺的優(yōu)越性，采用 與 Windows 完全一致的風(fēng)格，使得用戶界面非常友好。 程序在窗體載入時自動加入各條記錄，代碼如下： Private Sub Form_Load() 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 11 Dim txtsql As String Dim msgtext As String txtsql = select * from customer ‘記錄在顯示時顯示灰體不能修改狀態(tài) = False = False = False = False = False = False = False = False = False = False ‘執(zhí)行查詢操作 Set mrc = ExecuteSQL(txtsql, msgtext) ‘移到第一條記錄 ‘顯示數(shù)據(jù) Call viewdata ‘記下當(dāng)前記錄的為止 mybookmark = ‘給標(biāo)志賦初值 mcclean = True End Sub 三 、 產(chǎn)品查詢代碼 Private Sub cmdInquire_Click() Dim txtsql As String Dim msgtext As String Dim mrc As ‘判斷是否選擇客戶名稱查詢方式 If Then ‘查詢語句 txtsql = select * from product where productid=39。 amp。 不能為空！ MsgBox smeg, vbOKOnly + vbExclamation, 警告 txtitem(intcount).SetFocus Exit Sub End If ‘判斷輸入的郵政編碼是否是按格式 If Not IsNumeric(T
研究報告相關(guān)推薦
鄂ICP備17016276號-1