【正文】 se = 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 ‘查詢語(yǔ)句 txtsql = select * from product where productid=39。 數(shù)據(jù)庫(kù)設(shè)計(jì)一般經(jīng)過(guò)需求分析與數(shù)據(jù)分析、概念設(shè)計(jì)、邏輯設(shè)計(jì)和物理設(shè)計(jì)等多個(gè)步驟，下面將詳細(xì)介紹概念設(shè)計(jì) 、 結(jié)構(gòu)設(shè)計(jì)。 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計(jì) 說(shuō) 明 書（論 文） 15 系統(tǒng)運(yùn)行與測(cè)試 黑盒測(cè)試：已知產(chǎn)品的功能設(shè)計(jì)規(guī)格，可以進(jìn)行測(cè)試證明每個(gè)實(shí)現(xiàn)了的功能是否符合要求。因此白盒測(cè)試又稱為結(jié)構(gòu)測(cè)試或邏輯驅(qū)動(dòng)測(cè)試。 如果庫(kù)存中沒有足夠的數(shù)量提供給訂單，那么將彈出對(duì)話框“庫(kù)存數(shù)量不夠”，那么訂單信息就不能添加成功；如果訂單信息的文本框沒有填完整，那么將彈出對(duì)話框“ **不能為空”，那么訂單信息不能添加成功。在 Visual Basic 環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用 Windows 內(nèi)部的廣泛應(yīng)用程序接口（ SPI）函數(shù)，以用動(dòng)態(tài)鏈接庫(kù)（ DLL）、對(duì)象的鏈接與世隔嵌入（ OLE）、開放式數(shù)據(jù)連接（ ODBC）等技術(shù)，可以高效、快速地開發(fā) Windows 環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng) 該訂單管理信息系統(tǒng)的完成首先經(jīng)過(guò)了對(duì)訂單流程的調(diào)查和分析，確定出了訂單管理信息系統(tǒng)對(duì)于傳統(tǒng)的訂單流程所要改正的缺點(diǎn)，并且吸收了手寫式訂單的長(zhǎng)處，還開發(fā)出了計(jì)算機(jī)處理訂單的新方法；通過(guò)對(duì)系統(tǒng)功能的分析來(lái)決定系統(tǒng)的組成模塊進(jìn)而進(jìn)行系統(tǒng)設(shè)計(jì)，并根據(jù)系統(tǒng)的實(shí)現(xiàn)條件來(lái)確定所利用的程序設(shè)計(jì)語(yǔ)言和后臺(tái)數(shù)據(jù)庫(kù)的處理方式，最后經(jīng)過(guò)多次調(diào)試使該系統(tǒng)得以成功運(yùn)行。唉！難怪我經(jīng)常聽到說(shuō)，編程實(shí)在是太麻煩了，看到頭都大了，看到就心煩了。在 這一 刻我們是最高興的。后來(lái)我才發(fā)現(xiàn)有一個(gè)數(shù)據(jù)與數(shù)據(jù)庫(kù)的數(shù)據(jù)不同。 VB 是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語(yǔ)言，可用于開發(fā) Windows 環(huán)境下的各類應(yīng)用程序。 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計(jì) 說(shuō) 明 書（論 文） 16 圖 進(jìn) 入主頁(yè)面以前先要進(jìn)行用戶的登錄，非合法用戶不能進(jìn)入主頁(yè)面對(duì)系統(tǒng)進(jìn)行管理，登錄頁(yè)面如圖 所示。這種方法是把測(cè)試對(duì)象看做一個(gè)打開的盒子，它允許測(cè)試人員利用程序內(nèi)部的邏輯結(jié)構(gòu)及有關(guān)信息，設(shè)計(jì)或選擇測(cè)試用例，對(duì)程序所有邏輯路徑進(jìn)行測(cè)試。 有了數(shù)據(jù)庫(kù)和表之后，如果想讓 VB 應(yīng)用程序訪問數(shù)據(jù)庫(kù)，還需進(jìn)行數(shù)據(jù)源的配置。 數(shù)據(jù)庫(kù)是數(shù)據(jù)庫(kù)應(yīng)用程序的核心，數(shù)據(jù)庫(kù)設(shè)計(jì)或稱數(shù)據(jù)模型是建立一個(gè)應(yīng)用程序很重要的一步。39。 一 、 產(chǎn)品添加代碼 單擊重新添加按鈕可以清空所有輸入框，代碼如下： Private Sub cmdsaveagain_Click() Unload frmkehu End Sub 單擊取消按鈕取消添加添加客戶信息，代碼如下： Private Sub cmdcancel_Click() If mblchange And Then If MsgBox(保存當(dāng)前記錄的變化嗎？ , vbOKOnly + vbExclamation, 警告 ) = vbOK Then Call cmdSave_Click End If End If Unload Me End Sub 用戶輸入內(nèi)容完畢之后，單擊保存按鈕將觸發(fā) Click 事件，代碼如下： Private Sub cmdSave_Click() Dim intcount As Integer Dim i As Integer ‘定義數(shù)據(jù)集對(duì)象 Dim mrc As ‘定義字符串變量，返回查詢語(yǔ)句 Dim msgtext As String ‘判斷是否輸入信息 For intcount = 0 To 9 If Trim(txtitem(intcount) amp。 當(dāng)用戶輸入用戶名和密碼正確后，將成功進(jìn)入系統(tǒng)。 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計(jì) 說(shuō) 明 書（論 文） 2 第 2 章 課程設(shè)計(jì)內(nèi)容 系統(tǒng)功能設(shè)計(jì) 系統(tǒng)功能分析 系統(tǒng) 信息 管理 :根據(jù)數(shù)據(jù)庫(kù)中對(duì)用戶的限定，有權(quán)使用該系統(tǒng)的用戶在經(jīng)過(guò)系統(tǒng)登陸后對(duì)信息進(jìn)行管理，還有權(quán)利進(jìn)行用戶的添加，用戶密碼的修改。 課程設(shè)計(jì)的實(shí)驗(yàn)環(huán)境 硬件要求能運(yùn)行 Windows 操作系統(tǒng)的微機(jī)系統(tǒng)。 遼 寧 工 業(yè) 大 學(xué) 可視化編程技術(shù) 課程設(shè)計(jì)（論文） 題目： 訂單管理系統(tǒng) 院（系）： 專業(yè)班級(jí)： 學(xué) 號(hào)： 學(xué)生姓名： 指導(dǎo)教師： 教師職稱： 起止時(shí)間： 課程設(shè)計(jì)（論文）任務(wù)及評(píng)語(yǔ) 院（系）：軟件學(xué)院 教研室：軟件教研 室 學(xué) 號(hào) 學(xué)生姓名 專業(yè)班級(jí) 課程設(shè)計(jì)（論文）題目 訂單管理系統(tǒng) 課程設(shè)計(jì)（論文）任務(wù) 課程設(shè)計(jì)任務(wù)及要求： 掌握 VB程序設(shè)計(jì)語(yǔ)言的基礎(chǔ)知識(shí)。 指導(dǎo)教師評(píng)語(yǔ)及成績(jī) 成績(jī)： 指導(dǎo)教師簽字： 2020 年 12 月 6 日 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計(jì) 說(shuō) 明 書（論 文） 目 錄 第 1 章 課程設(shè)計(jì)目的與要求 ....................................................................................... 1 課程設(shè)計(jì)目的 ........................................................................................................... 1