【正文】 ub Sub 過(guò)程的調(diào)用很簡(jiǎn)單： Call 過(guò)程名稱（參數(shù)）。函數(shù)和過(guò)程都可以有參數(shù)，也可以沒(méi)有參數(shù)。 第五節(jié) 過(guò)程與函數(shù) 函數(shù)與過(guò)程有許多相似的 地方，它們之間最大也是最本質(zhì)的區(qū)別就在于，函數(shù)有一個(gè)返回值，而過(guò)程只是執(zhí)行一系列動(dòng)作，所以可以簡(jiǎn)單的把函數(shù)理解成為一個(gè)變量，而 VB 中的每個(gè)事件都是一個(gè)過(guò)程，比如 Command1_Click()就是一個(gè)過(guò)程。 Until 條件 可以相當(dāng)于 While Not 條件 。 “Do …… Loop While ” 與前兩者的區(qū)別在于，它不管條件的真假，都會(huì)先執(zhí)行 “Do”后面的語(yǔ)句，也就是說(shuō)，它至少執(zhí)行語(yǔ)句一次。 “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ǔ)句，它的形式很多。 創(chuàng)建 n 維數(shù)組格式如下（動(dòng)態(tài)分配數(shù)組）： Dim 數(shù)組名稱 () [as 數(shù)據(jù)類型 ] ReDim 數(shù)組名稱 (第 1 維大小，第 2 維大小， …… ，第 n 維大小 ) 第四節(jié) 循環(huán)語(yǔ)句 循環(huán)結(jié)構(gòu)是計(jì)算機(jī)語(yǔ)言里一種重要的結(jié)構(gòu)，它的應(yīng)用廣泛，最簡(jiǎn)單的例子是累加器的作用，還可以用于窮舉法，更直觀的例子是把某件事重復(fù)指定的 次數(shù)，這樣就不用把要重復(fù)的語(yǔ)句輸入多次，而通過(guò)循環(huán)結(jié)構(gòu)完成，非常方便。 也可以指定腳標(biāo)的起始值，例如： Dim IntegerArray(2 to 10) As Integer 這個(gè)數(shù)組含有九個(gè)元素，腳標(biāo)從 2 到 10。聲明格式如下： Dim 數(shù)組名稱（大?。?[as 數(shù)據(jù)類 型 ] 或者： Dim 數(shù)組名稱（下界 to 上界） [as 數(shù)據(jù)類型 ] 用 Dim 語(yǔ)句聲明的數(shù)據(jù)變量為局部變量，如果要聲明靜態(tài)變量、模塊級(jí)的變量或公用數(shù)組變量，只把聲明關(guān)鍵字“ Dim”分別改成“ Static”、“ Private”、“ Public”即可。使用數(shù)組可以縮短程序代碼、提高程序的可讀性和執(zhí)行效率。 第三節(jié) 數(shù)組 數(shù)組是一種比較特殊的數(shù)據(jù)類型，也是編寫程序很重要的一種數(shù)據(jù)結(jié)構(gòu)。 RDO(Remote Data Objects)即遠(yuǎn)程數(shù)據(jù)對(duì)象，為使用代碼來(lái)創(chuàng)建和操作一個(gè)遠(yuǎn)程 ODBC數(shù)據(jù)庫(kù)系統(tǒng)的各個(gè)部件提供了一個(gè)框架。 DAO(Data Access Objects)即數(shù)據(jù)訪問(wèn)對(duì)象，是一種面向?qū)ο蟮慕缑娼涌凇? Microsoft在 Visual Basic ADO。本系統(tǒng)就是用 ADO對(duì)象來(lái)連接數(shù)據(jù)庫(kù)的。用戶可以使用任何一種 ODBC數(shù)據(jù)源，即不僅適合于 SQL Server、 Oracle、 Access等數(shù)據(jù)庫(kù)應(yīng)用程序，也適合于 Excel 表格、文本文件、圖形文件和無(wú)格式的數(shù)據(jù)文件。 Visual basic ADO(Active Data Objects)作為應(yīng)用程序和 OLEDB連接的橋梁 ADO,即 Active數(shù)據(jù)對(duì)象（ Active Data Objects）：實(shí)際是一種提供訪問(wèn)各種數(shù)據(jù)類型的連接機(jī)制。同時(shí) IDE的設(shè)置是很靈活的，開發(fā)人員可以按照自己的編程習(xí)慣來(lái)配置 IDE。 IDE是指在相應(yīng)的開發(fā)平臺(tái)中集成了編輯器、編譯連接工具、控件器箱輔助工具。 使用 VB 不需要追求完美的算法和精密的邏輯，而只要充分發(fā)揮你的想象力和創(chuàng)造力，就能利用 VB 開發(fā)出各種實(shí)用的軟件了，不論是小游戲還是大型的客戶端 /服務(wù)器端應(yīng)用程序，都變得非常簡(jiǎn)單。 2. 專業(yè)版 針對(duì)專業(yè)程序開發(fā)人員，它在標(biāo)準(zhǔn)版的基礎(chǔ)上提供了對(duì)數(shù)據(jù)庫(kù)和 Inter的支持。1998年 8月，微軟推出了 VB ，進(jìn)一步加強(qiáng)了部件開發(fā)的功能。據(jù)統(tǒng)計(jì)，僅在數(shù)據(jù)庫(kù)系統(tǒng)開發(fā)領(lǐng)域， VB就占了 90％的份額。 第二節(jié) VB 概述 Visual Basic的前身是 QBASIC，語(yǔ)言基礎(chǔ)是 BASIC。 ? 宏對(duì)象 提供許多的宏功能，您可以把這樣的宏連接到窗體設(shè)計(jì)中的任一個(gè)對(duì)象，以達(dá)成一些復(fù)雜的功能。 ? 窗體設(shè)計(jì)對(duì)象 可以設(shè)計(jì)用戶接口，用來(lái)輸入并處理數(shù)據(jù)。 其功能分別敘述如下： ? 表對(duì)象 打開已經(jīng)存在的表格、對(duì)已存在的表格字段數(shù)據(jù)進(jìn)行修改、新建表格。 不但如此，在 ACCESS 2021 推出以 后，我們發(fā)現(xiàn)數(shù)據(jù)庫(kù)的建立更加的快速，但是功能卻更加強(qiáng)大，用戶不用再去記憶那一大堆的文件名稱，或是為數(shù)據(jù)庫(kù)的文件管理大費(fèi)周章，通過(guò) ACCESS 的人性化管理接口把數(shù)據(jù)庫(kù)的管理整理，便于維護(hù)；此外，在報(bào)表的制作上也是相當(dāng)容易的，完全的視覺(jué)開發(fā)向?qū)гO(shè)計(jì)，讓人使用起來(lái)很舒服。因?yàn)?ACCESS與 Visual Basic用的同為 Microsoft Jet數(shù)據(jù)庫(kù)引擎，有著最好的兼容性。 第二章 數(shù)據(jù)庫(kù)和開發(fā)語(yǔ)言介紹 本管理系統(tǒng)采用的數(shù)據(jù)庫(kù)是 Microsoft Access 2021 數(shù)據(jù)庫(kù)，開發(fā)語(yǔ)言為 Microsoft Visual Basic (簡(jiǎn)稱 )。 基于這此問(wèn)題，我認(rèn)為有必要建立一個(gè) 高校科研 管理系統(tǒng)，使 高校科研的管理 工作規(guī)范化，系統(tǒng)化，程序化，提高信息處理的速度和準(zhǔn)確性，能夠及時(shí)、準(zhǔn)確、有效的查詢和修改高?？蒲械?情況。高?？蒲惺歉咝Ｃ媾R的一項(xiàng)重要任務(wù)，高校科研管理內(nèi)容也比較復(fù)雜，科研涉及的內(nèi)容極為廣泛，面臨項(xiàng)目、資金和人員管理。 軟件的作用是使基本配置確定的普通電腦，通過(guò)應(yīng)用軟件的安裝以拓寬應(yīng)用范圍。 高?？蒲?采取手工方式對(duì) 科研信息管理 情況進(jìn)行人工管 理，由于信息比較多， 所以就導(dǎo)致了高校科研里的 管理工作混亂而又復(fù)雜。盡管有的 高校里 有計(jì)算機(jī)，但是 都是獨(dú)自為體 ，尚未用于信息管理，沒(méi)有發(fā)揮它的效力，資源閑置比較突出，這就是管理信息系統(tǒng)的開發(fā)的基本環(huán)境。數(shù)據(jù)信息處理工作量大，容易出錯(cuò)；由于數(shù)據(jù)繁多，容易丟失，且不易查找。 作者： 日期： 第 一 章 系統(tǒng)需求分析 高?？蒲?作為 大量 信息資源的 中轉(zhuǎn) 地， 每天大量的 資料繁多 要處理 ，包含很多的信息數(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)和開發(fā)了 應(yīng)用程序。 根據(jù)需求分析，實(shí)現(xiàn) 高?？蒲?管理業(yè)務(wù)，效益已越來(lái)越明顯。根據(jù)數(shù)據(jù)模型的不同， DBMS 可以分成層次型、網(wǎng)狀型、關(guān)系型、面向?qū)ο笮偷?。?duì)數(shù)據(jù)庫(kù)的一切操作，包括定義、 更新及各種控制 ,都是通過(guò) DBMS 進(jìn)行的。 數(shù)據(jù)庫(kù)管理系統(tǒng)（ DBMS）是指數(shù)據(jù)庫(kù)系統(tǒng)中管理數(shù)據(jù)的軟件系統(tǒng)。計(jì)算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)是系統(tǒng)管理的前提。使用計(jì)算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性 。在各行各業(yè)中離不開信息處理，這正是計(jì)算機(jī)被廣泛應(yīng)用于信息管理系統(tǒng)的環(huán)境。就可以在用戶的機(jī)子上安裝上本系統(tǒng)。直接點(diǎn) 就可以。這樣，程序打包工作就完成了。選擇好，再點(diǎn)下一步。進(jìn)入打包文件夾選擇。選擇標(biāo)準(zhǔn)包，下一步 。選擇要打包的工程。打開 VB 打包向?qū)А? 代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。 檢索完之后，點(diǎn) Excel 報(bào)表輸出，系統(tǒng)自動(dòng)輸出成報(bào)表（如圖 410）。輸入關(guān)鍵字，點(diǎn)檢索按鈕。如圖 48所示。 以基本項(xiàng)目信息表為例，在圖 46中的數(shù)據(jù)表選擇信息表如圖 47。 代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。 各信息表中的序號(hào)及各種編號(hào)一定要統(tǒng)一、規(guī)范。 修改：沒(méi)有修改按鈕，在移動(dòng)到要修改的記錄，直接修改。 刪除：是刪除當(dāng)前的記錄。 添加：是添加一新的記錄。 ：移動(dòng)到下一條記錄。 圖 44 信息管理界面 各按鈕的功能：（所有管理界面） ：移動(dòng)到第一條記錄。期刊論文信息、項(xiàng)目獲獎(jiǎng)信息、項(xiàng)目基本信息、著 作管理信息、項(xiàng)目參加人員信息在下拉列表可以選擇，以項(xiàng)目基本信息為例介紹。 第四節(jié) 信息管理 信息管理中主要是對(duì)所有數(shù)據(jù)信息的添加、修改、刪除的功能。其中密碼數(shù)據(jù) user_info 中姓名和密碼字段對(duì)應(yīng)的記錄。操作已成功！。之后點(diǎn)修改。如圖 43。 刪除用戶：選中要?jiǎng)h除的用戶，直接點(diǎn)刪除、系統(tǒng)有提示是否真的刪除，點(diǎn)是，就刪除了此用戶。完畢。代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。初始管理員 密 碼 為 admin 。添加、刪除用戶是在數(shù)據(jù)表 user_info中添加和刪除用戶。 第二節(jié) 系統(tǒng)管理 在系統(tǒng)功能設(shè)計(jì)中，系統(tǒng)管理功能主要有添加用戶，刪除用戶，和管理員密碼修改，如圖 42 所示。Persist Security Info=False 引擎采用 來(lái)連接 Access2021 數(shù)據(jù)庫(kù)。 amp。連接代碼如下： If Then = Provider=。 如果三次登錄都出錯(cuò)，系統(tǒng)自動(dòng)退出。系統(tǒng)自動(dòng)判斷用戶的要權(quán)限。本管理系統(tǒng)登錄 界面如圖 41。根據(jù)需求分析和功能設(shè)計(jì)，系統(tǒng)應(yīng)用程序分為五大模塊：登錄模塊、 信息管理、信息檢索、系統(tǒng)管理、用戶管理五個(gè)模塊。 根據(jù)用戶需求和功能設(shè)計(jì)， 數(shù)據(jù)庫(kù)文件名： ， 系統(tǒng)共分如下幾個(gè)表： 根據(jù)系統(tǒng)需求分析和功能設(shè)計(jì)，在數(shù)據(jù)庫(kù)創(chuàng)建以下幾個(gè)表： user_info、期刊論文信息、項(xiàng)目獲獎(jiǎng)信息、項(xiàng)目基本信息、著作管理信息、項(xiàng)目參加人員信息。 為了更好地組織數(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)。 數(shù)據(jù)使用權(quán)限設(shè)置：針對(duì)用戶的不同使用要求，確定數(shù)據(jù)的用戶使用權(quán)限，確保數(shù)據(jù)安全。數(shù)據(jù)表設(shè)計(jì)不僅要滿足數(shù)據(jù)存儲(chǔ)的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時(shí)數(shù)據(jù)表。 數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫(kù)中數(shù)據(jù)表的結(jié)構(gòu)，數(shù)據(jù)表的邏輯結(jié)構(gòu)包括：屬性名稱、類型、表示形式、缺省值、校驗(yàn)規(guī)則、是否關(guān)鍵字、可否為空等。 數(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ù)。 基本資料系統(tǒng) 項(xiàng)目參加人員管理 項(xiàng)目基本情況 字典管理模塊 項(xiàng)目性質(zhì) 范圍 日期 檢索源 項(xiàng)目獲獎(jiǎng)情況 期刊論文管理 著作管理 成功 圖 系統(tǒng)流程圖 普通用戶 Admin用戶 讀取用戶類型 用戶登錄 開 始 提示出錯(cuò) 登 錄 系 統(tǒng) 基 本 資 料 主界面 字典管理 第四節(jié) 數(shù)據(jù)庫(kù)表結(jié)構(gòu)設(shè)計(jì) 數(shù)據(jù)庫(kù)設(shè)計(jì)主要是進(jìn)行數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)，即將數(shù)據(jù)按一定的分類、分組系統(tǒng)和邏輯層次組織起來(lái)，是面向用戶的。 Admin用戶 普通用戶 系 統(tǒng) 用 戶 信 息 修改自身的用戶名和密碼 修改 Admin 用戶的密碼 創(chuàng)建修改和刪除普 通用戶信息 圖 31 登錄系統(tǒng)模塊結(jié)構(gòu) 基本資料 模塊結(jié)構(gòu)流程圖：如圖 32。 日期 格式 ： YYYYMMDD。 范圍 包括： 分為全國(guó)、國(guó)際、地方三種情況。 著作管理 模塊包括：顯示添加修改刪除查詢。 項(xiàng)目獲獎(jiǎng)情況 模塊包括：顯示添加修改刪除查詢。 基本資料管理主要包括： 項(xiàng)目參加人員管理 模塊包括：顯示添加修改刪除查詢。 系統(tǒng)管理主要包括： 添加用戶模塊包括：為系統(tǒng)新用戶設(shè)置用戶名及口令。系統(tǒng)管理主要任務(wù)是提高系統(tǒng)安全性和對(duì)系統(tǒng)提供良好的維護(hù)，如用戶 權(quán)限可以為用戶提供權(quán)限服務(wù)。提供各種信息的錄入，比如 項(xiàng)目