【正文】 Else Exit Sub End If End If 39。在此次設(shè)計(jì)中，我必須根據(jù)操作流程的要求對(duì) 設(shè)備 管理進(jìn)行系統(tǒng)方塊圖的設(shè)計(jì)。 由于 本人 本身能力的局限性，所以編寫(xiě)的代碼，即使經(jīng)過(guò)反復(fù)檢查也難免出錯(cuò)，所以在本階段力求使用有限的時(shí)間找出盡可能多的錯(cuò)誤，力求系統(tǒng)盡量正確。 對(duì)添加用戶的測(cè)試： 第一步：輸入用戶名，如果用戶名已存在，系統(tǒng)提示“用戶已經(jīng)存 在，請(qǐng)重新輸入！”。 （ 1） 黑盒測(cè)試，也稱功能測(cè)試或數(shù)據(jù)驅(qū)動(dòng)測(cè)試，它是在已知產(chǎn)品所應(yīng)具有的功能的情況下，通過(guò)測(cè)試來(lái)檢測(cè)每個(gè)功能都能正常使用。 圖 設(shè)備變動(dòng)信息列表 27 設(shè)備維護(hù)窗體的設(shè)計(jì) 選擇“基本信息管理 |設(shè)備維護(hù) ”菜單 ，將出現(xiàn)如圖 所示的窗體。 在 檔案管理 信息列表中選擇修改的記錄，然后單擊“修改按鈕”，將出現(xiàn)如 圖 設(shè)備檔案信息列表 24 圖 所示的窗體。 圖 添加用戶 主窗體及其控件屬性設(shè)置： frmLogin1(Form)的屬性為： Name(屬性取值： FrmLogin1)。 用戶登陸窗體的設(shè)計(jì)： 系統(tǒng)啟動(dòng)后，將首先出現(xiàn)如圖 。StartUpPosition(屬性取值： 2屏幕中心 )。 根據(jù)數(shù)據(jù)庫(kù)的需求分析和概念結(jié)構(gòu)設(shè)計(jì)，設(shè)計(jì)了名稱為 SBGL 的數(shù)據(jù)庫(kù)。具體功能描述如下： 1．系統(tǒng)信息管理： 用戶管理（添加或刪除用戶） 密碼管理（修改用戶的密碼） 2. 設(shè) 備檔案管理： 設(shè)備類型信息的添加，修改，刪除和查詢 設(shè)備名稱的添加，修改，刪除和查詢 設(shè)備生產(chǎn)廠家 的添加，修改，刪除和查詢 設(shè)備型號(hào)的添加，修改，刪除和查詢 12 設(shè)備類型存放地點(diǎn) 信息的添加，修改，刪除和查詢 設(shè)備主要性能信息的添加，修改，刪除和查詢 3． 設(shè)備變動(dòng)管理 設(shè)備調(diào)出的信息（存放地點(diǎn)，調(diào)入時(shí)間，數(shù)量） 新管理員 (姓名 ) 設(shè)備新布放地點(diǎn) 4. 設(shè)備維護(hù)管理 設(shè)備報(bào)修時(shí)間 故障解決時(shí)間 故障原因 13 系統(tǒng)功 能模塊圖 ： 系統(tǒng)信息管理 設(shè)備檔案管理 設(shè)備變動(dòng)管理 石化企業(yè)設(shè)備信息管理系統(tǒng) 設(shè)備維護(hù)管理 密 碼 修 改 退 出 用 戶 添 加 設(shè) 備 名 稱 設(shè) 備 型 號(hào) 存 放 地 點(diǎn) 生 產(chǎn) 廠 家 設(shè) 備 名 稱 入 廠 時(shí) 間 調(diào) 出 原 因 所 在 地 調(diào) 出 時(shí) 間 管 理 員 報(bào) 修 時(shí) 間 解 決 時(shí) 間 故 障 原 因 圖 系統(tǒng)模塊圖 14 數(shù)據(jù)庫(kù)分析： 1. 數(shù)據(jù)庫(kù)在一個(gè)信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的好壞將直接對(duì)應(yīng)用系統(tǒng)的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。在企業(yè)管理中，設(shè)備管理系統(tǒng)的實(shí)現(xiàn)將給企業(yè)帶來(lái)巨大的經(jīng)濟(jì)效益。下面是 DDL 命令： 8 CREATE TABLE， ALTER TABLE， DROP TABLE， CREATE INDEX， DROP INDEX SQL 語(yǔ)言是一種非過(guò)程化語(yǔ)言，它一次處理一個(gè)記錄集合， 對(duì)數(shù)據(jù)提供自動(dòng)導(dǎo)航。 1986 年ANSI 采用 SQL 語(yǔ)言作為關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)的標(biāo)準(zhǔn)語(yǔ)言，后被國(guó)際化標(biāo)準(zhǔn)組織（ ISO）采納為國(guó)際標(biāo)準(zhǔn)。面向?qū)ο蟮母拍钭钤绯霈F(xiàn)在程序設(shè)計(jì)語(yǔ)言中，隨后迅速滲透到計(jì)算機(jī)領(lǐng)域的每一個(gè)分支?，F(xiàn)在市場(chǎng)上典型的關(guān)系 DBMS 產(chǎn)品有 DB ORACLE、 SYBASE、 INFORMIX 和微機(jī)型產(chǎn)品 Foxpro、 Access 等。 （ 3）關(guān)系模型 ： 關(guān)系模型的主要是用二維表格結(jié)構(gòu)表達(dá)實(shí)體集，用外鍵表示實(shí)體間聯(lián)系。 （ 2）網(wǎng)狀模型 ： 用有向圖結(jié)構(gòu)表示實(shí) 體類型及實(shí)體間聯(lián)系的數(shù)據(jù)模型。這類模型涉及到計(jì)算機(jī)系統(tǒng)和數(shù)據(jù)庫(kù)管理系統(tǒng)，又稱為 “ 結(jié)構(gòu)數(shù)據(jù)模型 ” ?，F(xiàn)已形成相當(dāng)規(guī)模的理論體系和實(shí)用技術(shù)。這些技術(shù)沒(méi)有脫離經(jīng)典數(shù)據(jù)庫(kù)技術(shù)的要求。它也是當(dāng)前 Windows 平臺(tái)上第一個(gè)全面支持最新 Web 服務(wù)的快速開(kāi)發(fā)工具。 2 第 2 章 開(kāi)發(fā)軟件簡(jiǎn)介 開(kāi)發(fā)工具 Visual Basic 自 Java 誕生以來(lái)，隨著 Inter 技術(shù)的普及和應(yīng)用需求的變化，以第四代語(yǔ)言為主的應(yīng)用開(kāi)發(fā)產(chǎn)品發(fā)生了較大的變化，它們不僅已成為人們開(kāi)發(fā)應(yīng)用的開(kāi)發(fā)工具，而且很多產(chǎn)品已發(fā)展成為一種強(qiáng)有力的應(yīng)用開(kāi)發(fā)環(huán)境。隨著企業(yè)生產(chǎn)規(guī)模的急劇擴(kuò)大，管理現(xiàn)代化程度的提高，使設(shè)備管理的地位愈來(lái)愈突出，作用愈來(lái)愈顯著 [1]。s VISUAL as the development kit. According to needs to draw system39。根據(jù)兩大部分劃分了各功能模塊，一個(gè)是設(shè)備信息管理， 另 一個(gè)是系統(tǒng)用戶管理。 先根據(jù)需要畫(huà)出系統(tǒng)的流程圖， 然后用 VB 創(chuàng)建了主界面和登錄界面。s production efficiency, has the vital role. This system takes SQL Server 2021 as backstage database and takes the Microsoft Corporation39。 任何一種工業(yè)管理制度和技術(shù)管理制度，都是為滿足和適應(yīng)當(dāng)時(shí)科學(xué)技術(shù)和工業(yè)發(fā)展的需要而出現(xiàn)的。加強(qiáng)對(duì)企業(yè)設(shè)備的管理，對(duì)促進(jìn)經(jīng)濟(jì)進(jìn)步，實(shí)現(xiàn)工業(yè)現(xiàn)代化具有重要的意義 [5]。 Visual Basic 是操作系統(tǒng)中快速應(yīng)用開(kāi)發(fā) 3 環(huán)境的最新版本。同時(shí)， Inter 技術(shù)提供了一種向用戶發(fā)布數(shù)據(jù)庫(kù)內(nèi)容的標(biāo)準(zhǔn)化的訪問(wèn)方法。數(shù)據(jù)庫(kù)技術(shù)作為數(shù)據(jù)管理技術(shù)，是計(jì)算機(jī)軟件領(lǐng)域的一個(gè)重要分支，產(chǎn)生于 60 年代末。 另一種數(shù)據(jù)模型是直接面向數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)，它是現(xiàn)實(shí)世界的第二層抽象 。但層次模 5 型有兩個(gè)缺點(diǎn)：一是只能表示 1∶N 聯(lián)系，雖然有多種輔助手段實(shí)現(xiàn)了 M∶N 聯(lián)系，但都較復(fù)雜，用戶不易掌握，二是由于樹(shù)型結(jié)構(gòu)層次順序的嚴(yán)格和復(fù)雜，引起數(shù)據(jù)的查詢和更新操作也很復(fù)雜，因此，編寫(xiě)應(yīng)用程序也很復(fù)雜。網(wǎng)狀模型有許多成功的產(chǎn)品 ,20 世紀(jì) 70 年代的產(chǎn)品大部分網(wǎng)狀系統(tǒng) ,例如 ,Honeywell 公司的 IDS/Ⅱ 、 HP 公司的 IMAGE/3000、 Burroughs 公司的 DMSⅡ 、 Umivac 公司的 DMS1100、 Culli 公司的 IDMS、 Cim 公司的 TOTAL等 。 80 年代初才形成產(chǎn)品，但很快得到廣泛的應(yīng)用和普及，并最終取代了層次、網(wǎng)狀數(shù)據(jù)庫(kù)產(chǎn)品。因此，人們需要更高級(jí)的 數(shù)據(jù)庫(kù)技術(shù)來(lái)表達(dá)這類信息。 SQL 語(yǔ)句可以從關(guān)系數(shù)據(jù)庫(kù)中獲得數(shù)據(jù)，也可以建立數(shù)據(jù)庫(kù)、增加數(shù)據(jù)、修改數(shù)據(jù)。 DDL 語(yǔ)句可以用于創(chuàng)建用戶和重建數(shù)據(jù)庫(kù)對(duì)象。隨著企業(yè)生產(chǎn)規(guī)模的急劇擴(kuò)大，管理現(xiàn)代化程度的提高，使設(shè)備管理的地位愈來(lái)愈突出，作用愈來(lái)愈顯著。 10 ER 圖 : 圖 設(shè)備檔案 ER 圖 圖 設(shè)備變動(dòng) ER 圖 設(shè)備檔案信息 名稱 編號(hào) 生產(chǎn)廠家 型號(hào) 存放地點(diǎn)點(diǎn) 主要性能 設(shè)備變動(dòng)信息 聯(lián)系電話 剩余數(shù)量 調(diào)出時(shí)間 調(diào)入時(shí)間 新管理員 新布放地 11 報(bào)修時(shí)間 解決時(shí)間 故障原因 設(shè)備維護(hù)信息 圖 設(shè)備維護(hù) ER 圖 系統(tǒng) 概要設(shè)計(jì)： 系統(tǒng)功能 分析 ： 石化企業(yè)設(shè)備管理系統(tǒng)是針對(duì)企業(yè)的大量設(shè)備用計(jì)算機(jī)進(jìn)行全面的現(xiàn)代化管理，它主要包括系統(tǒng)設(shè)備檔案管理，設(shè)備變動(dòng)管理，設(shè)備維修管理這幾方面功能。 現(xiàn)在需要將上面的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為 SQL Server 2021 數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。Caption(屬性取值： 石化企 18 業(yè)設(shè)備 管理系統(tǒng) )。 系統(tǒng)信息模塊的設(shè)計(jì) 用系統(tǒng)信息管理模塊只要實(shí)現(xiàn)： 用戶登陸；添加用戶；修改用戶密碼 。添加用戶窗體中放置了三個(gè)文本框（ TextBox） ，用來(lái)輸入用戶名、用戶密碼和確認(rèn)密碼；兩個(gè)按鈕（ CommamdButton）用來(lái)確定或者取消；三個(gè)標(biāo)簽（ Label） 用來(lái)標(biāo)示窗體的信息 。當(dāng)輸入完畢，單擊“保存”按鈕，將首先判斷輸入內(nèi)容是否滿足要求 ，然后添加到數(shù)據(jù)庫(kù)中。選擇記錄的內(nèi)容將顯示在窗體中，可以進(jìn)行修改，最后保存修改后的記錄。從測(cè)試是否針對(duì)系統(tǒng)的內(nèi)部結(jié)構(gòu)和具體實(shí)現(xiàn)算法的角度，可分為白盒測(cè)試和黑盒測(cè)試。 如果用戶輸入信息不正確，并且超過(guò) 3次，系統(tǒng)自動(dòng)退出。 由于許多窗體的測(cè)試都很相似，所以在這里就不一一重復(fù)。通過(guò)此次畢業(yè)設(shè)計(jì)，使我了解到了許多方面的知識(shí)，尤其是管理系統(tǒng)的組成以及一些管理系統(tǒng)理論方面的知識(shí)。數(shù)據(jù)有效性檢查 If txtUser = Then MsgBox 請(qǐng)輸入用戶名 Exit Sub End If If txtPwd = Then MsgBox 請(qǐng)輸入密碼 Exit Sub End If 35 NameKey = MakeStr(txtUser) PasswordKey = MakeStr(txtPwd) 39。讀取指定對(duì)象信息 txtDevNo = Trim() 39。根據(jù)變量 Modify的值，決定 是插入新數(shù)據(jù)，還是修改已有的數(shù)據(jù) If Modify = False Then .Insert Else .Update (OriId) 40 End If End With 3