【正文】 及適用范圍，本系統(tǒng)選用的數(shù)據(jù)庫語言 Visual Basic語言，該開發(fā)工具具有很多長處： Visual Basic 是一種可視化的、面對對象和條用事件驅(qū)動方式的結(jié)構(gòu)化高級程序設(shè)計，可用于開發(fā) Windows 環(huán)境下的種類應(yīng)用程序。 2)局部 ER 模式的合并 合并的原則是：首先進行兩兩合并；先和合并那些現(xiàn)實世界中有聯(lián)系的局部結(jié)構(gòu)；合并從公共實體類型 開始，最后再加入獨立的局部結(jié)構(gòu)。然后再把概念模式轉(zhuǎn)換成邏輯模式。 該系統(tǒng)能高速、快捷、智能化的管理全過程，并加強圖書管理中 的 各 種 信息 資 源 的管 理 與 應(yīng)用 ， 提 高圖 書 查找 與 查 詢的 處 理 速度，進而提高企業(yè)的整體管理水平。 第二章 系統(tǒng)分析與設(shè)計 現(xiàn)系統(tǒng)中存在的問題 現(xiàn)行的 圖書管理 系統(tǒng)只是單一管理系統(tǒng)，現(xiàn)已不能滿足快速準確的圖書管理需要。 在開發(fā)方式上對系統(tǒng)的需求，由于學(xué)校圖書館是一種無商業(yè)利益的，所以系統(tǒng)設(shè)計開發(fā)的周期要短，在短時間內(nèi)完 成，減少開發(fā)成本，提高開發(fā)效率，方便、簡單、實用作為系統(tǒng)開發(fā)的指導(dǎo)思想。計算機信息化管理有著儲存信息量大、速度快等許多優(yōu)點，提供給我們的處理信息及時快捷，同時也提高了我們工作人員的自身素質(zhì)。t little, this text introduced under the Visual the environment adoption from top to bottom total programming, from the detailed process that bottom but up applied development develop this system, bring up to realize the basic target that share of management, resources of library information, from the step that but the push head into the arithmetic figure of the library, and shows the system construction design and function design, from the books of store in warehouse to register the search to view, books that issue from library card to angle of borrow , bee a the whole automation the management the mode, and proceeds careful explain from the software engineering science . 第一章 系統(tǒng)需求分析 現(xiàn)行業(yè)務(wù)描述 ： 通過調(diào)查，先畫出圖書館的組織結(jié)構(gòu)圖如下： 館 長 采編組 書 庫 閱覽室 工具書室 目錄廳 借閱室 通過調(diào)研了解到，該圖書館各個部門負責的主要業(yè)務(wù)如下： （ 1）采 編組主要 負責圖 書采編 工作，包 括購置 新書、 打印編目、增加數(shù)量。同時人們對信息和數(shù)據(jù)的利用與處理也已進入自 動化、網(wǎng)絡(luò)化和社會化的階段，因此，開發(fā)相關(guān)的管理信息系統(tǒng)已經(jīng)成為各行各業(yè)的必要和必需了，管理信息系統(tǒng)作為一門邊緣學(xué)科，集管理科學(xué)、信息科學(xué)、系統(tǒng)科學(xué)、現(xiàn)代通信技術(shù)和電子計算機技術(shù)于一體，可以解決企業(yè)或組織所面臨的問題，對內(nèi)來看，可以提高工作效率；對外來看，獲得競爭優(yōu)勢。基于以上三種方法的特點和各自的優(yōu)缺點，本圖書館管理系統(tǒng)利用軟件工程化思想和方法，總體上是采用結(jié)構(gòu)化生命法進行系統(tǒng)分析和設(shè)計的，而系統(tǒng)實現(xiàn)等步驟則采用了原型法和面對對象的方法。 下面繪制出圖書館流通業(yè)務(wù)中借書的流程圖。 學(xué)校圖書館規(guī)模相對于商業(yè)圖書館小，但要有著完善的圖書信息，對每一冊書要有詳細的記錄信息，功能上對系統(tǒng)的需求是全面的。因此在技術(shù)上是可行的。該系統(tǒng)還缺少圖書管理理功能，圖書組成條目都是經(jīng)過手工計算的，工作量很大，且容易產(chǎn)生錯誤，有一個小錯誤，核對都需要花費很大的精力，換句話說，當前沒有 圖書管理 系統(tǒng)。一般情況下，圖書借閱者只應(yīng)該查詢和維護本人的借書情況和個人信息，若查詢和維護其他借閱者的借書情況和個人信息，就要知道其他圖書借閱者的借書證號和密碼。 （ 1） 設(shè)計局部 ER 模式 實體和屬性的定義： 圖書（圖書編號，圖書名稱，作者，出版社 ，出版日期，備注，價格，數(shù)量，） 借閱者（借書證號，姓名，性別，身份證，聯(lián)系電話，密碼） 圖書類別（圖書類別編號，類別描述） 所有局部 ER 模式都設(shè)計好了后 ，接下來就是把它們綜合成單一的全局概念結(jié)構(gòu)。此時模塊也發(fā)展成為最終產(chǎn)品了。 總的來說， Visual Basic 具有以下特點： 可視化編程： 用傳統(tǒng)程序設(shè)計語言設(shè)計程序時，都是通過編寫程序代碼來設(shè)計用戶界面，在設(shè)計過程中看不到界面的實際顯示效果，必須編譯后運行程序才能觀察。在設(shè)計對象時，不必編寫建立和描述每個對象的程序代碼，而是用工具畫在界面上， Visual Basic 自動生成對象的程序代碼并封裝起來。例如，命令按鈕是一個對象 ，當用戶單擊該按鈕時，將產(chǎn)生一個“單擊“ (CLICK)事件，而在產(chǎn)生該事件時將執(zhí)行一段程序，用來實現(xiàn)指定的操作。當原始數(shù)據(jù)變化時，可以自動更新鏈接的數(shù)據(jù)。 關(guān)系型數(shù)據(jù)庫的實現(xiàn) Access2020 就是關(guān)系 數(shù)據(jù)庫 開發(fā)工具 ，數(shù)據(jù) 庫能匯集 各種信息以供查詢、 存儲和檢 索。Visual Basic、 Access 以及其他微軟的軟件產(chǎn)品都是通過共用 JET數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。主要的系統(tǒng)模塊如下圖如示。同時，在查詢時還提供了進行模糊查詢的功能，即該模塊能夠利用讀者輸入的非完整的查詢條件查詢，例如讀 者在書 籍編號的 查詢條 件中輸入 “ 06”， 系統(tǒng)就 能夠查出所有書籍編號包括“ 06”的圖書，像“ 1006”、“ 0600”等 。 輸入讀者編號 讀 者 是否存在 輸入圖書編號 輸入讀者編號 讀 者是否存在 列出讀者所輸入圖書編號 編號是否存在 是否已被借出 圖 借閱圖書流程圖 圖 續(xù)借圖書流程圖 圖 還書流程圖 工作人員通過 此模塊來 進行借 閱 記錄的查 詢。 基礎(chǔ)維護模塊 包括最大借閱數(shù)量、罰款單價昨圖書類別的維護等工作。這些就新建了一個數(shù)據(jù)庫文件。連接數(shù)據(jù)庫 Set conn = CreateObject() 39。設(shè)置數(shù)據(jù)庫對像 End Sub 上面的一 段代碼就是連接數(shù)據(jù)庫的。 管理 員 數(shù)據(jù)庫 存儲的是圖書管 理 員 的用戶名，密碼，以及用權(quán)限等 字段名 字段類型 字段長度 字段說明 用戶名 文本 16 用戶名 密碼 文本 16 密碼 權(quán)限 文本 10 權(quán)限 ：用于存放在借書過程中的借書記錄和還書記錄等等。此可以對圖書 管理系統(tǒng)進行操作 ，以及對用戶密碼和權(quán)限進行修改 圖書 管理 用戶管理 圖書查詢 借閱管理 _ 結(jié)束語 經(jīng)過一個多月的設(shè)計和開發(fā) ， 圖書管理 系統(tǒng)基本開發(fā)完畢。 另外，在系統(tǒng)開發(fā)過程中助手同學(xué)也給于我很大的幫助，幫助解決了不少的難點，使得系統(tǒng)能及時開發(fā)完 成，還有同組的同學(xué)同樣給與我不少幫助，這里一并表示感謝。MsgBox ok If Rs(權(quán)限 ) = 管理員 Then = True = True = True = True Else = True End If = False Else MsgBox 密碼錯誤，請確認后再輸入！ , 0 + 64 End If Else MsgShow 沒有這個用戶！ End If Call CloseConn Err: Exit Sub End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() = False = False = False = False = False End Sub Private Sub Form_Resize() = ( ) / 2 300 = ( ) / 2 300 End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 13 Then Call Command1_Click End If End Sub 主界面與源代碼 Private Sub Y1_Click() 0 End Sub Private Sub Y2_Click() 1 End Sub Private Sub Y3_Click() 2 End Sub Private Sub cz_Click() 2 End Sub Private Sub dspc_Click() End Sub Private Sub dzcx_Click() = 10335 = 5985 End Sub Private Sub dzgl_Click() = 10335 = 5985 End Sub Private Sub H1_Click() End Sub Private Sub H2_Click() MsgBox 你需要什么幫助 ，請于我們聯(lián)系！ , 48, 幫助 End Sub Private Sub hs_Click() = 8130 = 10775 End Sub Private Sub jc_Click() 0 End Sub Private Sub js_Click() = 8450 = 10875 End Sub Private Sub pp_Click() 1 End Sub Private Sub Q_Click() End End Sub Private Sub tc_Click() End End Sub Private Sub tjdz_Click() End Sub Private Sub tjts_Click() End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case js = 8450 = 10875 Case hs = 8130 = 10775 Case tjts Case tjdz 借閱圖書界面和源代碼 rivate Sub Command3_Click() Do While True If ( 圖書名稱 ).Value = Then Text1(1).Text = ( 圖 書 名 稱).Value Exit Do End If Loop End Sub Private Sub Command4_Click() Do While True If ( 圖書序號 ).Value = Then Text1(0).Text = ( 圖 書 序 號).Value Exit Do End If Loop End Sub 添加圖書界面與源代碼： Private Sub Command1_Click() If = Or = Then MsgBox 圖書編號或圖書名稱不能為空！ , 16, 出錯： = Else