【正文】 soryList = End If .Engineer = MakeStr(txtEngineer) .Amount = Val(txtAmount) .Comment = MakeStr(txtComment) 39。屬性支行 txtPlace = Trim() 39。讀取指定對象信息 txtDevNo = Trim() 39。將雙擊選擇的設(shè)備信息放入指定對象中 If Then MsgBox (請選擇記錄 ) Exit Sub End If (Trim((0))) Unload Me End Sub 設(shè)備維護(hù)信息管理模塊 設(shè)備維護(hù)管理模塊可以實現(xiàn)添加、修改、刪除和查看設(shè)備維護(hù)信息 。啟動編輯窗體 1 GridRefresh 39。開通時間 = Trim((8)) 39。設(shè)備型號 = Trim((4)) 39。設(shè)備編號 = Trim((0)) 39。刷新 DataGrid 表格的內(nèi)容 GridRefresh End Sub cmd_modi_click 過程，修改。開通時間 = 39。設(shè)備編號 = 39。刷新設(shè)備信息 GridRefresh End Sub Cmd_add_click 過程。選擇支行 Set = Adodc3 39。顯示列名 = InfoId 39。 設(shè)備分類信息 = Conn 39。設(shè)置連接字符串 = SELECT AS 設(shè)備編號 , AS 分類 , _ + As 設(shè)備品牌 , AS 設(shè)備型號 , AS 購買價格 , _ + AS 布放地點 , AS 所屬支行 , AS 開通時間 , _ + AS 管理員 , AS 提交人 , As 狀態(tài) _ + FROM Device d,BaseInfo t1, BaseInfo t2, BaseInfo t3 _ + WHERE = And = And = _ + SchCnd + ORDER BY Set = Adodc1 39。判斷是否有查詢字段 If Len(Trim(txtDevNo)) = 0 Then SchCnd = Else 39。 下面是窗體 FrmDevice 中各個過程的代碼。關(guān)閉窗口 Unload Me End Sub 設(shè)備信息管理窗體 設(shè)備信息管理窗體的名稱為 FrmDevice。檢查用戶錄入數(shù)據(jù)的有效性 If Len(Trim(txtDevNo)) = 0 Then MsgBox (請輸入設(shè)備編號 ) Exit Sub End If If Len(Trim(txtModel)) = 0 Then MsgBox 請輸入設(shè)備型號 Exit Sub End If If Len(Trim()) = 0 Then MsgBox 請選擇設(shè)備分類 Exit Sub End If If Len(Trim()) = 0 Then MsgBox 請選擇設(shè)備品牌 Exit Sub End If If Len(Trim()) = 0 Then MsgBox 請選擇所屬支行 Exit Sub End If If Len(Trim(txtPrice)) = 0 Then MsgBox 請輸入設(shè)備單價 Exit Sub End If If Len(Trim()) = 0 Then MsgBox 請選擇布放地點 Exit Sub End If 39。綁定數(shù)據(jù)源 = InfoName 39。綁定列值 39。設(shè)置連接字符串 = SELECT * FROM BaseInfo WHERE TypeId=2 39。綁定數(shù)據(jù)源 = InfoName 39。當(dāng)裝入窗體 FrmDeviceEdit 時觸發(fā) Form_Load 事件，對應(yīng)的代碼如下： Private Sub DataRefresh() 39。 設(shè)備信息編輯窗體 設(shè)備信息編輯窗體可以用來添加和修改設(shè)備的基本信息，窗體名稱為FrmDeviceEdit,窗體的布局如圖 44 所示。 刪除分類 (Val()) DataRefresh 39。更新名稱 = Trim(txtName) (OriId) DataRefresh 39。選擇分類名稱，在文本框中對其修改后，單擊“修改”按鈕觸發(fā) Cmd_Modi_Click 事件，對應(yīng)的程序代碼如下： Private Sub Cmd_Modi_Click() 39。記錄編號 If (OriId) = True Then 39。判斷數(shù)據(jù)庫中是否已經(jīng)存在此分類名稱 If (Trim(txtName), 1) = True Then MsgBox (已經(jīng)存在此分類名稱 ) Exit Sub End If 39。設(shè)置列表中顯示字段 = InfoID 39。其中過程 DataRefresh 對應(yīng)的代碼如下： Private Sub DataRefresh() 39。 設(shè)備類型信息管理 設(shè)備類型信息管理窗體的名稱為 FrmType，布局如圖 43 所示 。本系統(tǒng)中主窗體名為 FrmMain。 設(shè)計登錄窗體 登錄窗體的名稱為 FrmLogin,他的界面布局如圖 41 所示。 6) Discard 類用來管理表 Discard 的數(shù)據(jù)庫操作，它保存為 。 2) Devicees 類用來管理表 Device 的數(shù)據(jù)庫操作 ,它保存為 。 ? Variable 用來管理工程中的全局變量。 表 27 表 Users 的結(jié)構(gòu) 編號 字段名稱 數(shù)據(jù)類型 說明 1 UserName Varchar50 用戶名，主鍵 2 UserPwd Varchar50 密碼 在表的結(jié)構(gòu)表中定義了每個表的主鍵，為了規(guī)定各表之間的關(guān)系，還定義一組外鍵，如表 28所示。 表 22 表 Device 的結(jié)構(gòu) 編號 字段名稱 數(shù)據(jù)類型 說明 1 DevNo Varchar50 設(shè)備編號，主鍵 2 TypeID Int 設(shè)備分類編號 3 EnterpriseID Int 設(shè)備品牌編號 4 Model Varchar50 設(shè)備型號 5 Price Int 購買價格 6 Place Varchar50 設(shè)備布放地點 7 BranchID Int 設(shè)備所屬支行編號 8 StartDate Datetime 設(shè)備開通時間 9 Administrator Varchar50 設(shè)備管理員 10 Poster Varchar50 提交人 11 Status Varchar50 設(shè)備狀態(tài)（正常，報廢） (3)設(shè)備維護(hù)表 Maintenance,保存設(shè)備的維護(hù)信息，結(jié)構(gòu)如圖 23所示。因為數(shù)據(jù)庫結(jié)構(gòu)的變化會造成編碼的改動，所以必須認(rèn)真設(shè)計數(shù)據(jù)庫結(jié)構(gòu)后再進(jìn)行編碼，從而避免無謂的重復(fù)工作。 系統(tǒng)分析的基本方法 在傳統(tǒng)的需求建模方法中有面向數(shù)據(jù)流，面向?qū)ο笠约懊嫦驍?shù)據(jù)等三種常用分析方法， （ 1） .面向數(shù)據(jù)流的分析方法 該方法以信息對象及其操作為核心進(jìn)行需求分析，可以按順序、選擇、重復(fù)三種結(jié)構(gòu)把復(fù)合信息對象分解為成員信息對象。面對國外強(qiáng)勢的沖擊，在銀行業(yè)中有大部分的市場。 開發(fā)工具： Visual Basic 和 SQL Server 2021 都是現(xiàn)在用到的編程和數(shù)據(jù)庫方面的主要工具 ,對工具的安裝和使 用方面不會有所限制。使用計算機(jī)進(jìn)行的管理、提供的服務(wù)是規(guī)范的、統(tǒng)一的，它在銀行設(shè)備管理當(dāng)中的應(yīng)用不僅可以簡化、規(guī)范廠銀行的日常操作，而且可以使銀行對設(shè)備的管理更加簡單、方便、快捷、清晰、從而減輕工作人員的勞動強(qiáng)度、減低銀行的財政消耗。其中最突出的是要算在銀行計算機(jī)管理了。 ? 常用 SQL 語句的使用。 與其他開發(fā)工具相比， Visual Basic 具有簡單易學(xué)、靈活方便和易于擴(kuò)充等特點，越來越多地被用作客戶 /服務(wù)器應(yīng)用程序的前端開發(fā)工具，與后端的 SQL SERVER 數(shù)據(jù)庫相結(jié)合，能夠提供一個高性能的管理信 息系統(tǒng)解決方案。如果 3次輸入的用戶名和密碼都無法與數(shù)據(jù)庫中的數(shù)據(jù)匹配，則強(qiáng)制退出系統(tǒng)。設(shè)備報廢信息包括報廢申請人、折算金額、報廢原因等。 在設(shè)備移機(jī)信息管理模塊中，可以對設(shè)備移機(jī)信息進(jìn)行添加、修改、刪除和查詢等操作。 在設(shè)備巡檢信息管理模塊中，可以對設(shè)備 巡檢信息進(jìn)行添加、修改、刪除和查詢等操作。在添加自助設(shè)備信息時，需要選擇設(shè)備分類、設(shè)備品牌和所屬支行等信息。 添加基本信息后，就可以添加自助設(shè)備信息了。 在本系統(tǒng)中，應(yīng)該首先增加基本信息，之后增加自助設(shè)備信息。 如果需要對普通用戶進(jìn)行管理，則使用 Admin用戶登錄；否則建議使用 Users用戶登錄。 運(yùn)行系統(tǒng)后，首先會看到登錄窗體，對用戶的身份進(jìn)行認(rèn)證。它們的 默認(rèn)密碼均為 111111。系統(tǒng)功能模塊如 圖21 所示。 模塊化設(shè)計原理 模塊化設(shè)計思想即把程序劃分為若干個模塊，每個模塊完成一個子功能，把這些模塊集總起 來組成一個整體，可以完成指定的功能滿足問題的要求。 ? 設(shè)備維護(hù)信息的添加、修改、刪除和查詢。 第二章系統(tǒng)分析 系統(tǒng)需求分析 銀行設(shè)備管理系統(tǒng)的用戶是銀行中負(fù)責(zé)自助設(shè)備管理和維護(hù)的技術(shù)人員， 包括設(shè)備類型管理、設(shè)備品牌管理、支行信息管理、設(shè)備維護(hù)信息管理、設(shè)備移機(jī)信息管理、設(shè) 備巡檢信息管理和設(shè)備報廢信息管理等主要功能，具體功能如下： ? 設(shè)備類型信息的添加、修改、刪除和查詢。 SQL 不要求用戶指定對數(shù)據(jù)的存放方法， 這種特性使用戶更易集中精力于要得到的結(jié)果；所有 SQL 語句 使用查詢優(yōu)化器，它是 RDBMS 的一部分，由它決定對指定數(shù)據(jù)存取的最快速度的手段，查詢優(yōu)化器知道存在什么索引，在哪兒使用索引合適，而用戶則從不需要知道表是否有索引、有什么類型的索引。 MS SQL Server 就是用的 Transact SQL。 SQL 語句通常用于完成一些數(shù)據(jù)庫 的操作任務(wù)，比如在數(shù)據(jù)庫中更新數(shù)據(jù)，或者從數(shù)據(jù)庫中檢索數(shù)據(jù)。 本系統(tǒng)采用 SQL 技術(shù)建立數(shù)據(jù)庫，然后建立數(shù)據(jù)源的鏈接，并且生成醫(yī)院門診管理的數(shù)據(jù)庫應(yīng)用程序從而實現(xiàn)數(shù)據(jù)庫的管理功能。 總之，數(shù)據(jù)庫系統(tǒng)是一個計算機(jī)存儲記錄的系統(tǒng)，即，它是一個計算機(jī)系統(tǒng)，該系統(tǒng)的目標(biāo)存儲信息 并支持用戶檢索和更新所需要的信息。因此，數(shù)據(jù)庫的學(xué)習(xí)是非常重要的。數(shù)據(jù)庫技術(shù)與網(wǎng)絡(luò)通信技術(shù)相結(jié)合，產(chǎn)生了分布式數(shù)據(jù)庫系統(tǒng)，數(shù)據(jù)庫技術(shù)與面象對象技術(shù)相結(jié)合，產(chǎn)生了面向?qū)ο髷?shù)據(jù)庫系統(tǒng)等各種數(shù)據(jù)庫系統(tǒng)。 數(shù)據(jù)庫及其應(yīng)用 自 20 世紀(jì) 70 年代以來，數(shù)據(jù)庫技術(shù)得到迅速發(fā)展。 本文的數(shù)據(jù)庫系統(tǒng)是一個銀行設(shè)備管理系統(tǒng)，包括設(shè)備類型管理、設(shè)備品牌管理、支行信息管理、設(shè)備維護(hù)信息管理、設(shè)備移機(jī)信息管理、設(shè)備巡檢信息管理和設(shè)備報廢信息管理等功能。摘要 隨著銀行卡的普及，很多地方安裝了大量的存款機(jī)、取款機(jī)和 POS機(jī)等銀行自助設(shè)備。在文章的最后，還根據(jù)數(shù)據(jù)庫系統(tǒng)的調(diào)試結(jié)果，提出了可以 進(jìn)一步改進(jìn)的部分，以便在投入實際應(yīng)用后系統(tǒng)可以更加穩(wěn)定可靠的工作。 我國銀行業(yè)計算機(jī)系統(tǒng)的引進(jìn)，從早期的脫機(jī)處理系統(tǒng)，到聯(lián)機(jī)處理系統(tǒng)，再到計算機(jī)網(wǎng)絡(luò)支撐下的綜合銀行處理系統(tǒng)，走過了二十多年的歷程，銀行計算機(jī)的普遍應(yīng)用，已從根本上改變了傳統(tǒng)的工作方式，使銀行的經(jīng)營、管理發(fā)生了深刻的變革。 現(xiàn)在，數(shù)據(jù)庫技術(shù)還在不斷發(fā)展，并且不斷的與其它計算機(jī)技術(shù)相互滲透。對于一個國家，數(shù)據(jù)庫的建設(shè)規(guī)模，使用水平已成為衡量該國信息化程度的重要標(biāo)志。系統(tǒng)用戶可以對這些文件執(zhí)行插入數(shù)據(jù)、檢索數(shù)據(jù)、更改數(shù)據(jù)、刪除數(shù)據(jù)等一系列操作。 該數(shù)據(jù)庫應(yīng)用程序按照用戶權(quán)限和實現(xiàn)功能的不同分為兩部分：外部用戶對數(shù)據(jù)庫的查詢 訪問和內(nèi)部管理人員對數(shù)據(jù)記錄的管理維護(hù)，每一部分中包含各自實現(xiàn)的各項功能，對每一項功能的實現(xiàn)，將按照窗體設(shè)計以及運(yùn)行情況的順序逐一進(jìn)行設(shè)計。 ANSI（美國國家標(biāo)準(zhǔn)學(xué)會）聲稱， SQL 是關(guān)系數(shù)據(jù)庫管理系統(tǒng)的標(biāo)準(zhǔn)語言。但是，標(biāo)準(zhǔn)的 SQL 命令，比如 Select、 Insert、 Update、 Delete、 Create和 Drop常常被用于完成絕大多數(shù)數(shù)據(jù)庫的操作。SQL 的集合特性允許一條 SQL 語句的結(jié)果作為另一條 SQL 語句的輸入。所有關(guān)系數(shù)據(jù)庫的公共語言：由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)