【正文】 數(shù)組可以縮短程序代碼、提高程序的可讀性和執(zhí)行效率。 RDO(Remote Data Objects)即遠(yuǎn)程數(shù)據(jù)對(duì)象，為使用代碼來(lái)創(chuàng)建和操作一個(gè)遠(yuǎn)程 ODBC數(shù)據(jù)庫(kù)系統(tǒng)的各個(gè)部件提供了一個(gè)框架。 Microsoft在 Visual Basic ADO。用戶(hù)可以使用任何一種 ODBC數(shù)據(jù)源，即不僅適合于 SQL Server、 Oracle、 Access等數(shù)據(jù)庫(kù)應(yīng)用程序，也適合于 Excel 表格、文本文件、圖形文 件和無(wú)格式的數(shù)據(jù)文件。同時(shí) IDE的設(shè)置是很靈活的，開(kāi)發(fā)人員可以按照自己的編程習(xí)慣來(lái)配置 IDE。 使用 VB 不需要追求完美的算法和精密的邏輯，而只要充分發(fā)揮你的想象力和創(chuàng)造力，就能利用 VB 開(kāi)發(fā)出各種實(shí)用的軟件了，不論是小游戲還是大型的客戶(hù)端 /服務(wù)器端應(yīng)用程序，都變得非常簡(jiǎn)單。1998年 8月，微軟推出了 VB ，進(jìn) 一步加強(qiáng)了部件開(kāi)發(fā)的功能。 第二節(jié) VB 概述 Visual Basic的前身是 QBASIC，語(yǔ)言基礎(chǔ)是 BASIC。 ? 窗體設(shè)計(jì)對(duì)象 可以設(shè)計(jì)用戶(hù)接口，用來(lái)輸入并處理數(shù)據(jù)。 不但如此，在 ACCESS 2021 推出以后，我們發(fā)現(xiàn)數(shù)據(jù)庫(kù)的建立更加的快速，但是功能卻更加強(qiáng)大，用戶(hù)不用再去記憶那一大堆的文件名稱(chēng)，或是為數(shù)據(jù)庫(kù)的文件管理大費(fèi)周章，通過(guò) ACCESS 的人性化管理接口把數(shù)據(jù)庫(kù)的管理整理，便于維護(hù)；此外，在報(bào)表的制作上也是相當(dāng)容易的，完全的視覺(jué)開(kāi)發(fā)向?qū)гO(shè)計(jì)，讓人使用起來(lái)很舒服。 第二章 數(shù)據(jù)庫(kù)和開(kāi)發(fā)語(yǔ)言介紹 本管理系統(tǒng)采用的數(shù)據(jù)庫(kù)是 Microsoft Access 2021 數(shù)據(jù)庫(kù)，開(kāi)發(fā)語(yǔ)言為 Microsoft Visual Basic (簡(jiǎn)稱(chēng) )。高?？蒲惺歉咝Ｃ媾R的一項(xiàng)重要任務(wù)，高?？蒲泄芾韮?nèi)容也 比較復(fù)雜，科研涉及的內(nèi)容極為廣泛，面臨項(xiàng)目、資金和人員管理。 高?？蒲?采取手工方式對(duì) 科研信息管理 情況進(jìn)行人工管理，由于信息比較多， 所以就導(dǎo)致了高校科研里的 管理工作混亂而又復(fù)雜。數(shù)據(jù)信息處理工作量大，容易出錯(cuò)；由于數(shù)據(jù)繁多，容易丟失，且不易查找。 本人結(jié)合 高?？蒲?管理系統(tǒng) 的要求，對(duì) Microsoft Access 2021 數(shù)據(jù)庫(kù) 、 管理系統(tǒng)、 SQL語(yǔ)言原理、 VB 應(yīng)用程序設(shè)計(jì)， VB 數(shù)據(jù)庫(kù)技術(shù)進(jìn)行了較深入的學(xué)習(xí)和應(yīng)用，主要完成對(duì) 高?？蒲?管理系統(tǒng) 的需求分析、功能模塊劃分、數(shù)據(jù)庫(kù)模式分析，并由此設(shè)計(jì)了數(shù)據(jù)庫(kù)結(jié)構(gòu)和開(kāi)發(fā)了 應(yīng)用程序。根據(jù)數(shù)據(jù)模型的不同， DBMS 可以分成層次型、網(wǎng)狀型、關(guān)系型、面向?qū)ο笮偷取? 數(shù)據(jù)庫(kù)管理系統(tǒng)（ DBMS）是指數(shù)據(jù)庫(kù)系統(tǒng)中管理數(shù)據(jù)的軟件系統(tǒng)。使用計(jì)算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性 。高校科研管理系統(tǒng) 引 言 當(dāng)今時(shí)代是飛速發(fā)展的信息時(shí)代。 尤其對(duì)于復(fù)雜的信息管理，計(jì)算機(jī)能夠充分發(fā)揮它的優(yōu)越性。 DBMS 是數(shù)據(jù)庫(kù)系統(tǒng)的核心組成部分。 Access 2021 就是一種關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng) 。系統(tǒng)運(yùn)行結(jié)果證明，本文所設(shè)計(jì)的 高?？蒲?管理系統(tǒng) 可以滿(mǎn)足 用戶(hù) 的需要 。總的來(lái)說(shuō)，缺乏系統(tǒng)，規(guī)范的信息管理手段。 工作都是由人工來(lái)進(jìn)行的，時(shí)間一長(zhǎng)，這就造成了很多的問(wèn)題，使得整個(gè)單位的人們的工作積極性也不高，整個(gè)運(yùn)做的效率也不高了 。因此制作一個(gè)高?？蒲泄芾硐到y(tǒng)統(tǒng)軟件是十分重要和必要的。 ，用 ACCESS 2021 作為后臺(tái)支持?jǐn)?shù)據(jù)庫(kù)，通過(guò) ACCESS 2021中并對(duì)其編程來(lái)實(shí)現(xiàn)各種功能。但是美中不足的是 ACCESS對(duì)于主從式結(jié)構(gòu)的安全性管理不足，由于 ACCESS可以快速的通過(guò) ODBC連接到數(shù)據(jù)庫(kù)服務(wù)器上（ Database Server） ,并瀏覽所有表格或是相關(guān)對(duì)象轉(zhuǎn)成 HTML 基本上， ACCESS對(duì)建立一個(gè)數(shù)據(jù)庫(kù)所具備的每一個(gè)對(duì)象，其中包括了表、查詢(xún)、窗體、報(bào)表、宏、模塊。 ? 報(bào)表對(duì)象 利用視圖向?qū)У拈_(kāi)發(fā)方式，簡(jiǎn)單、快速的建立出需求報(bào)表或標(biāo)簽。自從微軟推出 VB后，便成為了程序開(kāi)發(fā)人員的首選工具。以適用人員來(lái)分，可有以下三個(gè)版本： 1. 標(biāo)準(zhǔn)版 針對(duì)一般程序設(shè)計(jì)人員 ,適合普通應(yīng)用系統(tǒng)的開(kāi)發(fā)。 可視化編程的一個(gè)突出特點(diǎn)就是其開(kāi)發(fā)環(huán)境就像一 個(gè)百寶箱，很多功能都集成在其之中，這就是 IDE（ Integrated Development Environment），即集成開(kāi)發(fā)環(huán)境。 從簡(jiǎn)單的文本文件到各種復(fù)雜的 關(guān)系型數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)應(yīng)用程序需要面對(duì)各種各樣的數(shù)據(jù)源。 ADO 是基于 OLEDB之上的技術(shù)，因此 ADO通過(guò)其內(nèi)部的屬性和方法提供統(tǒng)一的數(shù)據(jù)訪(fǎng)問(wèn)接口方法。它與以前 Visual Basic 的DAO、 RDO 相比有了很大的提高。 RDO是 ODBC API的一個(gè)淺層界面接口，是專(zhuān)為訪(fǎng)問(wèn)遠(yuǎn)程 ODBC關(guān)系數(shù)據(jù)源而設(shè)計(jì)的。 數(shù)組的聲明和一般變量類(lèi)似， 不同的是聲明定長(zhǎng)數(shù)組時(shí)要給出指定的大小或上、下界。 前面所舉的例子為一維數(shù)組，還可以定義多維數(shù)組： Dim ThreeD(4,2 to 5,3 to 6) As Integer 定義了一個(gè)三維數(shù)組 (4 4 4)。 Do While …… Loop 語(yǔ)句 While …… Wend 語(yǔ)句 Do …… Loop While While 后面都跟邏輯條件判斷， “Do While …… Loop 語(yǔ)句 ”和 “While …… Wend 語(yǔ)句 ”作用相 似，都是先判斷 While 后面的條件是否為 “真 ”，如果為 “真 ”則執(zhí)行里面的語(yǔ)句，如果為 “假 ”，則退出循環(huán)，循環(huán)直至條件為 “假 ”終止。 For 循 環(huán)和 Whlie 循環(huán)應(yīng)當(dāng)根據(jù)適當(dāng)?shù)沫h(huán)境使用，它們有時(shí)也可替換。 在 VB 里通用過(guò)程分兩類(lèi)，一類(lèi)是 Sub 過(guò)程（子過(guò)程） , 另一類(lèi)是 Function 過(guò)程（簡(jiǎn)稱(chēng)函數(shù)）。 [public][Private][Static] Function 過(guò)程名稱(chēng) (參數(shù) ) as 類(lèi)型 …… …… End Function Function 過(guò)程的調(diào)用格式如下： Dim A$ A=過(guò)程名稱(chēng)（參數(shù)） 第六節(jié) ADO 對(duì)象 ADO 是 Microsoft 公司關(guān)于各種類(lèi)型數(shù)據(jù)的高等界面，后來(lái)逐漸演變成滿(mǎn)足所有數(shù)據(jù)訪(fǎng)問(wèn)需要的完整解決辦法。 OLE DB是一個(gè)由 Component Object Model（ COM）接口組成的集合，用來(lái)隱藏創(chuàng)建數(shù)據(jù)訪(fǎng)問(wèn)服務(wù)過(guò)程中的細(xì)節(jié)。 Recordset 對(duì)象 ： 表示的是來(lái)自基本表或命令執(zhí)行結(jié)果的記錄全集。 Field 對(duì)象 ： 代表使用普通數(shù)據(jù)類(lèi)型的數(shù)據(jù)的列 。 以下是本程序中用到的方法： AddNew 方法 ： 創(chuàng)建可更新 Recordset 對(duì)象的新 記錄。 Close 方法 ： 關(guān)閉打開(kāi)的對(duì)象及任何相關(guān)對(duì)象。提供各種信息的錄入，比如 項(xiàng)目參加人員 資料、 項(xiàng)目獲獎(jiǎng) 內(nèi)容及過(guò)程； 著作管理 、并可對(duì) 字典信息 進(jìn)行的 操作管理 。 系統(tǒng)管理主要包括： 添加用戶(hù)模塊包括：為系統(tǒng)新用戶(hù)設(shè)置用戶(hù)名及口令。 項(xiàng)目獲獎(jiǎng)情況 模塊包括：顯示添加修改刪除查詢(xún)。 范圍 包括： 分為全國(guó)、國(guó)際、地方三種情況。 Admin用戶(hù) 普通用戶(hù) 系 統(tǒng) 用 戶(hù) 信 息 修改自身的用戶(hù)名和密碼 修改 Admin 用戶(hù)的密碼 創(chuàng)建修改和刪除普 通用戶(hù)信息 圖 31 登錄系統(tǒng)模塊結(jié)構(gòu) 基本資料 模塊結(jié)構(gòu)流程圖：如圖 32。 數(shù)據(jù)庫(kù)設(shè)計(jì)的步驟是： 數(shù)據(jù)庫(kù)結(jié)構(gòu)定義：目前的數(shù)據(jù)庫(kù)管理系統(tǒng)（ DBMS）有的是支持聯(lián)機(jī)事務(wù)處理 CLTP（負(fù)責(zé)對(duì)事務(wù)數(shù)據(jù)進(jìn)行采集、處理、存儲(chǔ)）的操作型 DBMS，有的可支持?jǐn)?shù)據(jù)倉(cāng)庫(kù)、有聯(lián)機(jī)分析處理 CLAP（指為支持決策的制定對(duì)數(shù)據(jù)的一種加工操作）功能的大型 DBMS，有的數(shù)據(jù)庫(kù)是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫(kù)。數(shù)據(jù)表設(shè)計(jì)不僅要滿(mǎn)足數(shù)據(jù)存儲(chǔ)的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時(shí)數(shù)據(jù)表。 為了更好地組織數(shù)據(jù)和設(shè)計(jì)出實(shí)際應(yīng)用數(shù)據(jù)庫(kù)，應(yīng)該注意如下問(wèn)題 ： 關(guān)系數(shù)據(jù) 結(jié)構(gòu)的建立：在進(jìn)行了數(shù)據(jù)基本結(jié)構(gòu)的規(guī)范化重組后，還必須建立整體數(shù)據(jù)的關(guān)系結(jié)構(gòu)。根據(jù)需求分析和功能設(shè)計(jì)，系統(tǒng)應(yīng)用程序分為五大模塊：登錄模塊、 信息管理、信息檢索、系統(tǒng)管理、用戶(hù)管理五個(gè)模塊。系統(tǒng)自動(dòng)判斷用戶(hù)的要權(quán)限。連接代碼如下： If Then = Provider=。Persist Security Info=False 引擎采用 來(lái)連接 Access2021 數(shù)據(jù)庫(kù)。添加、刪除用戶(hù)是在數(shù)據(jù)表 user_info中添加和刪除用戶(hù)。代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。 刪除用戶(hù)：選中要?jiǎng)h除的用戶(hù)，直接點(diǎn)刪除、系統(tǒng)有提示是否真的刪除，點(diǎn)是，就刪除了此用戶(hù)。之后點(diǎn)修改。其中密碼數(shù)據(jù) user_info 中姓名和密碼字段對(duì)應(yīng)的記錄。期刊論文信息、項(xiàng)目獲獎(jiǎng)信息、項(xiàng)目基本信息、著 作管理信息、項(xiàng)目參加人員信息在下拉列表可以選擇，以項(xiàng)目基本信息為例介紹。 ：移動(dòng)到下一條記錄。 刪除：是刪除當(dāng)前的記錄。 各信息表中的序號(hào)及各種編號(hào)一定要統(tǒng)一、規(guī)范。 以基本項(xiàng)目信息表為例，在圖 46中的數(shù)據(jù)表選擇信息表如圖 47。輸入關(guān)鍵字，點(diǎn)檢索按鈕。 代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。選擇要打包的工程。進(jìn)入打包文件夾選擇。這樣，程序打包工作就完成了。就可以在用戶(hù)的機(jī)子上安裝上本系統(tǒng)。使用計(jì)算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性 。 數(shù)據(jù)庫(kù)管理系統(tǒng)（ DBMS）是指數(shù)據(jù)庫(kù)系統(tǒng)中管理數(shù)據(jù)的軟件系統(tǒng)。根據(jù)數(shù)據(jù)模型的不同， DBMS 可以分成層次型、網(wǎng)狀型、關(guān)系型、面向?qū)ο笮偷取? 本人結(jié)合 高?？蒲?管理系統(tǒng) 的要求，對(duì) Microsoft Access 2021 數(shù)據(jù)庫(kù) 、 管理系統(tǒng)、 SQL語(yǔ)言原理、 VB 應(yīng)用程序設(shè)計(jì)， VB 數(shù)據(jù)庫(kù)技術(shù)進(jìn)行了較深入的學(xué)習(xí)和應(yīng)用，主要完成對(duì) 高?？蒲?管理系統(tǒng) 的需求分析、功能模塊劃分、數(shù)據(jù)庫(kù)模式分析，并由此設(shè)計(jì)了數(shù)據(jù)庫(kù)結(jié)構(gòu)和開(kāi)發(fā)了 應(yīng)用程序。數(shù)據(jù)信息處理工作量大，容易出錯(cuò)；由于數(shù)據(jù)繁多，容易丟失，且不易查找。 高?？蒲?采取手工方式對(duì) 科研信息管理 情況進(jìn)行人工管 理，由于信息比較多， 所以就導(dǎo)致了高校科研里的 管理工作混亂而又復(fù)雜。高?？蒲惺歉咝Ｃ媾R的一項(xiàng)重要任務(wù)，高校科研管理內(nèi)容也比較復(fù)雜，科研涉及的內(nèi)容極為廣泛，面臨項(xiàng)目、資金和人員管理。 第二章 數(shù)據(jù)庫(kù)和開(kāi)發(fā)語(yǔ)言介紹 本管理系統(tǒng)采用的數(shù)據(jù)庫(kù)是 Microsoft Access 2021 數(shù)據(jù)庫(kù)，開(kāi)發(fā)語(yǔ)言為 Microsoft Visual Basic (簡(jiǎn)稱(chēng) )。 不但如此，在 ACCESS 2021 推出以 后，我們發(fā)現(xiàn)數(shù)據(jù)庫(kù)的建立更加的快速，但是功能卻更加強(qiáng)大，用戶(hù)不用再去記憶那一大堆的文件名稱(chēng)，或是為數(shù)據(jù)庫(kù)的文件管理大費(fèi)周章，通過(guò) ACCESS 的人性化管理接口把數(shù)據(jù)庫(kù)的管理整理，便于維護(hù)；此外，在報(bào)表的制作上也是相當(dāng)容易的，完全的視覺(jué)開(kāi)發(fā)向?qū)гO(shè)計(jì)，讓人使用起來(lái)很舒服。 ? 窗體設(shè)計(jì)對(duì)象 可以設(shè)計(jì)用戶(hù)接口，用來(lái)輸入并處理數(shù)據(jù)。 第二節(jié) VB 概述 Visual Basic的前身是 QBASIC，語(yǔ)言基礎(chǔ)是 BASIC。1998年 8月，微軟推出了 VB ，進(jìn)一步加強(qiáng)了部件開(kāi)發(fā)的功能。 使用 VB 不需要追求完美的算法和精密的邏輯，而只要充分發(fā)揮你的想象力和創(chuàng)造力，就能利用 VB 開(kāi)發(fā)出各種實(shí)用的軟件了，不論是小游戲還是大型的客戶(hù)端 /服務(wù)器端應(yīng)用程序，都變得非常簡(jiǎn)單。同時(shí) IDE的設(shè)置是很靈活的，開(kāi)發(fā)人員可以按照自己的編程習(xí)慣來(lái)配置 IDE。用戶(hù)可以使用任何一種 ODBC數(shù)據(jù)源，即不僅適合于 SQL Server、 Oracle、 Access等數(shù)據(jù)庫(kù)應(yīng)用程序，也適合于 Excel 表格、文本文件、圖形文件和無(wú)格式的數(shù)據(jù)文件。 Microsoft在 Visual Basic ADO。 RDO(Remote Data Objects)即遠(yuǎn)程數(shù)據(jù)對(duì)象，為使用代碼來(lái)創(chuàng)建和操作一個(gè)遠(yuǎn)程 ODBC數(shù)據(jù)庫(kù)系統(tǒng)的各個(gè)部件提供了一個(gè)框架。使用數(shù)組可以縮短程序代碼、提高程序的可讀性和執(zhí)行效率。 也可以指定腳標(biāo)的起始值，例如： Dim IntegerArray(2 to 10) As Integer 這個(gè)數(shù)組含有九個(gè)元素，腳標(biāo)從 2 到 10。 “For”的格式是： For 循環(huán)變量 =初賦值 To 終值 [Step 步長(zhǎng) ] …… Next 循環(huán)變量 在默認(rèn)情況下， Step 被設(shè)為 “1”，可以省略， Step 也可以設(shè)為負(fù)值，例如： Dim a=0 For I=1 To 10 a=a+I Next I 這是一個(gè)最簡(jiǎn)單的累加器的例子，把 1 到 10累加在一起，然后賦值給 “a”這樣的效果和上面是一樣的，只不過(guò) 是倒著加罷了，請(qǐng)看： Dim a=0 For I=10 To 1 Step –1 a=a+I Next I While 語(yǔ)句也是一個(gè)很常用的循環(huán)語(yǔ)句，它的形式很多。 Until 條件 可以相當(dāng)于 While Not 條件 。函數(shù)和過(guò)程都可以有參數(shù)，也可以沒(méi)有參數(shù)。就是多了一個(gè)返回值的類(lèi)型。 OLE D