【正文】 or=39。構(gòu)造 SQL Dim sql As String = update books set booktype=39。判斷是否選擇文件，并打開 If = Then = () 39。 主窗體代碼： 主窗體程序代碼： Imports Imports Public Class main 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 退 出 系 統(tǒng) XToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles 退 出 系 統(tǒng) () 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 書籍類別管理 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不能重復(fù)。 數(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，用戶在此登錄進入主界面。該數(shù)據(jù)庫系統(tǒng)具有以下方面的特點 : 結(jié)構(gòu)合理，對一個人員建立多條記錄。這種轉(zhuǎn)化較簡單，需要將實體的屬性定義為表的屬性即可。 (5)系統(tǒng)查詢模塊：可根據(jù)不同的條件（條形碼、書名、類別、作者、書架、出版社）查詢讀者需要的圖書、 讀者可根據(jù)不同的條件（圖書條形碼、圖書名稱、讀者編號、讀者名字、到期時間）查詢自己借閱圖書信息。 系統(tǒng)功能模塊設(shè)計 (1)系統(tǒng)設(shè)置模塊：添加刪除管理員、修改密碼、書籍類型設(shè)置、索引設(shè)置、借書 \丟失賠款設(shè)置。 (3)信息分類清晰、準(zhǔn)確。本系統(tǒng)還可對用戶的賬號和書目的閱讀權(quán)限進行管理。另外，傳統(tǒng)的圖書館不能滿足一部分現(xiàn)代人的需要，而電子閱覽室，由于其不受時間與空間的限制同時又具有傳統(tǒng)圖書館的大部分功能，能夠滿足各類用戶的常規(guī)與特殊需求，而且其方便快捷，實現(xiàn)技術(shù)又比較成熟，因此受到當(dāng)代人的喜愛。 (2)經(jīng)濟可行性：系統(tǒng)建設(shè)不需要很大的投入、可縮減人力投入。在信息時代的今天，人類需要對在政治、經(jīng)濟、軍事、文化、科研、教育等領(lǐng)域產(chǎn)生的大量信息進行管理，并對數(shù)據(jù)進行加工處理，數(shù)據(jù)庫技術(shù)則是信息管理與數(shù)據(jù)處理的先進技術(shù)。在對圖書、讀者的管理，其實是對圖書、讀者數(shù)據(jù)的管理。 本系統(tǒng)就是在以 SQL Server 2020 作為后臺數(shù)據(jù)庫，以 Visual Basic 為編程語言的中小型企業(yè)圖書管理而開發(fā)的一個數(shù)據(jù)庫管理系統(tǒng)。 Visual Basic、 Visual C++、 Visual C 和 Visual J 全都使用相同的集成開發(fā)環(huán)境 (IDE)，利用此 IDE 可以共享工具且有助于創(chuàng)建混合語言解決方案。系統(tǒng)運行結(jié)果證明，本文所設(shè) 計的圖書管理系統(tǒng)可以滿足學(xué)生和教師借閱者、圖書管理員兩方面的需要，達到了設(shè)計要求。 摘 要 圖書管理系統(tǒng)是智能辦公系統(tǒng) (IOA)的重要組成部分，因此，圖書管理系統(tǒng)也以方便、快捷的優(yōu)點正慢慢地進入人們的生活，將傳統(tǒng)的圖書 管理方式徹底的解脫出來，提高效率，減輕工作人員以往繁忙的工作，減小出錯的概率，使讀者可以花更多的時間在選擇書和看書上。 (10)要求通過菜單調(diào)用各項操作，對于使用頻繁的操作，應(yīng)設(shè)計工具欄按鈕。 (5) 借書證掛失、停借、恢復(fù) (6) 讀者信息查詢 ：查詢 讀者的基本信息以及讀者借閱圖書的情況 ， (7) 圖書信息查詢 ：查 詢 圖書基本信息和圖書的借出情況 ，要求盡量使用選擇查詢、盡量避免用鍵盤輸入數(shù)據(jù)的查詢，提高查詢效率。 (3) 圖書借閱：進行借書登記。 (2) 讀者信息的輸入、修改、刪除操作，要求輸入界面要友好、用戶操作方便、盡可能減少漢字的輸入、盡量使用組合框進行選擇輸入、盡量避免輸入錯誤數(shù)據(jù) 。若圖書丟失則進行相應(yīng)處理并進行罰款。 (9)考慮系統(tǒng)的安全性，需要對用戶進行安全認證，還需要實現(xiàn)系統(tǒng)用戶的管理功能，包括：添加用戶、刪除用戶、修改用戶信息等。 [1] 《 SQL Server 數(shù)據(jù)庫管理與開發(fā)教程與實訓(xùn)》，杜兆將，北京大學(xué)出版社，2020 年 1 月； [2] 《 程序設(shè)計實用教程》