【正文】 下界 to 上界） [as 數(shù)據(jù)類型 ] 用 Dim 語(yǔ)句聲明的數(shù)據(jù)變量為局部變量，如果要聲明靜態(tài)變量、模塊級(jí)的變量或公用數(shù)組變量，只把聲明關(guān)鍵字“ Dim”分別改成“ Static”、“ Private”、“ Public”即可。 也可以指定腳標(biāo)的起始值 ，例如： Dim IntegerArray(2 to 10) As Integer 這個(gè)數(shù)組含有九個(gè)元素，腳標(biāo)從 2 到 10。 創(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)完成，非常方便。 “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ǔ)句，它的形式很多。 “Do …… Loop While ” 與前兩者的區(qū)別在于，它不管條件的真假，都會(huì)先執(zhí)行 “Do”后面的語(yǔ)句，也就是說(shuō)，它至少執(zhí)行語(yǔ)句一次。 Until 條件 可以相當(dāng)于 While Not 條件 。 第五節(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ò)程。函數(shù)和過(guò)程都可以有參數(shù)，也可 以沒(méi)有參數(shù)。 Sub 過(guò)程的定義格式如下： [public][Private][Static] Sub 過(guò)程名稱 (參數(shù) ) …… …… End Sub Sub 過(guò)程的調(diào)用很簡(jiǎn)單： Call 過(guò)程名稱（參數(shù)）。就是多了一個(gè)返回值的類型。 ADO 的對(duì)象模型是所有數(shù)據(jù)訪問(wèn)接口對(duì)象模型中最簡(jiǎn)單的一種。 OLE DB是一種底層編程接口，用來(lái)訪問(wèn)許多不同類型的數(shù)據(jù)源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數(shù)據(jù)源。 OLEDB 提供了訪問(wèn)任何數(shù)據(jù)資源的方法，包括相互關(guān)聯(lián)的數(shù)據(jù)庫(kù)和相互不關(guān)聯(lián)的數(shù)據(jù)庫(kù)、 Email和文件系統(tǒng)、文本和圖形以及用戶定義的數(shù)據(jù)對(duì)象。對(duì)象模型使用 Connection 對(duì)象使連接概念得以具體 。 Recordset 對(duì)象可支持兩類更新：立即更新和批更新。也可以使用 AddNew 和 Update方法將值的數(shù)組作為參數(shù)傳遞，同時(shí)更新記錄的若干字段。 Recordset 對(duì)象含有由 Field 對(duì)象組成的 Fields 集合。使用 Field 對(duì)象的 Value 屬性可設(shè)置或返回當(dāng)前記錄的數(shù)據(jù) 。 MoveFirst、 MoveLast、 MoveNext 和 MovePrevious 方法 ： 在指定 Recordset 對(duì)象中移動(dòng)到第一個(gè)、最后一個(gè)、下一個(gè)或前一個(gè)記錄并使該記錄成為當(dāng)前記錄。 Open 方法 (ADO Recordset)： 打開(kāi)記錄集。 Execute 方法 ： 執(zhí)行指定的查詢、 SQL 語(yǔ)句、存儲(chǔ)過(guò)程或特定提供者的文本等 內(nèi)容 。主要功能有對(duì) 期刊論文信息、項(xiàng)目獲獎(jiǎng)信息、項(xiàng)目基本信息、著作管理信息、項(xiàng)目參加人員信息 等進(jìn)行管理和 字典信息 管理以及對(duì)系統(tǒng)自身的用戶權(quán)限管理。 系統(tǒng) 不但含有 高校科研 日常項(xiàng)目的信息，而且還包含了對(duì) 信息 的查詢 檢索 功能。 該系統(tǒng)是基于 SSTab 窗體 ， 以 VB 自帶的 JET 引擎連接 Access 2021數(shù)據(jù)庫(kù)進(jìn)行開(kāi)發(fā)的高?？蒲?管理系統(tǒng)，力求與實(shí)際相結(jié)合具有 高?？蒲?日常管理和 檢索 等功能，旨在達(dá)到使 高?？蒲?的管理和人事數(shù)字化使之更加方便快捷以提高工作效率。 修改密碼模塊包括：用于操作員更改自己的系統(tǒng)口令。 項(xiàng)目基本情況 模塊包括：顯示添加修改刪除查詢。 期刊論文管理 模塊包括：顯示添加修改刪除查詢。 字典 管理主要包括： 項(xiàng)目性質(zhì) 包括： 分為國(guó)家自然科學(xué)基金、 86部省科委及企業(yè)集團(tuán)四種情況 。 檢索源 包括： 分為 EI、 SCI、核心和一般四種情況。 第二節(jié) 系統(tǒng)結(jié)構(gòu)設(shè)計(jì) 系統(tǒng) 模塊結(jié)構(gòu)流程圖：如圖 31。 圖 32 基本資料模塊結(jié)構(gòu)圖 字典 管理 模塊結(jié)構(gòu)流程圖：如圖 33 圖 33 字典管理模塊結(jié)構(gòu)圖 系統(tǒng)總流程圖：如圖 34。數(shù)據(jù)庫(kù)設(shè)計(jì)時(shí)需要綜合企業(yè)各個(gè)部門(mén)的存檔數(shù)據(jù)和數(shù)據(jù)需求，分析各個(gè)數(shù)據(jù)之間的關(guān)系，按照 DBMS 提供的功能和描述工具，設(shè)計(jì)出規(guī)模適當(dāng)、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型。針對(duì)選擇的 DBMS，進(jìn)行數(shù)據(jù)庫(kù)結(jié)構(gòu)定義。關(guān)系型數(shù)據(jù)庫(kù)要盡量按關(guān)系規(guī)范化要求 進(jìn)行數(shù)據(jù)庫(kù)設(shè)計(jì)，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來(lái)決定。 存儲(chǔ)設(shè)備和存儲(chǔ)空間組織：確定數(shù)據(jù)的存放地點(diǎn)、存儲(chǔ)路徑、存儲(chǔ)設(shè)備等，備份方案，對(duì)多版本如何保證一致性和數(shù)據(jù)的完整性。 數(shù)據(jù)字典設(shè)計(jì)：用數(shù)據(jù)字典描述數(shù)據(jù)庫(kù)的設(shè)計(jì)，便于維護(hù)和修改。這一步設(shè)計(jì)完成后數(shù)據(jù)庫(kù)和數(shù)據(jù)結(jié)構(gòu)設(shè)計(jì)工作基本完成，只待系統(tǒng)實(shí)現(xiàn)時(shí)將數(shù)據(jù)分析和數(shù)據(jù)字典的內(nèi)容代入到所設(shè)計(jì)的數(shù)據(jù)整體關(guān)系結(jié)構(gòu)中，一個(gè)規(guī)范化數(shù)據(jù)庫(kù)系統(tǒng)結(jié)構(gòu)就建立起來(lái)了。表結(jié)構(gòu)如下： User_info 表詳 細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 姓名 文本 主鍵 密碼 文本 期刊論文信息表詳細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 論文名稱 文本 論文英文名稱 文本 發(fā)表日期 文本 期刊名稱 文本 第一作者 文本 第二作者 文本 第三作者 文本 范圍 文本 檢索源 文本 檢索號(hào) 文本 學(xué)科門(mén)類 文本 出版單位 文本 項(xiàng)目獲獎(jiǎng)信息表詳細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 項(xiàng)目名稱 文本 驗(yàn)收日期 文本 鑒定日期 文本 獲獎(jiǎng)日期 文本 鑒定單位 文本 獲獎(jiǎng)名稱 文本 授獎(jiǎng)單位 文本 證書(shū)號(hào) 文本 項(xiàng)目參加人員信息表詳細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 人員編號(hào) 文本 姓名 文本 參加項(xiàng)目名稱 文本 備注 文本 著作管理信息表詳細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 著作名稱 文本 著作英文名稱 文本 發(fā)表日期 文本 作者 文本 出版單位 文本 項(xiàng)目基本信息表詳細(xì)結(jié)構(gòu)如下： 字段名稱 字段類型 說(shuō)明 項(xiàng)目編號(hào) 文本 項(xiàng)目名稱 文本 負(fù)責(zé)人 1 文本 負(fù)責(zé)人 2 文本 主要承擔(dān)人 1 文本 主要承擔(dān)人 2 文本 項(xiàng)目來(lái)源 文本 項(xiàng)目性質(zhì) 文本 科研代號(hào) 文本 開(kāi)始日期 文本 結(jié)束日期 文本 第四章 應(yīng)用程序的開(kāi)發(fā) 應(yīng)用程序是用 VB 開(kāi)發(fā)的，界面設(shè)計(jì)的簡(jiǎn)單明了。 第一節(jié) 登錄模塊的開(kāi)發(fā) 登錄界面是用戶最先看到的系統(tǒng)的界面，所以直觀上給用戶的感覺(jué)很重要，所以做一個(gè)好的界面，提高軟件的親和力。 圖 41 登錄界面 根據(jù)登錄模塊的功能，管理員和普通用戶界面統(tǒng)一在一起。管理員有所有的權(quán)限，普通用戶只有檢索和改本人的密碼權(quán)。 數(shù)據(jù)庫(kù)的連接采用的是 ADO 對(duì)象。Data Source= amp。 \。 詳細(xì)代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。只有管理員用戶才有權(quán)限進(jìn)入本界面。管理員密碼修改是對(duì)本機(jī)系統(tǒng)管理員 admin 用戶的密碼修改。 管 理 員 密 碼 存 放 在 機(jī) 子 的 注 冊(cè) 表 中 ， 位 置 在 ：HKEY_CURRENT_USER\Software\VB and VBA Program Settings\ 高?？蒲泄芾硐到y(tǒng)\Settings\syspassword 項(xiàng)。 添加用戶：在用戶名稱中輸入要添加用戶的名，原始密碼為 12345，可以修改，之后點(diǎn)添加。如果系統(tǒng)已經(jīng)添加的該用戶，系統(tǒng)自動(dòng)提示，重新添加。 圖 42 系統(tǒng)管理 第三節(jié) 用戶密碼修 改 用戶密碼修改是指普通非管理員用戶的密碼修改。 圖 43 用戶密碼修改 修改密碼：在舊密碼輸入你的登錄密碼，在新密碼中輸入新密碼，在新密碼核實(shí)中再輸入一次新密碼。系統(tǒng)提示。這樣下一次再進(jìn)入本系統(tǒng)時(shí)本用戶的密碼就改為新密碼。代碼實(shí)現(xiàn)請(qǐng)參考附錄程序源代碼。也是本次開(kāi)發(fā)的重點(diǎn)。界面如圖 44。 ：移動(dòng)到上一條記錄。 ：移動(dòng)最后一條記錄。 瀏覽：是查看全的記錄，如圖 45。 保存：是在添加和修改記錄后，保存記錄。點(diǎn)保存后就修改完畢。這樣有利于信息 檢索。 圖 45 信息瀏覽 第五節(jié) 信息查詢 信息查詢檢索菜單下有期刊論文信息、項(xiàng)目獲獎(jiǎng)信息、項(xiàng)目基本信息、著作管理信息、項(xiàng)目參加人員信息的檢索與打印，在信息檢索菜單下拉可以選擇要檢索的表， 在查詢完后，可以輸出 Excel報(bào)表，在如圖 46中。在檢索名稱中輸入要檢索的字段。在后面下拉框中選擇條件如圖 49。 圖 47 數(shù)據(jù)表 圖 48 檢索名稱 圖 49檢索條件 圖 46 信息檢索 在選擇條件包括 =， ,=,=,like，其中 like是用于模糊檢索。編輯格式以后就可以打印。 圖 410 Excel報(bào)表 第七節(jié) 打包 應(yīng)用程序 程序的打包采用 VB 自帶的打包工具。如圖 424。點(diǎn)打包，如圖 425。如圖 426。如圖 427。一直下一步，只到如圖 。 程序的發(fā)布，是用很打好的安裝包，來(lái)在用戶的機(jī)子上安裝本程序。一般安裝都是默認(rèn)安裝。 圖 424 打包界面 圖 425 選擇類型 圖 426 打包文件夾 圖 428 完成 高?？蒲泄芾硐到y(tǒng) 引 言 當(dāng)今時(shí)代是飛速發(fā)展的信息時(shí)代。計(jì)算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。 尤其對(duì)于復(fù)雜的信息管理，計(jì)算機(jī)能夠充分發(fā)揮它的優(yōu)越性。本系統(tǒng)就是 用 計(jì)算機(jī)操作 高?？蒲?管理系統(tǒng) ， 是 高?；蚩蒲袉挝?用戶更好的維護(hù)各項(xiàng) 科研 管理業(yè)務(wù)處理工作而開(kāi)發(fā)的管理軟件 。 DBMS 是數(shù)據(jù)庫(kù)系統(tǒng)的核心組成部分。 DBMS 總是基于某種數(shù)據(jù)模型，可以把 DBMS 看成是某種數(shù)據(jù)模型在計(jì)算機(jī)系統(tǒng)上的具體實(shí)現(xiàn)。 Access 2021 就是一種關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng) 。因此，開(kāi)發(fā)這樣一套 高?？蒲?管理系統(tǒng)軟件成為很有必要的事情，在本文中將就本次畢業(yè)設(shè)計(jì)我所開(kāi)發(fā)的 高?？蒲?管理系統(tǒng) ,談?wù)勂溟_(kāi)發(fā)過(guò)程和所涉及到的問(wèn)題及解決方法。系統(tǒng)運(yùn)行結(jié)果證明，本文所設(shè)計(jì)的 高?？蒲?管理系統(tǒng) 可以滿足 用戶 的需要 。 以往 ， 科研人員 對(duì) 文章、文件處 理的主要方式是基于文本、表格等紙介質(zhì)的 手工處理，對(duì)于 科研人員的基本 情況 的記錄往往采用手工的記錄來(lái) 進(jìn)行， 對(duì)科研信息的處理也是通過(guò)人工計(jì)算、統(tǒng)計(jì)、查詢、手抄等來(lái)進(jìn)行 ?？偟膩?lái)說(shuō)，缺乏系統(tǒng)，規(guī)范的信息管理手段。 數(shù)據(jù)處理 用 手工操作，工作量大，出錯(cuò)率高，出錯(cuò)后不易更改， 尤其是對(duì)于高?？蒲羞@樣的部門(mén)來(lái)說(shuō)更是如此 。 工作都是由人工來(lái)進(jìn)行的，時(shí)間一長(zhǎng)，這就造成了很多的問(wèn)題，使得整個(gè)單位的人們的工作積極性也不高，整個(gè)運(yùn)做的效率也不高了 。隨著社會(huì)的發(fā)展，在信息社會(huì)中，信息的獲取、處理、交流和決策都需要高質(zhì)量的計(jì)算機(jī)軟件來(lái)完成。因此制作一個(gè)高?？蒲泄芾硐到y(tǒng)統(tǒng)軟件是十分重要和必要的 。因此，開(kāi)發(fā)這樣一套 高校科研 管理系統(tǒng)軟件成為很有必要的事情 。 ，用 ACCESS 2021 作為后臺(tái)支持?jǐn)?shù)據(jù)庫(kù)，通 過(guò) ACCESS 2021中并對(duì)其編程來(lái)實(shí)現(xiàn)各種功能。 第一節(jié) Access 數(shù)據(jù)庫(kù)介紹 過(guò)去的一些數(shù)據(jù)庫(kù)軟件，在操作上、數(shù)據(jù)庫(kù)建立、維護(hù)等等，都相當(dāng)復(fù)雜且不易使用，但是在具備了窗口的 GUI（圖形用戶界面）特性的 ACCESS 數(shù)據(jù)庫(kù)推出之后，數(shù)據(jù)庫(kù)的建立不再是困難的事情，我們可以在 PC上簡(jiǎn)單而快速的建立出一