【正文】 因為在程序設(shè)計中經(jīng)常會有重復(fù)的地方，所以把它做成一個函數(shù)或一個過程，在使用時進行調(diào)用，可以節(jié)省大量的輸入代碼的時間，而且使用函數(shù)和過程也便于程序的結(jié)構(gòu)化和修改查看。函數(shù)和過程都可以有參數(shù)，也可 以沒有參數(shù)。 在 VB 里通用過程分兩類，一類是 Sub 過程（子過程） , 另一類是 Function 過程（簡稱函數(shù)）。 Sub 過程的定義格式如下： [public][Private][Static] Sub 過程名稱 (參數(shù) ) …… …… End Sub Sub 過程的調(diào)用很簡單： Call 過程名稱（參數(shù)）。 Function 過程的定義和 Sub 相似。就是多了一個返回值的類型。 [public][Private][Static] Function 過程名稱 (參數(shù) ) as 類型 …… …… End Function Function 過程的調(diào)用格式如下： Dim A$ A=過程名稱（參數(shù)） 第六節(jié) ADO 對象 ADO 是 Microsoft 公司關(guān)于各種類型數(shù)據(jù)的高等界面，后來逐漸演變成滿足所有數(shù)據(jù)訪問需要的完整解決辦法。 ADO 的對象模型是所有數(shù)據(jù)訪問接口對象模型中最簡單的一種。Microsoft 公司用來訪問 ADO數(shù)據(jù)的應(yīng)用程序界面技術(shù)是 OLE DB。 OLE DB是一種底層編程接口，用來訪問許多不同類型的數(shù)據(jù)源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數(shù)據(jù)源。 OLE DB是一個由 Component Object Model（ COM）接口組成的集合，用來隱藏創(chuàng)建數(shù)據(jù)訪問服務(wù)過程中的細節(jié)。 OLEDB 提供了訪問任何數(shù)據(jù)資源的方法，包括相互關(guān)聯(lián)的數(shù)據(jù)庫和相互不關(guān)聯(lián)的數(shù)據(jù)庫、 Email和文件系統(tǒng)、文本和圖形以及用戶定義的數(shù)據(jù)對象。 以下是本程序中用到的對象： Connection 對象 ： 通過 “連接 ”可從應(yīng)用程序訪問數(shù)據(jù)源，連接是交換數(shù)據(jù)所必需的環(huán)境。對象模型使用 Connection 對象使連接概念得以具體 。 Recordset 對象 ： 表示的是來自基本表或命令執(zhí)行結(jié)果的記錄全集。 Recordset 對象可支持兩類更新：立即更新和批更新。使用立即更新，一旦調(diào)用 Update 方法，對數(shù)據(jù)的所有更改將被立即寫入基本數(shù)據(jù)源。也可以使用 AddNew 和 Update方法將值的數(shù)組作為參數(shù)傳遞，同時更新記錄的若干字段。 Field 對象 ： 代表使用普通數(shù)據(jù)類型的數(shù)據(jù)的列 。 Recordset 對象含有由 Field 對象組成的 Fields 集合。每個 Field 對象對應(yīng)于 Recordset 中的一列。使用 Field 對象的 Value 屬性可設(shè)置或返回當(dāng)前記錄的數(shù)據(jù) 。 以下是本程序中用到的方法： AddNew 方法 ： 創(chuàng)建可更新 Recordset 對象的新 記錄。 MoveFirst、 MoveLast、 MoveNext 和 MovePrevious 方法 ： 在指定 Recordset 對象中移動到第一個、最后一個、下一個或前一個記錄并使該記錄成為當(dāng)前記錄。 Open 方法 (ADO Connection)： 打開到數(shù)據(jù)源的連接 。 Open 方法 (ADO Recordset)： 打開記錄集。 Close 方法 ： 關(guān)閉打開的對象及任何相關(guān)對象。 Execute 方法 ： 執(zhí)行指定的查詢、 SQL 語句、存儲過程或特定提供者的文本等 內(nèi)容 。 第 三 章 系統(tǒng)設(shè)計 第一節(jié) 系統(tǒng)功能分析 高?？蒲?管理系統(tǒng)是為了對 高?？蒲?實行計算機化的管理，以提高工作效率，方便用戶。主要功能有對 期刊論文信息、項目獲獎信息、項目基本信息、著作管理信息、項目參加人員信息 等進行管理和 字典信息 管理以及對系統(tǒng)自身的用戶權(quán)限管理。提供各種信息的錄入，比如 項目參加人員 資料、 項目獲獎 內(nèi)容及過程； 著作管理 、并可對 字典信息 進行的 操作管理 。 系統(tǒng) 不但含有 高校科研 日常項目的信息，而且還包含了對 信息 的查詢 檢索 功能。系統(tǒng)管理主要任務(wù)是提高系統(tǒng)安全性和對系統(tǒng)提供良好的維護，如用戶 權(quán)限可以為用戶提供權(quán)限服務(wù)。 該系統(tǒng)是基于 SSTab 窗體 ， 以 VB 自帶的 JET 引擎連接 Access 2021數(shù)據(jù)庫進行開發(fā)的高?？蒲?管理系統(tǒng)，力求與實際相結(jié)合具有 高?？蒲?日常管理和 檢索 等功能，旨在達到使 高?？蒲?的管理和人事數(shù)字化使之更加方便快捷以提高工作效率。 系統(tǒng)管理主要包括： 添加用戶模塊包括：為系統(tǒng)新用戶設(shè)置用戶名及口令。 修改密碼模塊包括：用于操作員更改自己的系統(tǒng)口令。 基本資料管理主要包括： 項目參加人員管理 模塊包括：顯示添加修改刪除查詢。 項目基本情況 模塊包括：顯示添加修改刪除查詢。 項目獲獎情況 模塊包括：顯示添加修改刪除查詢。 期刊論文管理 模塊包括：顯示添加修改刪除查詢。 著作管理 模塊包括：顯示添加修改刪除查詢。 字典 管理主要包括： 項目性質(zhì) 包括： 分為國家自然科學(xué)基金、 86部省科委及企業(yè)集團四種情況 。 范圍 包括： 分為全國、國際、地方三種情況。 檢索源 包括： 分為 EI、 SCI、核心和一般四種情況。 日期 格式 ： YYYYMMDD。 第二節(jié) 系統(tǒng)結(jié)構(gòu)設(shè)計 系統(tǒng) 模塊結(jié)構(gòu)流程圖：如圖 31。 Admin用戶 普通用戶 系 統(tǒng) 用 戶 信 息 修改自身的用戶名和密碼 修改 Admin 用戶的密碼 創(chuàng)建修改和刪除普 通用戶信息 圖 31 登錄系統(tǒng)模塊結(jié)構(gòu) 基本資料 模塊結(jié)構(gòu)流程圖：如圖 32。 圖 32 基本資料模塊結(jié)構(gòu)圖 字典 管理 模塊結(jié)構(gòu)流程圖：如圖 33 圖 33 字典管理模塊結(jié)構(gòu)圖 系統(tǒng)總流程圖：如圖 34。 基本資料系統(tǒng) 項目參加人員管理 項目基本情況 字典管理模塊 項目性質(zhì) 范圍 日期 檢索源 項目獲獎情況 期刊論文管理 著作管理 成功 圖 系統(tǒng)流程圖 普通用戶 Admin用戶 讀取用戶類型 用戶登錄 開 始 提示出錯 登 錄 系 統(tǒng) 基 本 資 料 主界面 字典管理 第四節(jié) 數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計 數(shù)據(jù)庫設(shè)計主要是進行數(shù)據(jù)庫的邏輯設(shè)計，即將數(shù)據(jù)按一定的分類、分組系統(tǒng)和邏輯層次組織起來，是面向用戶的。數(shù)據(jù)庫設(shè)計時需要綜合企業(yè)各個部門的存檔數(shù)據(jù)和數(shù)據(jù)需求，分析各個數(shù)據(jù)之間的關(guān)系，按照 DBMS 提供的功能和描述工具，設(shè)計出規(guī)模適當(dāng)、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型。 數(shù)據(jù)庫設(shè)計的步驟是： 數(shù)據(jù)庫結(jié)構(gòu)定義：目前的數(shù)據(jù)庫管理系統(tǒng)（ DBMS）有的是支持聯(lián)機事務(wù)處理 CLTP（負責(zé)對事務(wù)數(shù)據(jù)進行采集、處理、存儲）的操作型 DBMS，有的可支持?jǐn)?shù)據(jù)倉庫、有聯(lián)機分析處理 CLAP（指為支持決策的制定對數(shù)據(jù)的一種加工操作）功能的大型 DBMS，有的數(shù)據(jù)庫是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫。針對選擇的 DBMS，進行數(shù)據(jù)庫結(jié)構(gòu)定義。 數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫中數(shù)據(jù)表的結(jié)構(gòu)，數(shù)據(jù)表的邏輯結(jié)構(gòu)包括：屬性名稱、類型、表示形式、缺省值、校驗規(guī)則、是否關(guān)鍵字、可否為空等。關(guān)系型數(shù)據(jù)庫要盡量按關(guān)系規(guī)范化要求 進行數(shù)據(jù)庫設(shè)計，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來決定。數(shù)據(jù)表設(shè)計不僅要滿足數(shù)據(jù)存儲的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時數(shù)據(jù)表。 存儲設(shè)備和存儲空間組織：確定數(shù)據(jù)的存放地點、存儲路徑、存儲設(shè)備等，備份方案，對多版本如何保證一致性和數(shù)據(jù)的完整性。 數(shù)據(jù)使用權(quán)限設(shè)置：針對用戶的不同使用要求，確定數(shù)據(jù)的用戶使用權(quán)限，確保數(shù)據(jù)安全。 數(shù)據(jù)字典設(shè)計：用數(shù)據(jù)字典描述數(shù)據(jù)庫的設(shè)計，便于維護和修改。 為了更好地組織數(shù)據(jù)和設(shè)計出實際應(yīng)用數(shù)據(jù)庫，應(yīng)該注意如下問題 ： 關(guān)系數(shù)據(jù) 結(jié)構(gòu)的建立：在進行了數(shù)據(jù)基本結(jié)構(gòu)的規(guī)范化重組后，還必須建立整體數(shù)據(jù)的關(guān)系結(jié)構(gòu)。這一步設(shè)計完成后數(shù)據(jù)庫和數(shù)據(jù)結(jié)構(gòu)設(shè)計工作基本完成，只待系統(tǒng)實現(xiàn)時將數(shù)據(jù)分析和數(shù)據(jù)字典的內(nèi)容代入到所設(shè)計的數(shù)據(jù)整體關(guān)系結(jié)構(gòu)中，一個規(guī)范化數(shù)據(jù)庫系統(tǒng)結(jié)構(gòu)就建立起來了。 根據(jù)用戶需求和功能設(shè)計， 數(shù)據(jù)庫文件名： ， 系統(tǒng)共分如下幾個表： 根據(jù)系統(tǒng)需求分析和功能設(shè)計，在數(shù)據(jù)庫創(chuàng)建以下幾個表： user_info、期刊論文信息、項目獲獎信息、項目基本信息、著作管理信息、項目參加人員信息。表結(jié)構(gòu)如下： User_info 表詳 細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 姓名 文本 主鍵 密碼 文本 期刊論文信息表詳細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 論文名稱 文本 論文英文名稱 文本 發(fā)表日期 文本 期刊名稱 文本 第一作者 文本 第二作者 文本 第三作者 文本 范圍 文本 檢索源 文本 檢索號 文本 學(xué)科門類 文本 出版單位 文本 項目獲獎信息表詳細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 項目名稱 文本 驗收日期 文本 鑒定日期 文本 獲獎日期 文本 鑒定單位 文本 獲獎名稱 文本 授獎單位 文本 證書號 文本 項目參加人員信息表詳細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 人員編號 文本 姓名 文本 參加項目名稱 文本 備注 文本 著作管理信息表詳細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 著作名稱 文本 著作英文名稱 文本 發(fā)表日期 文本 作者 文本 出版單位 文本 項目基本信息表詳細結(jié)構(gòu)如下： 字段名稱 字段類型 說明 項目編號 文本 項目名稱 文本 負責(zé)人 1 文本 負責(zé)人 2 文本 主要承擔(dān)人 1 文本 主要承擔(dān)人 2 文本 項目來源 文本 項目性質(zhì) 文本 科研代號 文本 開始日期 文本 結(jié)束日期 文本 第四章 應(yīng)用程序的開發(fā) 應(yīng)用程序是用 VB 開發(fā)的，界面設(shè)計的簡單明了。根據(jù)需求分析和功能設(shè)計，系統(tǒng)應(yīng)用程序分為五大模塊：登錄模塊、 信息管理、信息檢索、系統(tǒng)管理、用戶管理五個模塊。 第一節(jié) 登錄模塊的開發(fā) 登錄界面是用戶最先看到的系統(tǒng)的界面，所以直觀上給用戶的感覺很重要，所以做一個好的界面，提高軟件的親和力。本管理系統(tǒng)登錄 界面如圖 41。 圖 41 登錄界面 根據(jù)登錄模塊的功能，管理員和普通用戶界面統(tǒng)一在一起。系統(tǒng)自動判斷用戶的要權(quán)限。管理員有所有的權(quán)限，普通用戶只有檢索和改本人的密碼權(quán)。 如果三次登錄都出錯，系統(tǒng)自動退出。 數(shù)據(jù)庫的連接采用的是 ADO 對象。連接代碼如下： If Then = Provider=。Data Source= amp。 amp。 \。Persist Security Info=False 引擎采用 來連接 Access2021 數(shù)據(jù)庫。 詳細代碼實現(xiàn)請參考附錄程序源代碼。 第二節(jié) 系統(tǒng)管理 在系統(tǒng)功能設(shè)計中，系統(tǒng)管理功能主要有添加用戶，刪除用戶，和管理員密碼修改，如圖 42 所示。只有管理員用戶才有權(quán)限進入本界面。添加、刪除用戶是在數(shù)據(jù)表 user_info中添加和刪除用戶。管理員密碼修改是對本機系統(tǒng)管理員 admin 用戶的密碼修改。初始管理員 密 碼 為 admin 。 管 理 員 密 碼 存 放 在 機 子 的 注 冊 表 中 ， 位 置 在 ：HKEY_CURRENT_USER\Software\VB and VBA Program Settings\ 高?？蒲泄芾硐到y(tǒng)\Settings\syspassword