【正文】 無論做什么事情，我認(rèn)為最重要的是在做事過程中學(xué)到東西，吸取教訓(xùn)。界面的設(shè)計倒是沒什么問題，最有問題的就是編程了，編程是非常耗時和精力的。如圖 所示，該窗體列出了查詢訂單的全部詳細(xì)信息，如果需要繼續(xù)查詢，直接按“重新查詢”按鈕即可。 在循環(huán)的邊界和運行的界限內(nèi)執(zhí)行循環(huán)體。這種方法是把測試對象看做一個黑盒子，測試人員完全不考慮程序內(nèi)部的邏輯結(jié)構(gòu)和內(nèi)部特性，只依據(jù)程序的需求規(guī)格說明書，檢查程序的功能是否符合它的功能說明。 本系統(tǒng)中的實體類型有：客戶、商品、訂單等，這些實體之間的聯(lián)系有： 客戶與訂單之間存在聯(lián)系“訂單”，為多對一；一個客戶可以對應(yīng)多個訂單，一個訂單只能對應(yīng)一個客戶。 39。 請輸入數(shù)字 ! MsgBox smeg, vbOKOnly + vbExclamation, 警告 txtitem(intcount).SetFocus Exit Sub End If ‘判斷是否有重復(fù)記錄 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 10 txtsql = select * from customer where panyname=39。 表 控件 屬性 屬性取值 frmproduct name frmkehu caption 添加商品信息 MDIChild True Txtproductid name txtitem(0) Txtproductname name txtitem(1) Txtunit name txtitem(2) Txtproductspec name txtitem(3) Txtcount name txtitem(4) Txtprice name txtitem(5) Txtstore name txtitem(6) Txtorderdate name txtitem(7) Txtprovidername name txtitem(8) Txtmeno name txtitem(9) CmdOK name CmdOK caption 確定 Cmdsaveagain name cmdsaveagain Caption 重新添加 Cmdcancel name Cmdcancel caption 取消 Label1 caption 款號 Label2 caption 商品名稱 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 7 Label3 caption 計量單位 Label4 caption 商品類別 Label5 caption 商品數(shù)量 Label6 caption 商品單價 Label7 caption 所在倉庫 Label8 caption 入庫時間 Label9 caption 生產(chǎn)廠家 Label10 caption 備注信息 圖 窗體功能 ：該模塊主要是對已經(jīng)添加的產(chǎn)品信 息進行修改，查看記錄框中的各個按鈕來移動記錄，可以選擇對哪條記錄進行修改和刪除操作；如果要對選定的記錄進行修改，再顯示修改記錄時點擊修改記錄按鈕，個個文本框成為有效狀態(tài)，修改完成后，點擊確定修改即可如果點擊確定修改之前想取消所做的修改，可以取消修改記錄按鈕，該記錄返回原來的形式。 系統(tǒng)功能模塊設(shè)計 設(shè)計思路： 系統(tǒng)根據(jù)該企業(yè)的客戶情況進行客戶信息的管理，客戶的信息可以添加、修改、刪除、查詢，為生成訂單做好準(zhǔn)備；其次，企業(yè)新入庫產(chǎn)品也要進行管理，在訂單中產(chǎn)品是最主要的組成部分 ，所以， 根據(jù)企業(yè)庫存中的所有需要出售的產(chǎn)品進行管理，根據(jù)庫存產(chǎn)品的一些基本信息建立一個產(chǎn)品的數(shù)據(jù)庫，還可以添加新的產(chǎn)品信息 ，企業(yè)不再使用的產(chǎn)品信 息也應(yīng)該及時的刪除，在適當(dāng)?shù)臅r候，對某些商品信息可以添加、修改和刪除， 選擇“產(chǎn)品信息管理”→“商品信息查詢”菜單，可以有三種方式進行查詢，分別為：按款號查詢；按產(chǎn)品名稱查詢；按產(chǎn)品類別查詢，再次， 在生成訂單的所有基本信息都具備的情況下，就可以直接調(diào)用客戶信息和產(chǎn)品信息來生成訂單，訂單生成后可以保存在數(shù)據(jù)庫中，在還沒有結(jié)算之前，還可以對訂單進行適當(dāng)?shù)男薷?、刪除、查詢。選擇同一題目的同學(xué)，可以共同協(xié)作完成一個應(yīng)用程序的開發(fā)任務(wù)。 課程設(shè)計過程中，要嚴(yán)格遵守 實踐環(huán)節(jié) 的時間安排，聽從指導(dǎo)教師的指導(dǎo)。 編寫代碼，實現(xiàn) 系統(tǒng)的功能 。 課程設(shè)計要求 按課程設(shè)計指導(dǎo)書提供的課題， 每個小組設(shè)計一個完整的 管理系統(tǒng) 應(yīng)用程序。 產(chǎn)品 信息 管理 :根據(jù)企業(yè)庫存中的所有需要出售的產(chǎn)品進行管理，根據(jù)庫存產(chǎn)品的一些基本信息建立一個產(chǎn)品的數(shù)據(jù)庫，還可以 添加 新的產(chǎn)品信息，對產(chǎn)品的信息進行修改、刪除，并可以進行查詢。 圖 改密碼登陸窗體 表 窗體中各控件的屬性設(shè)置 控件 屬性 屬性取值 frmModifyuser(form) name frmModifyuser caption 修改密碼 startupposition Center screen windowstate Normal txtUsername name txtUsername 遼 寧 工 業(yè) 大 學(xué) 課 程 設(shè) 計 說 明 書（論 文） 5 txt password 1 name txt password 1 Password char * txt password 2 name txt password 2 Password char * CmdOK name CmdOK caption 確定 Cmdcancel name Cmdcancel caption 取消 Labal 1 caption 請輸入新密碼 Labal 2 caption 請確認(rèn)新密碼 圖 窗體功能： 該模塊主要是對已經(jīng)添加的客戶信息進行修改， 查 看記錄框中的各個按鈕來移動記錄，可以選擇對 哪條 記錄進行修改和刪除操作；如果要對選定的記錄進行修改，再顯示 修改記錄時 點擊 修改記錄按鈕，個個文本框成為有效狀態(tài)，修改完成后，點擊確定修改即可 如果點擊確定修改之前想取消所做的修改，可以取消修改記錄按鈕，該記錄返回原來的形式。 不能為空！ MsgBox smeg, vbOKOnly + vbExclamation, 警告 txtitem(intcount).SetFocus Exit Sub End If ‘判斷輸入的郵政編碼是否是按格式 If Not IsNumeric(Trim(txtitem(5))) Then smeg = 郵政編碼 smeg = smeg amp。 程序在窗體載入時自動加入各條記錄，代碼如下： 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 = Fal