【文章內(nèi)容簡(jiǎn)介】 改已建的數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)的修改分為：添加、編輯和刪除記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來(lái)完成，下面的章節(jié)將詳細(xì)描述實(shí)現(xiàn)的具體方法。 實(shí)現(xiàn)數(shù)據(jù)庫(kù)之間的聯(lián)系 數(shù)據(jù)庫(kù)之間的關(guān)系指明兩個(gè)庫(kù)之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)連接是指一種虛擬的表，這種表是在當(dāng)用戶(hù)要求從相互關(guān)聯(lián)的各個(gè)不同的表中獲取信息時(shí)建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個(gè)更高級(jí)的連接形式稱(chēng)為自連接。這種連接是指一個(gè)表被連接到它自己 的一個(gè)字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫(kù)中有三種不同類(lèi)型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類(lèi)型用于描述庫(kù)表示什么以及在數(shù)據(jù)庫(kù)中如何與其它的庫(kù)建 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 立關(guān)系。 數(shù)據(jù)庫(kù)操作 對(duì)于數(shù)據(jù)庫(kù)的選擇，系統(tǒng)采用了Access2021作為數(shù)據(jù)庫(kù)的開(kāi)發(fā)工具，相對(duì)于操作方面，Access2021比SQL 具 有更多的優(yōu)越性 ，充分體現(xiàn)著簡(jiǎn)單明了這一理念 。 Access2021 就是關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)工具，數(shù)據(jù)庫(kù)能匯集各種信息以供查詢(xún)、存儲(chǔ)和檢索。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定 義窗體收集信息。數(shù)據(jù)表示圖提供了一種類(lèi)似于 Excel 的電子表格，可以使數(shù)據(jù)庫(kù)一目了然。另外， Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的信息。 Access 也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)文件把數(shù)據(jù)庫(kù)文件置于網(wǎng)絡(luò)文件服務(wù)器，與其他網(wǎng)絡(luò)用戶(hù)共享數(shù)據(jù)庫(kù)。 Access 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開(kāi)發(fā)的最通用的數(shù)據(jù)庫(kù)之一。如上所述， Access 作為關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大功能。 系統(tǒng)中數(shù)據(jù)庫(kù)的功能如下 （ 1） 數(shù)據(jù)刪除：可以選擇地刪除某些數(shù)據(jù)或數(shù)據(jù)庫(kù)中全部數(shù)據(jù)，本操作用在減少數(shù)據(jù)冗余，可以對(duì)數(shù)據(jù)庫(kù)中的數(shù)據(jù)進(jìn)行有選擇的刪除即初始化。 （ 2）動(dòng)態(tài)數(shù)據(jù)更新：系統(tǒng)具備靈活配置系統(tǒng)數(shù)據(jù)的能力，包括客戶(hù)信息更新、添加或刪除一個(gè)客戶(hù)等等。 （ 3）數(shù)據(jù)備份和初始化：根據(jù)用戶(hù)選擇的路徑對(duì)數(shù)據(jù)庫(kù)進(jìn)行手動(dòng)備份，每天進(jìn)行自動(dòng)備份；對(duì)上次使用后的數(shù)據(jù)庫(kù)作了備份后，為減少數(shù)據(jù)冗余，可以對(duì)數(shù)據(jù)庫(kù)中的數(shù)據(jù)進(jìn)行有選擇的刪除即初始化。 客戶(hù)信息登記表 客戶(hù)信息登記表 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 客戶(hù)抽獎(jiǎng)號(hào) Date Datetime 8 登陸日期 Time Datetime 8 上次登陸時(shí)間 Cname Text 30 客戶(hù)姓名 Phone Number 20 聯(lián)系電話(huà) Address Text 50 聯(lián)系地址 Mmode Text 20 聯(lián)系方式 Mpostnumber Number 20 郵政編碼 age Number 8 年齡 Ssex Sex 8 性別 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 客戶(hù)信息錄入表 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 新的客戶(hù)抽獎(jiǎng)號(hào) Date Datetime 8 登陸日期 Time Datetime 8 上次登陸時(shí)間 Cname Text 30 客戶(hù)姓名 Phone Number 20 聯(lián)系電話(huà) Address Text 50 聯(lián)系地址 Mmode Text 20 聯(lián)系方式 Mpostnumber Number 20 郵政編碼 Age Number 8 年齡 Ssex Sex 8 性別 登陸記錄表 表 登陸 記錄表 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID1 自動(dòng)編號(hào) 長(zhǎng)整形 口令 Date Text 8 登錄日期 Time Text 8 登錄時(shí)間 Name Text 30 客戶(hù)姓名 Qdate text 8 退出日期 Qtime text 8 退出時(shí)間 中獎(jiǎng)客戶(hù)名單 表 中獎(jiǎng)客戶(hù)名單 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 抽獎(jiǎng)號(hào)碼 Cname Text 30 客戶(hù)姓名 Ssex Sex 8 性別 Phone Number 20 聯(lián)系 電話(huà) Age Number 8 年齡 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 未中獎(jiǎng)客戶(hù)名單 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 抽獎(jiǎng)號(hào)碼 Cname Text 30 客戶(hù)姓名 Ssex Sex 8 性別 Phone Number 20 聯(lián)系電話(huà) Age Number 8 年齡 所有客戶(hù)名單 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 抽獎(jiǎng)號(hào)碼 Cname Text 30 客戶(hù)姓名 Ssex Sex 8 性別 Phone Number 20 聯(lián)系電話(huà) Age Number 8 年齡 查找范圍表 表 查找范圍表 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 說(shuō)明 ID 自動(dòng)編號(hào) 長(zhǎng)整形 序號(hào) scode Text 10 服務(wù)范圍編號(hào) sname Text 30 服務(wù)范圍名稱(chēng) 啟動(dòng)模塊介紹 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 啟動(dòng)模塊概述 系統(tǒng)加載各模塊時(shí)速度較慢 ,系統(tǒng)的后臺(tái)操作較多 ,為了讓用戶(hù)耐心地等待 ,設(shè)置一個(gè)啟動(dòng)界面是非常必要的 ,它既能美化整 個(gè)系統(tǒng) ,體現(xiàn)出系統(tǒng)友好的用戶(hù)界面 ,又能使用戶(hù)通過(guò)啟動(dòng)界面的顯示信息了解系統(tǒng)的基本概況。 圖 啟動(dòng)界面設(shè)計(jì) 主界面介紹 主界面概述 主界面定義了系統(tǒng)的功能，通過(guò)菜單的選擇實(shí)現(xiàn)對(duì)系統(tǒng)中各模塊的調(diào)用。 主界面設(shè)計(jì) 圖 主界面設(shè)計(jì) 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 查詢(xún)界面介紹 此界面為系統(tǒng)的查詢(xún)功能，不僅可以查詢(xún)已中獎(jiǎng)客戶(hù)的信息，還可以查詢(xún)未中獎(jiǎng)客戶(hù)和原數(shù)據(jù)庫(kù)中所有客 戶(hù)的信息，體現(xiàn)了強(qiáng)大的查詢(xún)功能，為系統(tǒng)管理員的工作帶來(lái)了極大的方便，節(jié)約了大量的人力和物力。 圖 查詢(xún)界面圖 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 登錄模塊介紹 登錄模塊流程 圖 登錄模塊流程 圖 數(shù)據(jù)更新 數(shù)據(jù)更新概述 管理員輸入自己的口令和密碼 登 陸 出錯(cuò)提示 主界面 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 數(shù)據(jù)更新包括：抽獎(jiǎng)號(hào)碼、客戶(hù)姓名、性別、年齡、聯(lián)系方式、電話(huà)號(hào)碼、通信地址、郵政編碼等，不須因?yàn)樵黾右粋€(gè)項(xiàng)目而修改程序，更新操作包括 ：添加、刪除、修改、查詢(xún)。 添加和刪除客戶(hù)信息 添加信息 圖 數(shù)據(jù)更新流程圖 —— 添加 刪除信息 圖 數(shù)據(jù)更新流程圖 —— 刪除 5 編碼 編碼是根據(jù)詳細(xì)設(shè)計(jì)階段得到的流程圖進(jìn)行的代碼書(shū)寫(xiě)，編碼以系統(tǒng)管理員進(jìn)入系統(tǒng)后根據(jù)各項(xiàng)中獎(jiǎng)要求而逐步運(yùn)行系統(tǒng)為例解釋代碼的設(shè)計(jì)時(shí)要考慮的因素和設(shè)計(jì)思路及設(shè)計(jì)方法。 輸入添加信息 檢查庫(kù)中 信息 庫(kù)中已存在 提示記錄已存在 添加記錄 結(jié)束 N Y 要?jiǎng)h除的信息 檢查庫(kù)中信息 存在 不存在 刪除記錄 結(jié) 束 結(jié) 束 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 系統(tǒng)管理員運(yùn)行系統(tǒng)模塊部分代碼及解釋 開(kāi)始抽獎(jiǎng) 點(diǎn)擊“開(kāi)始”控件，數(shù)據(jù)庫(kù)中的號(hào)碼開(kāi)始循環(huán)滾動(dòng)，再點(diǎn)擊“停止”控件，對(duì)話(huà)框中出 現(xiàn)一個(gè)隨機(jī)選取的號(hào)碼。 If = 開(kāi)始 Then = True = 停止 = False = False Else 遇到重復(fù)號(hào)碼時(shí)的處理方案 當(dāng)系統(tǒng)隨機(jī)抽到一個(gè)重復(fù)的號(hào)碼時(shí)，系統(tǒng)會(huì)提醒 該號(hào)碼已經(jīng)抽過(guò)，本次抽取結(jié)果無(wú)效，繼續(xù)下一次抽取。代碼如下： If (Checked) = True Then = False = True MsgBox 此號(hào)碼已經(jīng)抽到過(guò)并且已經(jīng)做了保存！ , vbInformation + vbOKOnly, 提示信息 Else = True = True End If 系統(tǒng)管理員對(duì)所抽取的號(hào)碼進(jìn)行保存 系統(tǒng)管理員對(duì)所抽取的號(hào)碼進(jìn)行保存時(shí)假如結(jié)果無(wú)誤就回把此號(hào)碼保存進(jìn)“中獎(jiǎng)?wù)邤?shù)據(jù)庫(kù)”中，如果保存失敗系統(tǒng)也會(huì)提供相應(yīng)的信息。如下： Private Sub cmdOK_Click() Dim RstSQL As New On Error GoTo errLable With RstSQL .ActiveConnection = CnnDSN .LockType = adLockOptimistic 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) .CursorType = adOpenStatic .Source = UPDATE Lottery_Table SET Checked=39。139。 WHERE Person_ID= amp。 Int() amp。 .Open End With = False = False MsgBox 保存成功！ , vbInformation + vbOKOnly, 提示信息 Exit Sub errLable: MsgBox + ： + , vbInformation + vbOKOnly, 錯(cuò)誤信息 Exit Sub End Sub 6 測(cè)試 測(cè)試目的 軟件測(cè)試是軟件代碼生成后必不可少的一步，軟件測(cè)試包括功能代碼的測(cè)試、系統(tǒng)功能的完整性測(cè) 試、性能測(cè)試、安全性測(cè)試、數(shù)據(jù)庫(kù)的一致性測(cè)試等，測(cè)試的目的是盡可能多的發(fā)現(xiàn)軟件制作過(guò)程中的錯(cuò)誤，通過(guò)測(cè)試使軟件的錯(cuò)誤減少，使系統(tǒng)的可靠性進(jìn)一步提高。 2021 級(jí) 專(zhuān) 科畢業(yè)設(shè)計(jì)論文 第 Ⅰ 頁(yè) 共 Ⅰ 頁(yè) 軟件測(cè)試的內(nèi)容 (1) 根據(jù)需求分析劃定系統(tǒng)測(cè)試的功能范圍，即用戶(hù)需要的功能是否已經(jīng)在系統(tǒng)中得到充分體現(xiàn)。 (2) 分模塊測(cè)試軟件的功能，包括軟件的界面要求、功能體現(xiàn)、性能要求、穩(wěn)定性要求、是否達(dá)到操作便捷、靈活性要求、安全性要求；各模塊之間的關(guān)系是否與需求分析中的一致等 (3) 整體測(cè)試，在分塊測(cè)試之后，將所有模塊作為一個(gè)整體進(jìn)行測(cè)試，測(cè)試整個(gè)系統(tǒng)的功 能和性能，檢驗(yàn)其是否滿(mǎn)足用戶(hù)的需求。 測(cè)試時(shí)間 本系統(tǒng)的測(cè)試分為以下幾個(gè)階段進(jìn)行： 第一階段： 根據(jù)需求分析劃定軟件中要測(cè)試的功能和性能的范圍，確定測(cè)試的內(nèi)容，測(cè)試時(shí)間： ~ 第二階段： 分模塊對(duì)系統(tǒng)中的各模塊進(jìn)行測(cè)試，對(duì)需求分析中各模塊的功能和性能及用戶(hù)的特殊需求進(jìn)行測(cè)試，記下各模塊的所有的問(wèn)題，及時(shí)解決。測(cè)試時(shí)間：~ 第三階段： 在模塊測(cè)試的基礎(chǔ)上將各模塊拼接進(jìn)行整體功能和性能的測(cè)試。測(cè)試時(shí)間： ~ 第四階段： 綜合測(cè)試。測(cè)試時(shí)間： ~ 測(cè)試結(jié)果 測(cè)試中出現(xiàn)了許多功能實(shí)現(xiàn)上的錯(cuò)誤，尤其是在單元代碼測(cè)試階段，許多功能在特殊情況下實(shí)現(xiàn)不了，性能測(cè)試時(shí)錯(cuò)誤較少。測(cè)試結(jié)果為良好。 表 測(cè)試記錄表 功能 模塊 測(cè)試內(nèi)容 功能描述 測(cè)試項(xiàng)目 存在問(wèn)題 處理結(jié)果 界面 流程 功能 完善 各 模 塊 測(cè) 試 劃定測(cè)試范圍 從功能、性能、安全性等方面劃定測(cè)試范圍