【正文】 Private Sub 讀者信息管理 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 讀 者信 息 管 理 = Me () () End Sub Private Sub 打印讀者信息 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 打 印讀 者 信 息 = Me () () End Sub Private Sub 書籍類別管理 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 書 籍類 別 管 理 = Me () () End Sub Private Sub 書籍信息管理 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 書 籍信 息 管 理 = Me () () End Sub Private Sub ToolStripMenuItem3_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripMenuItem4_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripMenuItem5_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripButton6_Click(ByVal sender As , ByVal e As ) Handles () End Sub Private Sub ToolStripMenuItem6_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripMenuItem7_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub 借出 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 借出 = Me () () End Sub Private Sub 還書 ToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 還書 = Me () () End Sub Private Sub ToolStripButton1_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripButton2_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripButton4_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub Private Sub ToolStripButton3_Click(ByVal sender As , ByVal e As ) Handles = Me () () End Sub 創(chuàng)建書籍信息管理窗體 功能描述 此窗體名為書籍信息管理，實現(xiàn)刪除、修改書籍信息的功能，編號和 ISDN不能重復。 登錄窗體代碼： Private Sub OK_Click(ByVal sender As , ByVal e As ) Handles Dim txtName As String = ().Trim() Dim txtPwd As String = ().Trim() Dim db As = New () Dim flag As Boolean = (txtName, txtPwd) If flag Then = txtName = () () Else MsgBox( 用 戶 名 或 密 碼 錯 誤 , 請 檢 查 后 重 新 輸 入 !, , 登錄信息 ) End If End Sub Private Sub Cancel_Click(ByVal sender As , ByVal e As ) Handles = = End Sub Private Sub Login_Load(ByVal sender As Object, ByVal e As ) Handles () End Sub Private Sub OK_Validating(ByVal sender As , ByVal e As ) Handles If = Then (UsernameTextBox, ) (UsernameTextBox, 用戶名不能為空！ ) 39。 數(shù)據(jù)表設(shè)計 通過對圖書管理系統(tǒng)的內(nèi)容和數(shù)據(jù)流程分析，設(shè)計數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)如下： 圖 31 用戶表 圖 32 書籍信息表 圖 33 書籍類型表 圖 34 讀者信息表 圖 35 讀者類型表 圖 36 借書信息表 圖 37 索引表 圖 38 索引表 第四章 界面設(shè)計和代碼編寫 設(shè)計登錄窗體 功能描述 此窗體名為： Login，用戶在此登錄進入主界面。 建檔、修改、查詢、統(tǒng)計快速而準確。該數(shù)據(jù)庫系統(tǒng)具有以下方面的特點 : 結(jié)構(gòu)合理，對一個人員建立多條記錄。即將各個實體之間的聯(lián)系轉(zhuǎn)化為表格之間的關(guān)系，如外部鍵的定義。這種轉(zhuǎn)化較簡單，需要將實體的屬性定義為表的屬性即可。也就是要將概念上的結(jié)構(gòu)轉(zhuǎn)化為數(shù)據(jù)庫系統(tǒng)所支持的實際數(shù)據(jù)模型。 (5)系統(tǒng)查詢模塊：可根據(jù)不同的條件（條形碼、書名、類別、作者、書架、出版社）查詢讀者需要的圖書、 讀者可根據(jù)不同的條件（圖書條形碼、圖書名稱、讀者編號、讀者名字、到期時間）查詢自己借閱圖書信息。 (3)圖書管理模塊：添加刪除不同類型的的圖書及注明圖書可借的天數(shù)庫存數(shù)量、添加刪除圖書的檔案。 系統(tǒng)功能模塊設(shè)計 (1)系統(tǒng)設(shè)置模塊：添加刪除管理員、修改密碼、書籍類型設(shè)置、索引設(shè)置、借書 \丟失賠款設(shè)置。 (5)實現(xiàn)對圖書借閱和歸還過程 的全程數(shù)據(jù)信息跟蹤。 (3)信息分類清晰、準確。 系統(tǒng)實現(xiàn)的目標 學校圖書管理系統(tǒng)的開發(fā)主要要實現(xiàn)的目標有以下幾個方面： (1)界面設(shè)計友好、美觀。本系統(tǒng)還可對用戶的賬號和書目的閱讀權(quán)限進行管理。為了方便讀者 查找自己感興趣的主題進行閱讀，要將圖書按照內(nèi)容進行分類。另外，傳統(tǒng)的圖書館不能滿足一部分現(xiàn)代人的需要，而電子閱覽室，由于其不受時間與空間的限制同時又具有傳統(tǒng)圖書館的大部分功能，能夠滿足各類用戶的常規(guī)與特殊需求，而且其方便快捷，實現(xiàn)技術(shù)又比較成熟，因此受到當代人的喜愛。 綜上所述 通過可行性分析認為新系統(tǒng)的開發(fā)方案切實可行，可進行開發(fā)。 (2)經(jīng)濟可行性：系統(tǒng)建設(shè)不需要很大的投入、可縮減人力投入。 現(xiàn)在大多數(shù)的圖書管理方式為手工處理，重復勞動多，勞動強度大，而且容易出錯，新系統(tǒng)的使用能否可以很好的解決這些問題要看系統(tǒng)的可行性，可行性研究的目的是用最小的代價在盡可能短的時間內(nèi)確定問題是否能夠解決。在信息時代的今天，人類需要對在政治、經(jīng)濟、軍事、文化、科研、教育等領(lǐng)域產(chǎn)生的大量信息進行管理，并對數(shù)據(jù)進行加工處理，數(shù)據(jù)庫技術(shù)則是信息管理與數(shù)據(jù)處理的先進技術(shù)。本系統(tǒng)的設(shè)計主要從以下幾方面做起：系統(tǒng)業(yè)務(wù)流程分析、系統(tǒng)的功能設(shè)計、系統(tǒng)的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計等。在對圖書、讀者的管理，其實是對圖書、讀者數(shù)據(jù)的管理。同時對整個系統(tǒng)的分析、設(shè)計過程給出一個完整論證。 本系統(tǒng)就是在以 SQL Server 2020 作為后臺數(shù)據(jù)庫，以 Visual Basic 為編程語言的中小型企業(yè)圖書管理而開發(fā)的一個數(shù)據(jù)庫管理系統(tǒng)。 SQL Server2020 簡介 SQL Server 2020 是一個全面的數(shù)據(jù)庫平臺，使用集成的商業(yè)智能 (BI) 工具提供了企業(yè)級的數(shù)據(jù)管理。 Visual Basic、 Visual C++、 Visual C 和 Visual J 全都使用相同的集成開發(fā)環(huán)境 (IDE)，利用此 IDE 可以共享工具且有助于創(chuàng)建混合語言解決方案。下面簡要介紹一下中 文 Visual Studio 2020 和 SQL Serv