【正文】 (3)成功的測(cè)試是發(fā)現(xiàn)了至今為止尚未發(fā)現(xiàn)的錯(cuò)誤的測(cè)試。 測(cè)試的目標(biāo)： (1)測(cè)試是為了發(fā)現(xiàn)程序中的錯(cuò)誤而執(zhí)行程序的過成。軟件測(cè)試的主要過程是根據(jù)軟件開發(fā)各階段的規(guī)格說明和程序內(nèi)部結(jié)構(gòu)，精心設(shè)計(jì)若干 測(cè)試用例，使用這些測(cè)試用例運(yùn)行程序，從而找出程序中隱藏的錯(cuò)誤。, DBCnn, adOpenStatic, adLockOptimistic (操作員 ) = (日期 ) = Date (操作時(shí)間 ) = Time (操作模塊 ) = 設(shè)備類型管理界面 (操作 ) = 刪除 (備注 ) = 刪除的類型為： amp。, DBCnn, adOpenStatic, adLockOptimistic select * from Log_Info where 操作員 =39。 Trim() amp。, DBCnn, adOpenStatic, adLockOptimistic If 0 Then MsgBox 該類型與其他信息相關(guān)聯(lián)，不能刪除 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 38 頁 共 46 頁 Exit Sub Else select * from EquType_Info where Type_ID=39。 Trim() amp。 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 37 頁 共 46 頁 End If End If End Sub Private Sub Command4_Click() Dim rs As New Dim rs1 As New If = Then MsgBox 請(qǐng)選擇要?jiǎng)h除的類型 Exit Sub End If If = Then MsgBox 請(qǐng)選擇要?jiǎng)h除的類型 Exit Sub End If select * from Equip_Info where Type_ID=39。39。 amp。, DBCnn, adOpenStatic, adLockOptimistic If 0 Then 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 36 頁 共 46 頁 MsgBox 存在名為 。 Trim() amp。, DBCnn, adOpenStatic, adLockOptimistic If = 0 Then MsgBox 請(qǐng)從上表中選擇要修改的類型 Exit Sub Else select * from EquType_Info where Type_Name like 39。 Trim() amp。其窗體如圖所示： （管理員登錄用戶名： admin 密碼： admin） 圖 系統(tǒng)登陸模塊 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 27 頁 共 46 頁 系統(tǒng)主界面 圖 . 系統(tǒng) 主界面 設(shè)備購置管理模塊設(shè)計(jì) 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 28 頁 共 46 頁 圖 設(shè)備購置管理 模塊 設(shè)備維修模塊設(shè)計(jì) 圖 設(shè)備維修管理 模塊 設(shè)備報(bào)廢模塊設(shè)計(jì) 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 29 頁 共 46 頁 圖 設(shè)備報(bào)廢管理 模塊 入庫查詢與統(tǒng)計(jì)模塊設(shè)計(jì) 圖 入庫查詢與統(tǒng)計(jì) 模塊 維修查詢與統(tǒng)計(jì)模塊設(shè)計(jì) 圖 維修查詢與統(tǒng)計(jì) 模塊 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 30 頁 共 46 頁 其主要代碼如下： Private Sub Command1_Click() Dim rs1 As New = True If = True Then If adStateClosed Then End If , Set = DataEnvironment1 = Cmdmend If 1 Then = False MsgBox 沒有記錄 End If End If If = True Then If = Then MsgBox 請(qǐng)輸入設(shè)備編號(hào) 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 31 頁 共 46 頁 Exit Sub End If If adStateClosed Then End If txtid Set = DataEnvironment1 = Cmdmend1 If 1 Then = False MsgBox 沒有記錄 End If End If If = True Then If = Then MsgBox 請(qǐng)選擇一個(gè)實(shí)驗(yàn)室 Exit Sub End If If adStateClosed Then 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 32 頁 共 46 頁 End If Commend2 Set = DataEnvironment1 = Cmdmend2 If 1 Then = False MsgBox 沒有記錄 End If End If End Sub 報(bào)廢查詢 與統(tǒng)計(jì) 模塊設(shè)計(jì) 圖 報(bào)廢查詢與統(tǒng)計(jì) 模塊 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 33 頁 共 46 頁 其主要代碼如下： Private Sub Command1_Click() Dim rs1 As New = True If = True Then If adStateClosed Then End If , Set = DataEnvironment1 = Cmdbroke If 1 Then = False MsgBox 沒有記錄 End If End If If = True Then If = 請(qǐng)選擇 Then MsgBox 請(qǐng)選擇一個(gè)實(shí)驗(yàn)室 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 34 頁 共 46 頁 Exit Sub End If If adStateClosed Then End If Set = DataEnvironment1 = Cmdbroke1 If 1 Then = False MsgBox 沒有記錄 End If End If End Sub 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 35 頁 共 46 頁 設(shè)備類型管理模塊設(shè)計(jì) 圖 設(shè)備類型管理 模塊 其主要代碼如 下： Private Sub Command1_Click() Dim rs As New Dim rs1 As New select * from EquType_Info where Type_ID =39。賦予普通管理員修改密碼的權(quán)限。按操作員輸入的編號(hào)、設(shè)備名能以查詢一個(gè)至多個(gè)數(shù)據(jù)庫的庫存記錄，并可打印存檔。 2． 設(shè)備管理模塊： 錄入設(shè)備信息，輸入完成后，將數(shù)據(jù)存盤。一個(gè)好的點(diǎn)子系統(tǒng)要有一些必要的模塊組成，若缺少了某些模塊那么這個(gè)系統(tǒng)就會(huì)有缺陷。 采用模塊化原理可以使軟件結(jié)構(gòu)清晰，不僅容易設(shè)計(jì)也容易閱讀和理解。 （ Connection） （ Command） （ Recordset） 利用以上的三種方法可以操作數(shù)據(jù)庫，完成數(shù)據(jù)庫的添加，修改，刪除和查詢。 ADO 提供了一系列的類和方法，用來與數(shù)據(jù)庫建立連接，然后數(shù)據(jù)中的數(shù)據(jù)進(jìn)行各種操作。 ADO使用 OLEDB 數(shù)據(jù)支持提供了一個(gè)面向?qū)ο蟮脑L問數(shù)據(jù)源的接口，它是 DAO 和RDO 對(duì)象模型的集大成者，集合了 DAO 和 RDO 的優(yōu)點(diǎn)。 ADO被設(shè)計(jì)成一種非常簡(jiǎn)單的格式，通過 ODBC 的方法同數(shù)據(jù)庫借口相連。 ADO，即 Axtive Data Object，實(shí)際是一種提供訪問各種數(shù)據(jù)類型的連接機(jī)制。 表 設(shè)備 信息 列表 中文字段名 英文字段名 字段類型 長度 主鍵 /外鍵 字段值約束 設(shè)備 編號(hào) Char 16 P NOT NULL 設(shè)備類型 Int 4 NOT NULL 設(shè)備供應(yīng)商 Text 16 NOT NULL 購置日期 Datatime 12 NOT NULL 單價(jià) Float 8 NOT NULL 購買數(shù)量 Int 4 NOT NULL 保修年限 Int 4 NOT NULL 設(shè)備使用者 Char 16 NULL 所屬實(shí)驗(yàn)室 Int 4 NOT NULL 備注 Varchar 200 NULL 是否外借 Char 4 默認(rèn)“否” 是否報(bào)廢 Char 4 默認(rèn)“否” （ 5）用戶管理員 表：主要管理用戶信息的表，如 用戶名，密碼等。 表 設(shè)備 維修信息 表 中文字段名 英文字段名 字段類型 長度 主鍵 /外鍵 字段值約束 設(shè)備 編號(hào) Int 16 NOT NULL 設(shè)備名稱 Text 20 NOT NULL 設(shè)備類型 Text 20 NOT NULL 損壞數(shù)量 Int 4 NOT NULL 維修單位 Text 16 NULL 維修費(fèi)用 Float 8 NULL 維修日期 Datetime 12 NULL （ 3）設(shè)備 種類 管理 表：用來管理設(shè)備 編號(hào)，設(shè)備類型，報(bào)廢意見，意見回復(fù)，報(bào)廢日期 等 等 。本數(shù) 據(jù)庫的 ER圖如下所示： 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 21 頁 共 46 頁 圖 系統(tǒng) ER 圖 數(shù)據(jù)庫表設(shè)計(jì) 由數(shù)據(jù)模型利用 SQL Server 2020 進(jìn)行數(shù)據(jù)庫的詳細(xì)設(shè)計(jì)，根據(jù)用戶實(shí)際使用中所可能需要的信息對(duì)數(shù)據(jù)表的功能提出的基本的要求，其基本表的設(shè)計(jì)如下所示： 用戶 管理 實(shí)驗(yàn)室 設(shè)備 存放 故障 維修報(bào)表 密碼 登入權(quán)限 名稱 類別 設(shè)備名稱 型號(hào) 類別 數(shù)量 生產(chǎn)廠家 購買人 單價(jià) 規(guī)格 型號(hào) 修理日期 維修費(fèi)用 維修人或者修理廠家 規(guī)格 數(shù)量 購買日期 設(shè)備編號(hào) 用戶名 設(shè)備名稱 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 22 頁 共 46 頁 （ 1） 實(shí)驗(yàn)室信息表 :用來 管理 實(shí)驗(yàn)室信息的表 ,如 實(shí)驗(yàn)室 編號(hào) ,名稱 ,對(duì)應(yīng)的管理員編號(hào) 等。 全局 ER 設(shè)計(jì) 所有局部 ER 模式都設(shè)計(jì)好后，接下來就是把它們綜合成單一的全局概念結(jié)構(gòu)。 （ 3） 全局 ER模式的優(yōu)化 在得到全局 ER 模式后，為了提高數(shù)據(jù)庫系統(tǒng)的效率，還應(yīng)進(jìn)一步依據(jù)處理需求對(duì) ER 模式進(jìn)行優(yōu)化。 （ 2） 消除沖突 沖突分為三類：屬性沖突，結(jié)構(gòu)沖突，命名沖突。全局概念結(jié)構(gòu)不僅要支持所有局部 ER模式，而且必須合理地表示一個(gè)完整，一致的數(shù)據(jù)庫概念結(jié)構(gòu)。利用ER 方法進(jìn)行數(shù)據(jù)庫的概念設(shè)計(jì)，可分為三步進(jìn)行：合成一個(gè)全局模式，最后對(duì)全局 北京聯(lián)合大學(xué)實(shí)訓(xùn)報(bào)告 第 20 頁 共 46 頁 ER 模式進(jìn) 行優(yōu)化，得到最終的模式，即概念模式。 ER模型的“聯(lián)系”用于刻畫實(shí)體之間任意兩個(gè)實(shí)體類型，依據(jù)需求分析的結(jié)果，考察局部結(jié)構(gòu)中任意實(shí)體關(guān)系，進(jìn)一步確定是 1： N， M： N，還是1： 1 等。 (4) 易于向各種數(shù)據(jù)模型轉(zhuǎn)換。 (3) 要易于更改。 對(duì)數(shù)據(jù)庫概念模型的要求 ： 表達(dá)概念設(shè)計(jì)的結(jié)果稱為概念模型，對(duì)概念模型有以下要求： (1) 有豐富的語義表達(dá)能力，能表達(dá)用戶的各種需求。通過概念設(shè)計(jì)得到的概念模型是從現(xiàn)實(shí)世界的角度對(duì)所要解決的問題的描述，不依賴于具體的硬件環(huán)境和 DBMS。 概念結(jié)構(gòu)是對(duì)現(xiàn)實(shí)世界的一種抽象。概念模型的描述工具通常是使用 ER模型圖。而現(xiàn)實(shí)應(yīng)用環(huán)境是復(fù)雜多變的，如果把實(shí)現(xiàn)世界中的事物直接轉(zhuǎn)換為機(jī)器中的對(duì)象，就非常不方便。 4． 2 數(shù)據(jù)庫的概念設(shè)計(jì) 概 念模型是數(shù)據(jù)庫系統(tǒng)的核心和基礎(chǔ)。消除多對(duì)多關(guān)系可以借助于 ER 圖的方法來解決，也可以在系統(tǒng)分析時(shí)予以注意，避免這種情況的發(fā)生。 （ 2）確定單一的父子關(guān)系結(jié)構(gòu)所謂確定單一的父系關(guān)系