【正文】 析與實現(xiàn)。 通過調試程序，加深對 VB編程的基本技巧及方法的理解 。 了解 VB 與數(shù)據(jù)庫的連接方法 。應根據(jù)基本學時分配合理安排設計時間，并獨立完成各方面的設計。訂單生成后存入訂單的數(shù)據(jù)庫中，還可以在需要的時候對訂單進行修改、刪除和查詢。 產品管理模塊設計 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 書（論 文） 6 圖 窗體功能：添加產品信息是是進行以后的功能模塊實現(xiàn)的基礎，該模塊實現(xiàn)的是對產品信息的管理，管理信息首先需要錄入信息，所以模塊的使用需要按要求輸入產品的基本信息，款號、產品數(shù)量、產品單價需要是數(shù)字，如果輸入錯誤保存記錄不會成功 。 請輸入數(shù)字 ! MsgBox smeg, vbOKOnly + vbExclamation, 警告 txtitem(intcount).SetFocus Exit Sub End If If Not IsNumeric(Trim(txtitem(7))) Then smeg = 傳真號碼 smeg = smeg amp。 Trim(txtitem(0)) amp。 ER 模型是概念設計的有力工具。 軟件的黑盒測試意味著測試要在軟件的接口處進行。 對所有的邏輯判 定，取“真”與取“假”的兩種情況都能至少測一遍。 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 書（論 文） 17 圖 查詢所需要的記錄顯示在另一個窗體中。 一開始，我以為三天就可以把課程設計搞好，誰知道我們搞了差不多一個星期。所以我們無論做任何事情都要細心和耐心。 在后期調試階段也是很廢時的。這一點我是深有體會的。 圖 查詢信息顯示 訂單管理系統(tǒng)程序運行結束 。 測試內部數(shù)據(jù)結構的有效性，等等。因此黑盒測試又叫功能測試或數(shù)據(jù)驅動測試。 商品與訂單之間存在聯(lián)系“訂貨”，為一對一；一種商品只能對應一個訂單，并且一個訂單只能對應一種商品。 Set mrc = ExecuteSQL(txtsql, msgtext) 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 書（論 文） 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) = 生產廠家 .TextMatrix(0, 9) = 備注信息 .FixedRows = 0 ‘設定表格中每列的寬度 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è) 大 學 課 程 設 計 說 明 書（論 文） 13 .Row = 0 ‘從數(shù)據(jù)庫中調取所要查詢的記錄信息 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 （其他兩種查詢方式和上述相同） ‘判斷是否設置查詢方式 If Trim(txtsql) = Then MsgBox 請設置查詢條件！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If End Sub 單擊按鈕“重新查詢”，將清空輸入框，可以重新查詢，代碼如下： Private Sub cmdagain_Click() ‘關閉該窗體 Unload frmproducthuinquire ‘重新顯示該窗體 End Sub 取消按鈕的代碼如下： 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 書（論 文） 14 Private Sub cmdexit_Click() Unload Me End Sub 數(shù)據(jù) 庫 訪問 技術 系統(tǒng)采用的數(shù)據(jù)庫 類型 是 Access 2020 數(shù)據(jù)庫 ， Access 2020 是 Microsoft Access 2020 的一個組件，是最常見的本地數(shù)據(jù)庫 管理系統(tǒng)之一，是一種功能強大且使用方便的關系性桌面數(shù)據(jù)庫管理軟件，通過直觀的可視化操作可以完成大部分的數(shù)據(jù)管理工作 ，它充分利用了 Windows 操作平臺的優(yōu)越性，采用 與 Windows 完全一致的風格，使得用戶界面非常友好。 amp。 下排按鈕用來方便的瀏覽數(shù)據(jù)庫中的各條記錄，右排按鈕用來修改記錄，由于記錄集為整個窗口公用，需要將記錄及對象定義為全局變量。 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 書（論 文） 3 圖 信息管理功能模塊圖 系統(tǒng)詳細 設計 訂單 管理 系統(tǒng) 模塊 設計 圖 窗體功能： 用戶首先輸入用戶名后，然后輸入密碼。要求書寫詳細的設計說明書，對有復雜的代碼段和程序段的部分， 應畫出程序流程圖， 寫出全部的代碼。正確地完成上述內容，記錄實習日記，規(guī)范完整地撰寫出 課程設計論文 。 設計所選擇的題目，對具體功能進行詳細的分析，根據(jù) 系統(tǒng) 的要求在 VB中設計窗體界面，使其合理化。 軟件： Microsoft Visu