圖書館管理信息系統(tǒng)畢業(yè)論文

1、<p>　　摘 要</p><p>　　圖書館管理信息系統(tǒng)是典型的計算機信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。而對于后者則要求應用程序功能完備,易使用等特點。本管理系統(tǒng)包括了系統(tǒng)登錄、讀者管理、書籍管理、借閱信息管理四個總的功能塊。在各個功能塊中又具體包括了讀者種類信息管理、

2、讀者信息管理、書籍類別管理、書籍信息管理、借書信息管理、還書信息管理功能。使用戶方便的對圖書館的信息進行管理，為讀者借閱還書的節(jié)省了大量的時間。 經(jīng)過分析,我們使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一功能方便而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應用原型,然后,對初始原型系統(tǒng)進行需求迭代,不斷修正和改進,直到形成用戶滿意的可行系統(tǒng)。<

3、;/p><p>　　關(guān)鍵字：圖書館管理信息系統(tǒng)、數(shù)據(jù)庫、VISUAL BASIC。</p><p><b>　　ABSTRACT</b></p><p>　　The management information system of the library is a typical computer application of managing

4、information system （know as MIS）,which mainly includes building up data-base of back-end and developing the application interface of front-end. The former required consistency and integrality and security of data. The la

5、ter should make the application powerful and easily used. Including systematically,, books manage, borrow information management four a piece of total functional blocks management read</p><p>　　Keywords: The

6、 management information system of the library、database、VISUAL BASIC. </p><p><b>　　前 言</b></p><p>　　隨著人類社會的發(fā)展，人類知識不斷地增長、擴大。人們也面臨更大的挑戰(zhàn)，在這種挑戰(zhàn)面前，人們需要不斷的學習、不斷的進步，來面對更大的挑戰(zhàn)。在這種形勢下，書籍就漸漸地成

7、為人們獲取、增長知識的主要途徑，而圖書館就自然而然地在人們的生活中占據(jù)了一定的位置。在圖書館方面，就必然面臨著一個問題：怎樣才能科學、有效的把圖書館里圖書管理好？這一個問題直接關(guān)系到讀者求知的方便程度，也關(guān)系到圖書館的發(fā)展。在現(xiàn)代社會中，計算機已經(jīng)在各行各業(yè)發(fā)揮著重要的作用，用計算機來管理已經(jīng)成為必然的結(jié)果。圖書館也不例外，在圖書館的管理過程中，同樣也必需使用計算機來輔助管理。有了計算機的輔助管理，必然要有一套較完善的計算機處理系統(tǒng)（圖

8、書館管理系統(tǒng)）來管理圖書館，這樣才能科學、有效的對圖書進行管理。</p><p>　　利用圖書館管理系統(tǒng)進行管理，能更有效的對圖書進行系統(tǒng)管理，方便讀者對各類圖書的查詢，同時也大大提高了辦理借書、還書手續(xù)方面的工作效率和提高圖書館的服務(wù)效率，為讀者提供方便。針對上述情況，本人開發(fā)了一套圖書館管理專業(yè)軟件--圖書管理系統(tǒng)，該系統(tǒng)并不針對某一個圖書館而開發(fā)，所以在通用性方面相對較廣些。相對于同類軟件來說，該系統(tǒng)功能較

9、齊全，集合了圖書館從進書、銷書、查詢、借書、還書、管理等多種功能。在操作方面也比較方便，界面也較友好。在數(shù)據(jù)庫方面，該系統(tǒng)采用SQL Server2000數(shù)據(jù)庫系統(tǒng)，在安全性方面也有了較大的提高例,談?wù)勂溟_發(fā)過程和所涉及到的問題及解決方法。在下面的各章中我們將對圖書館管理信息系統(tǒng)簡單介紹其開發(fā)過程和所涉及到的問題及解決方法。與傳統(tǒng)的手工作業(yè)相比，它大大提高了工作效率，而且系統(tǒng)采用人機對話方式，菜單提示，界面友好、操作簡單，實現(xiàn)開架借書，

10、加強了圖書流通管理。</p><p><b>　　目 錄</b></p><p>　　第一章 圖書館管理信息系統(tǒng)的問題1</p><p>　　1.1 圖書館管理信息系統(tǒng)的簡介1</p><p>　　1.2 圖書館管理信息系統(tǒng)的用戶需求1</p><p>　　1.3 圖書館管理信息系統(tǒng)

11、功能分析2</p><p>　　1.4 圖書館管理信息系統(tǒng)功能模塊設(shè)計3</p><p>　　第二章 圖書館管理信息系統(tǒng)數(shù)據(jù)庫的設(shè)計4</p><p>　　2.1 數(shù)據(jù)庫的需求分析4</p><p>　　2.2 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計5</p><p>　　2.3 數(shù)據(jù)庫邏輯結(jié)構(gòu)的實現(xiàn)7</p>

12、<p>　　第三章 圖書館管理信息系統(tǒng)的開發(fā)環(huán)境9</p><p>　　3.1 圖書館管理信息系統(tǒng)的開發(fā)語言簡介9</p><p>　　3．1．1 開發(fā)環(huán)境的選擇9</p><p>　　3.2 數(shù)據(jù)庫環(huán)境的選擇10</p><p>　　3.3 VB語言和函數(shù)10</p><p>　　3.4 A

13、ctive數(shù)據(jù)對象——ADO11</p><p>　　3.4.1、ADO的編程模型11</p><p>　　3.4.2、ADO的對象模型12</p><p>　　3.4.3、為項目添加ADO13</p><p>　　3.5 與數(shù)據(jù)庫的連接性13</p><p>　　第四章 圖書館管理信息系統(tǒng)的具體實現(xiàn)15

14、</p><p>　　4.1 系統(tǒng)客戶端程序15</p><p>　　4.2 系統(tǒng)用戶管理模塊的創(chuàng)建17</p><p>　　4.3 讀者種類管理模塊的創(chuàng)建18</p><p>　　4.4 讀者信息管理模塊的創(chuàng)建20</p><p>　　4.5 書籍類別管理模塊的創(chuàng)建22</p><p&g

15、t;　　4.6 書籍信息管理模塊的創(chuàng)建23</p><p>　　4.7 借書信息管理模塊的創(chuàng)建25</p><p>　　4.8 還書信息管理模塊的創(chuàng)建26</p><p>　　4.9 圖書館管理信息系統(tǒng)的實現(xiàn)27</p><p><b>　　結(jié)束語30</b></p><p><b

16、>　　致 謝31</b></p><p><b>　　參考文獻32</b></p><p>　　第一章 圖書館管理信息系統(tǒng)的問題</p><p>　　1.1 圖書館管理信息系統(tǒng)的簡介</p><p>　　圖書館管理信息系統(tǒng)是針對圖書館的大量業(yè)務(wù)處理工作而開發(fā)的管理軟件。根據(jù)用戶的要求，實現(xiàn)借閱

17、管理、讀者管理、和圖書管理，等幾個方面的功能。</p><p>　　本軟件是為了規(guī)范單位的圖書館日常運作，加強圖書借閱的信息管理而開發(fā)設(shè)計的。時間比較倉促，肯定存在許多問題，同時將邊運行邊修改與完善，使其更好的服務(wù)于圖書館的日常管理，滿足圖書館管理方面的各種需要。      </p><p>　　本軟件界面友好，操作簡單，小巧實用，運行穩(wěn)定

18、，自動化程度較高，具備多種功能，能滿足一般小型圖書室的日常管理需要?？蛇M行書籍、讀者、借書和還書等信息的錄入、修改與刪除，同時提供靈活豐富的查詢、報表打印等功能，方便統(tǒng)計匯總。</p><p>　　1.2 圖書館管理信息系統(tǒng)的用戶需求</p><p><b>　　·總體功能需求</b></p><p>　　圖書館管理信息系統(tǒng)是針對圖書

19、館的大量業(yè)務(wù)處理工作用計算機進行全面現(xiàn)代化管理.主要包括讀者管理、書籍管理、和借閱信息管理， 等幾個方面的功能,以實現(xiàn)用戶方便的借書.還書.查詢所需書籍等需求。</p><p>　　具體系統(tǒng)功能需求描述</p><p><b>　　(1)讀者管理</b></p><p>　　讀者管理可分為讀者種類管理和讀者信息管理，可完成對讀者種類的添加.修改

20、.刪除功能；以及完成對讀者信息的添加.修改.刪除.查詢功能。</p><p><b>　　(2) 書籍管理</b></p><p>　　書籍管理包括書籍類別管理和書籍信息管理，可完成對書籍類別的添加.修改.刪除功能；以及完成對書籍信息的添加.修改.刪除.查詢功能。 </p><p>　　(3) 借閱信息管理</p><p&g

21、t;　　借閱信息管理包括借書信息管理和還書信息管理，借書信息管理要完成對所借書籍的添加.修改.刪除.查詢功能；還書信息管理要完成對所還書籍的添加.修改.刪除功能。</p><p>　　1.3 圖書館管理信息系統(tǒng)功能分析</p><p>　　系統(tǒng)開發(fā)的總?cè)蝿?wù)是實現(xiàn)企業(yè)人事管理信息關(guān)系的系統(tǒng)化、規(guī)范化和自動化。系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務(wù)的基礎(chǔ)上完成的，本系統(tǒng)的需要完成功能主要有：<

22、;/p><p>　　有關(guān)讀者種類標準的制定、種類信息的輸入，包括種類編號、種類名稱、借書數(shù)量、借書期限、有效期限、備注等。</p><p>　　讀者種類信息的修改、查詢等。</p><p>　　讀者基本信息的輸入，包括讀者編號、讀者姓名、讀者種類、讀者性別、工作單位、家庭住址、電話號碼、電子郵件地址、辦證日期、備注等。</p><p>　　讀者基

23、本信息的輸入，包括讀者編號、讀者姓名、讀者種類、讀者性別、工作單位、家庭住址、電話號碼、電子郵件地址、辦證日期、備注等等。</p><p>　　書籍類別標準的制定、類別信息的輸入，包括類別編號、類別名稱、關(guān)鍵詞、備注信息等。</p><p>　　書籍類別信息的查詢、修改，包括類別編號、類別名稱、關(guān)鍵詞、備注信息等。</p><p>　　書籍信息的輸入，包括書籍編號、

24、書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍頁數(shù)、關(guān)鍵詞、登記日期、備注信息等。</p><p>　　書籍信息的查詢、修改，包括書籍編號、書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍頁數(shù)、關(guān)鍵詞、登記日期、備注信息等。</p><p>　　借書信息的輸入，包括借書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、備注信息等。</p><

25、p>　　借書信息的查詢、修改，包括借書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、備注信息等。</p><p>　　還書信息的輸入，包括還書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、還書日期、備注信息等。</p><p>　　還書信息的查詢和修改，包括還書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、還書日期、備注信息等。</p&

26、gt;<p>　　1.4 圖書館管理信息系統(tǒng)功能模塊設(shè)計</p><p>　　對上述各項功能進行集中、分塊，按照結(jié)構(gòu)化程序設(shè)計的要求，得到下圖所示的系統(tǒng)功能模塊圖：</p><p>　　系統(tǒng)功能模塊圖（圖1-1）</p><p>　　第二章 圖書館管理信息系統(tǒng)數(shù)據(jù)庫的設(shè)計</p><p>　　數(shù)據(jù)庫在信息管理系統(tǒng)中有著很重要的

27、地位，合理的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計可以提高數(shù)據(jù)儲存的效率，保證數(shù)據(jù)的完整和一致，有利于程序的實現(xiàn)。設(shè)計數(shù)據(jù)庫系統(tǒng)時應該首先充分了解用戶各個方面的要求，包括現(xiàn)有的以及將來可能增加的需求。數(shù)據(jù)庫設(shè)計一般包括如下幾個步驟：</p><p><b>　　數(shù)據(jù)庫需要分析。</b></p><p>　　數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計。</p><p>　　數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計。

28、</p><p>　　2.1 數(shù)據(jù)庫的需求分析</p><p>　　用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢，這就要求數(shù)據(jù)庫結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程，組成一份詳盡的數(shù)據(jù)字典，為后面的具體設(shè)計打下基礎(chǔ)。</p><p>　　仔細分析調(diào)查有關(guān)圖書館管理信息需求的基礎(chǔ)上，得到下圖所示的本系統(tǒng)所處理的數(shù)據(jù)流程：

29、</p><p>　　圖書館管理信息系統(tǒng)數(shù)據(jù)流程圖（圖2-1）</p><p>　　針對一般的圖書館管理信息系統(tǒng)的要求，通過對圖書館管理工作過程的內(nèi)容和數(shù)據(jù)流程分析，設(shè)計如下面所示的數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)：</p><p>　　讀者種類信息，包括的數(shù)據(jù)項有：種類編號、種類名稱、借書數(shù)量、借書期限、有效期限、備注等。</p><p>　　讀者信息，包

30、括的數(shù)據(jù)項有：讀者編號、讀者姓名、讀者種類、讀者性別、工作單位、家庭住址、電話號碼、電子郵件地址、辦證日期、備注等。</p><p>　　書籍類別信息，包括的數(shù)據(jù)項有：類別編號、類別名稱、關(guān)鍵詞、備注信息等。</p><p>　　書籍信息，包括的數(shù)據(jù)項有：書籍編號、書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍頁數(shù)、關(guān)鍵詞、登記日期、備注信息等。</p><p

31、>　　借閱信息，包括的數(shù)據(jù)項有：借閱信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、還書日期、備注信息等。</p><p>　　2.2 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計</p><p>　　采用SQL Sever 2000來完成圖書館管理信息系統(tǒng)的數(shù)據(jù)庫，需將上面的數(shù)據(jù)庫的概念結(jié)構(gòu)轉(zhuǎn)化為SQL的數(shù)據(jù)庫所支持的實際數(shù)據(jù)模型，這也就是數(shù)據(jù)庫的邏輯結(jié)構(gòu)。</p><p&

32、gt;　　圖書館管理信息管理系統(tǒng)數(shù)據(jù)庫中的表格的設(shè)計結(jié)果有以下的表格所表示，這些表格表示在數(shù)據(jù)庫中的一個表：</p><p>　　readertype 讀者種類信息表</p><p>　　表中內(nèi)容有：讀者種類編號、讀者種類名稱、借書數(shù)量、借書期限、有效期限、備注信息。</p><p>　　readers 讀者信息表格</p><p>　

33、　表中內(nèi)容有：readertype中的所有內(nèi)容、讀者編號、讀者姓名、讀者性別、電話號碼、電子郵件地址、辦證日期、工作單位、家庭住址。</p><p>　　booktype 書籍類別信息表</p><p>　　表中內(nèi)容有：書籍類別編號、書籍類別名稱、關(guān)鍵詞、備注信息。</p><p>　　books 書籍信息表</p><p>　　表

34、中內(nèi)容有：書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍頁數(shù)、關(guān)鍵詞、登記日期、備注信息。</p><p>　　borrowinfo 借閱信息表</p><p>　　表中內(nèi)容有：包括books表中的書籍名稱、書籍類別、作者姓名、出版社、書籍備注信息，以及讀者信息中的讀者編號、讀者姓名、讀者種類、借書日期、備注信息。</p><p>　　readertype

35、 讀者種類信息表（圖2-3）</p><p>　　readers 讀者信息表格（圖2-4）</p><p>　　booktype 書籍類別信息表（圖2-5）</p><p>　　books書籍信息表（圖2-6）</p><p>　　borrowinfo借閱信息表（圖2-7）</p><p>　　得到上面的各項數(shù)

36、據(jù)項和數(shù)據(jù)結(jié)構(gòu)以后，就可以設(shè)計出能夠滿足用戶需求的各種實體，以及他們之間的關(guān)系，為以后的邏輯結(jié)構(gòu)設(shè)計打下基礎(chǔ)。</p><p>　　根據(jù)上面的設(shè)計規(guī)劃出的實體有：讀者類別信息實體、讀者信息實體、書籍類別信息實體、書籍信息實體、借閱信息實體。由于上面已經(jīng)介紹了各個實體的包含內(nèi)容，這里就不在對每個實體的E-R圖做介紹?，F(xiàn)介紹各個實體之間的相互關(guān)系E-R圖如下：</p><p><b>

37、;　　圖2-2</b></p><p>　　2.3 數(shù)據(jù)庫邏輯結(jié)構(gòu)的實現(xiàn)</p><p>　　經(jīng)過前面的需求分析和概念結(jié)構(gòu)設(shè)計以后，得到數(shù)據(jù)庫的邏輯結(jié)構(gòu)。然后用SQL server 2000 數(shù)據(jù)庫系統(tǒng)中的SQL查詢分析器實現(xiàn)該邏輯結(jié)構(gòu)。下面是就用戶表格、讀者種類信息表格、讀者信息表格、書籍類別信息表格的SQL語句舉例如下：</p><p>　　創(chuàng)建系統(tǒng)

38、用戶表格 user_InfoCREATE TABLE [dbo].[user_Info1] (</p><p>　　[user_ID] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p>　　[user_PWD] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p>

39、<p>　　[user_Des] [char] (10) COLLATE Chinese_PRC_CI_AS NULL </p><p>　　) ON [PRIMARY]</p><p>　　創(chuàng)建讀者種類信息表格 readertype</p><p>　　CREATE TABLE [dbo].[readertype] (</p><p

40、>　　[typeno] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL , [typename] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p>　　[booknumber] [numeric](4, 0) NULL ,</p><p>　　[bookdays] [nume

41、ric](4, 0) NULL ,</p><p>　　[userfullife] [numeric](5, 0) NULL ,</p><p>　　[memo] [text] COLLATE Chinese_PRC_CI_AS NULL </p><p>　　) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY</p><p

42、>　　創(chuàng)建讀者信息表格 readers</p><p>　　CREATE TABLE [dbo].[readers] (</p><p>　　[readerno] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[readername] [char] (20) COLLATE Chinese_PR

43、C_CI_AS NULL ,</p><p>　　[readersex] [char] (3) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[readertype] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[readerdep] [char] (40) C

44、OLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[address] [char] (40) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[readertel] [char] (20) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[email] [c

45、har] (20) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[checkdate] [datetime] NULL ,</p><p>　　[readermemo] [text] COLLATE Chinese_PRC_CI_AS NULL </p><p>　　) ON [PRIMARY] TEXTIMAGE_ON [

46、PRIMARY]</p><p>　　創(chuàng)建書籍類別信息表格 booktype</p><p>　　CREATE TABLE [dbo].[booktype] (</p><p>　　[booktypeno] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p>　　[typename

47、] [char] (20) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[keyword] [char] (20) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[memo] [text] COLLATE Chinese_PRC_CI_AS NULL </p><p>　　) ON [

48、PRIMARY] TEXTIMAGE_ON [PRIMARY]</p><p>　　第三章 圖書館管理信息系統(tǒng)的開發(fā)環(huán)境</p><p>　　3.1 圖書館管理信息系統(tǒng)的開發(fā)語言簡介</p><p>　　3．1．1 開發(fā)環(huán)境的選擇</p><p>　　Microsoft公司推出Windows以后，立即以其新穎的圖形用戶界面、卓越的多任務(wù)操

49、作系統(tǒng)性能、高層次的軟件開發(fā)平臺而風靡全球。尤其是Office使用軟件的方便使用使許多應用人員想到手動的設(shè)計Windows用戶界面。然而由于對于程序員來說，工作的難度很大。為了適應Windows下運行程序，就必須建立相應的窗口、菜單、對話框等各種控件，面對這種情況，1990年Microsoft公司推出了Windows應用程序開發(fā)工具——VB,從而達到了可視化的結(jié)果。在visual basic中，既繼承了basic語言簡單易用的特點，又采

50、用了面向?qū)ο?、事件?qū)動的編程機制，用一種巧妙的方法把windows編程復雜性封裝起來，提供了可見即所得的可視界面設(shè)計方法。</p><p>　　Vb已經(jīng)經(jīng)歷了幾個版本，Vb6.0在功能上進一步得到完善和擴充，尤其在數(shù)據(jù)庫管理與網(wǎng)絡(luò)應用方面更勝一籌。Vb6.0包括三個版本：學習版，專業(yè)版，企業(yè)版。我們所用的是企業(yè)版（中文）。</p><p>　　Vb6.0的功能特點：具有面向?qū)ο蟮目梢曉O(shè)計工

51、具，事件驅(qū)動的編程機制，易學易用的應用程序集成開發(fā)環(huán)境，結(jié)構(gòu)化的程序設(shè)計語言，支持多種數(shù)據(jù)庫的訪問，ole技術(shù)，active技術(shù)，完備的help聯(lián)機幫助功能。</p><p>　　Vb6.0的運行環(huán)境：Vb6.0是windows95/98或windows NT下的一個應用程序，本身對軟硬件沒有特殊的要求。跟windows95/93或windows NT要求是一致的。 </p&

52、gt;<p>　　硬件要求：一般在586以上的處理器、16MB以上的內(nèi)存、100MB以上的硬盤等。 </p><p>　　軟件要求：windows95/93或windows NT3.51以上版本。</p><p>　　3.2 數(shù)據(jù)庫環(huán)境的選擇</p><p>　　SQL Server 2000是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種

53、信息以供查詢、存儲和檢索。 SQL Server 2000能作為一個功能強大的數(shù)據(jù)庫服務(wù)器有效地工作，而且數(shù)據(jù)庫引擎也應用于客戶端本地存儲獨立數(shù)據(jù)庫的應用程序中。SQL Server 2000可以動態(tài)的配置成能有效的使用客戶端桌面的可用資源，而不需要為每個客戶端專設(shè)一個數(shù)據(jù)庫管理員。SQL Server 2000能提高超大型系統(tǒng)所學要的數(shù)據(jù)庫服務(wù)。SQL Server 2000提供了很多的編程組件和工具。</p><

54、p>　　3.3 VB語言和函數(shù)</p><p>　　Microsoft 公司的Visual Basic6.0是開發(fā)Windows應用程序,尤其是數(shù)據(jù)庫應用程序的快捷有效的工具, 和以前各版本相比,功能更加強大,使用起來更加方便。另外，在Visual Basic6.0中可以用公用模塊來存放整個工程項目公用函數(shù)、過程和全局變量等。這樣可以極大的提高代碼的效率。在項目資源管理器中為項目添加一個Module，保存為

55、Module.bas。往下就可以寫入需要的代碼了。</p><p>　　由于系統(tǒng)中各個功能模塊都將頻繁使用數(shù)據(jù)庫中的各種資源，因此需要一個公共的數(shù)據(jù)操作函數(shù)，用來執(zhí)行各種SQL語句。這就需要添加函數(shù)ExecuteSQL了。ExecuteSQL函數(shù)的參數(shù)是SQL，它用來存放需要執(zhí)行的SQL語句。函數(shù)執(zhí)行時，首先判斷SQL語句中包含的內(nèi)容；當執(zhí)行查詢操作時，ExecuteSQL函數(shù)將返回一個與函數(shù)同名的記錄集對象（R

56、ecordset），所有滿足條件的記錄包含在對象中；當執(zhí)行如刪除、添加等操作時，不返回記錄集對象。</p><p>　　在ExecuteSQL函數(shù)中使用了Connect String函數(shù)，這個函數(shù)用來連接數(shù)據(jù)庫，代碼如下：</p><p>　　Public Function ConnectString() As String</p><p>　　‘返回一個數(shù)據(jù)庫連接

57、</p><p>　　ConnectString=”FileDSN=gzgl.dsn;UID=sa;PWD=”</p><p>　　End Function</p><p>　　由于在后面的程序中，需要頻繁的檢查各種文本框的內(nèi)容是否為空，這也定義了Testtxt函數(shù)，代碼為：Public Function Testtxt(txt As String) As Bool

58、ean</p><p>　　‘判斷輸入內(nèi)容是否為空</p><p>　　If Trim(txt)=”” Then</p><p>　　Testtxt=False</p><p><b>　　Else</b></p><p>　　Testtxt=True</p><p>&l

59、t;b>　　End If</b></p><p>　　End Function.</p><p>　　如果文本框內(nèi)容為空時，函數(shù)將返回True,否則將返回False。</p><p>　　3.4 Active數(shù)據(jù)對象——ADO</p><p>　　從簡單的文本文件到各種復雜的關(guān)系型數(shù)據(jù)庫，數(shù)據(jù)庫應用程序都需要面對各種各樣的數(shù)

60、據(jù)源。Visual basic6.0提供ADO（Active Data Objects）作為應用程序和OLE-DB連接的橋梁。盡管用戶對數(shù)據(jù)的要求種類繁多，但典型的數(shù)據(jù)源都是支持ODBC和SQL的。</p><p>　　ADO，即Active數(shù)據(jù)對象：實際是一種提供訪問各種數(shù)據(jù)類型的連接機制。ADO設(shè)計為一種極簡單的格式，通過ODBC的方法同數(shù)據(jù)庫接口相連。用戶可以使用任何一種ODBC數(shù)據(jù)源，即不僅適合于SQL

61、sever、Oracle、Access等數(shù)據(jù)庫應用程序，也適合excel表格、文本文件、圖形文件和無格式數(shù)據(jù)文件。ADO是基于OLE-DB之上的技術(shù)，因此ADO通過其內(nèi)部的屬性和方法提供統(tǒng)一的數(shù)據(jù)訪問接口方法。</p><p>　　Microsoft在Visual Basic6.0以后的版本都集成了ADO。它與以前的DAO、RDO相比有了很大的提高。DAO(Data Access Objects)即數(shù)據(jù)訪問對象，

62、是一種面向?qū)ο蟮慕缑娼涌?。通過DAO/Jet功能可以訪問ISAM數(shù)據(jù)庫，使用DAO/ODBC Direct功能可以實現(xiàn)遠程RDO功能。RDO(Remote Data Objects)即遠程數(shù)據(jù)對象，為使用代碼來創(chuàng)建和操作一個遠程ODBC數(shù)據(jù)庫系統(tǒng)的各個部件提供了一個框架。RDO是ODBC API的一個淺層界面接口，是專為訪問遠程的ODBC關(guān)系數(shù)據(jù)源而設(shè)計的。</p><p>　　ADO集中了DAO和RDO的優(yōu)點，

63、可以通過簡單的編程實現(xiàn)和各種數(shù)據(jù)結(jié)構(gòu)進行連接。</p><p>　　3.4.1、ADO的編程模型 </p><p>　　可以通過以下幾步來完成對數(shù)據(jù)庫的操作：

64、 ①創(chuàng)建一個到數(shù)據(jù)源的連接(connection),連接到數(shù)據(jù)庫；或者開始一個事物(Transction)。 </p><p>　?、趧?chuàng)建一個代表SQL命令行（包括變量、參數(shù)、可選項等）的對象。</p><p>　?、蹐?zhí)行命令行。 </p><p>　?、苋绻祷匾员砀竦男问浇M織的數(shù)據(jù)，則將他們保存到緩存中，產(chǎn)生相應的數(shù)據(jù)集對象(Record

65、set)。</p><p>　?、萃ㄟ^對數(shù)據(jù)集對象進行各種操作,包括修改、增加、刪除等。 </p><p>　?、薷聰?shù)據(jù)源，如果使用事務(wù)，確認是否接受事務(wù)期間發(fā)生的數(shù)據(jù)變化。 </p><p><b>　　⑦結(jié)束連接或事務(wù)</b></p><p>　　3.4.2、ADO的對象模型

66、 </p><p>　　使用ADO的目的是進入數(shù)據(jù)源，使得修改、更新數(shù)據(jù)成為可能。ADO提供一系列的類象來完成各種操作。 </p><p>　　連接對象——Connection 一個連接(Connection)對象代表一個到指定數(shù)據(jù)源的成功連接。

67、應用程序通過一個連接（包括實現(xiàn)數(shù)據(jù)交換的環(huán)境設(shè)置）訪問數(shù)據(jù)源，也可以直接訪問數(shù)據(jù)源（在兩層數(shù)據(jù)結(jié)構(gòu)的系統(tǒng)中比較常見），或者通過類似Microsoft Internet Information Server 的中間層間接訪問訪問數(shù)據(jù)源（這就是通常說的三層結(jié)構(gòu)）。連接成功，Connection以對象的形式存在。連接對象在ADO對象模型中的地位就是在Connection里包括（Error、Command、Recordset）。因此使用連接對象

68、的操作如下: </p><p>　　·在打開連接前需要設(shè)置ConnectionString、ConnectionTimeout和Mode屬性。 </p><p>　　·設(shè)置CursorLocation屬性，可以設(shè)置或者返回指針位置。</p>&

69、lt;p>　　·設(shè)置DefaultDatabase屬性可以連接指定的一個默認的數(shù)據(jù)庫。</p><p>　　·設(shè)置IsolationLevel屬性可以確定事務(wù)(Transation)在連接的隔離等級。</p><p>　　·設(shè)置Provider可以連接指定的一個OLE-DB寄主。</p><p>　　·設(shè)置Open與Cl

70、ose方法來建立和中斷一個連接。</p><p>　　·使用Execute方法在連接上建立執(zhí)行命令，設(shè)置CommandTimeout屬性來指定或者返回命令執(zhí)行時間。 </p><p>　　·使用BeginTrans、CommitTrans和RollbackTrans方法以及Attributes屬性來管理事物。</p><p>　　·通

71、過檢察Error對象可以知道數(shù)據(jù)源返回的錯誤。</p><p>　　·通過Version屬性可以知道ADO的版本。</p><p>　　·使用OpenSchema方法可以知道數(shù)據(jù)庫的計劃信息。</p><p>　　2. 命令行對象——Command</p><p>　　命令行對象是對數(shù)據(jù)庫將要執(zhí)行的一系列操作的定義。使用命

72、令行對象來查詢數(shù)據(jù)庫并返回數(shù)據(jù)集對象（recordset）形式的查詢結(jié)果。命令行對象指定變量、參數(shù)、以及可選項來完成對數(shù)據(jù)庫的操作，如添加記錄、刪除記錄、更新記錄等。命令行對象在ADO對象的模型中是Connection包含Command,Command又包含Parameters。使用命令行對象的各種屬性和方法可以如下操作：</p><p>　　·設(shè)置CommandText屬性可以定義命令行的內(nèi)容，如SQ

73、L語句。</p><p>　　·使用Execute方法執(zhí)行命令行并返回一個數(shù)據(jù)集對象（recordset）。</p><p>　　·設(shè)置CommandType屬性可以優(yōu)化命令的效率。</p><p>　　·設(shè)置CommandTimeout屬性可以指定服務(wù)器等待醫(yī)療命令執(zhí)行的時間。</p><p>　　·

74、設(shè)置ActiveConnection屬性可以將一個命令行對象與一個打開的連接關(guān)聯(lián)。</p><p>　　3. 數(shù)據(jù)集對象——Recordset</p><p>　　如果命令行指定數(shù)據(jù)以表的形式組織，執(zhí)行命令行后將返回相應的數(shù)據(jù)集。同過數(shù)據(jù)集可以對記錄以及組成記錄的列進行各種操作。數(shù)據(jù)集對象在ADO對象模型中的地位是Connection包含Recordset,而Recordset包含fiel

75、ds。</p><p>　　3.4.3、為項目添加ADO</p><p>　　ADO雖然集成在Visual Basic6.0中，但只是可選項。因此在創(chuàng)建項目后，需要為項目添加ADO。</p><p>　　選擇”project”菜單中的”References”命令，在References列表框中中選擇”Microsoft ActiveX Object 2.6 Libr

76、ary”選項，再確定。</p><p>　　3.5 與數(shù)據(jù)庫的連接性</p><p>　　VISUAL BASIC提供了與底層數(shù)據(jù)庫系統(tǒng)緊密的連接。 VISUAL BASIC支持不同的關(guān)系數(shù)據(jù)庫管理系統(tǒng)并充分發(fā)揮每一個數(shù)據(jù)庫的特長。開發(fā)人員和利用ODBC來確定數(shù)據(jù)源，則ADO就能通過數(shù)據(jù)源來對數(shù)據(jù)庫里的數(shù)據(jù)進行操作。</p><p>　　而具體的連接哪個數(shù)據(jù)庫，OD

77、BC沒有設(shè)置限定，從而使設(shè)計者能夠應用自己比較熟悉的數(shù)據(jù)庫。</p><p>　　以下進行圖例說明：（圖3-1）</p><p>　　值得一提的是VISUAL BASIC擁有數(shù)據(jù)窗口對象（FORM）。它是一個智能對象是MICROSOFT公司的技術(shù)。它能操縱關(guān)系數(shù)據(jù)庫的數(shù)據(jù)并可以編寫SQL語言。利用該對象可以修改、更新、插入、刪除、滾頁、打印數(shù)據(jù)窗口直接管理數(shù)據(jù)庫的交互與控制。在本系統(tǒng)開發(fā)過

78、程中大多數(shù)報表均使用此對象生成，使用其操縱關(guān)系數(shù)據(jù)庫的數(shù)據(jù)十分方便、快捷。它是一個支持數(shù)據(jù)操縱的封裝性很好對象。</p><p>　　第四章 圖書館管理信息系統(tǒng)的具體實現(xiàn)</p><p>　　4.1 系統(tǒng)客戶端程序</p><p>　　以上的SQL語句在SQL Sever 2000查詢分析器中執(zhí)行后，將自動產(chǎn)生需要的所有表格。有關(guān)數(shù)據(jù)庫結(jié)構(gòu)的所有后臺工作已經(jīng)完成。

79、現(xiàn)在將通過圖書館管理信息系統(tǒng)中各個功能模塊的實現(xiàn)，來說明如何使用Visual Basic 來編寫 系統(tǒng)的客戶端程序。</p><p>　　創(chuàng)建工程項目——Library_MIS</p><p>　　打開Visual Basic 后，單擊File|New Project 菜單，在工程模塊中選擇Standard EXE,Visual Basic 將自動產(chǎn)生一個Form窗體，屬性都是缺省設(shè)置。將

80、這個窗體刪除，單擊File|Save Project菜單，將這個工程項目命名為Library_MIS.</p><p>　　創(chuàng)建圖書館管理信息系統(tǒng)的主窗體</p><p>　　這個項目可以使用多文檔界面，單擊工具欄中的ADD MDI Form按鈕，生成一個窗體。在這個窗體上添加所需的控件，窗體和控件的屬性設(shè)置如下：</p><p>　　主窗體及其控件屬性設(shè)置<

81、/p><p>　　創(chuàng)建好的主窗體如下：</p><p>　　圖書館管理信息系統(tǒng)窗體（圖3-2）</p><p><b>　　創(chuàng)建主窗體的菜單</b></p><p>　　在上圖所示的主窗體中，單擊鼠標右鍵，選擇彈出式菜單中的Menu Editor，創(chuàng)建如下所示的菜單結(jié)構(gòu)。</p><p><b&

82、gt;　　系統(tǒng)</b></p><p><b>　　…修改密碼</b></p><p><b>　　…添加用戶</b></p><p><b>　　…退出</b></p><p><b>　　讀者管理</b></p><p&

83、gt;<b>　　…讀者種類管理</b></p><p><b>　　……添加讀者種類</b></p><p><b>　　……修改讀者種類</b></p><p><b>　　……刪除讀者種類</b></p><p><b>　　…讀者信息管理

84、</b></p><p><b>　　……添加讀者信息</b></p><p><b>　　……修改讀者信息</b></p><p><b>　　……刪除讀者信息</b></p><p><b>　　……查詢讀者信息</b></p>

85、<p><b>　　書籍管理</b></p><p><b>　　…書籍類別管理</b></p><p><b>　　……添加書籍類別</b></p><p><b>　　……修改書籍類別</b></p><p><b>　　……刪

86、除書籍類別</b></p><p><b>　　…書籍信息管理</b></p><p><b>　　……添加書籍信息</b></p><p><b>　　……修改書籍信息</b></p><p><b>　　……刪除書籍信息</b></p

87、><p><b>　　……查詢書籍信息</b></p><p><b>　　借閱信息管理</b></p><p><b>　　…借書信息管理</b></p><p><b>　　……添加借書信息 </b></p><p><b&g

88、t;　　……修改借書信息</b></p><p><b>　　……刪除借書信息</b></p><p><b>　　……查詢借書信息</b></p><p><b>　　…還書信息管理</b></p><p><b>　　……添加還書信息</b>

89、;</p><p><b>　　……修改還書信息</b></p><p><b>　　……查詢還書信息</b></p><p><b>　　幫助</b></p><p><b>　　…About</b></p><p><b&

90、gt;　　創(chuàng)建公用模塊</b></p><p>　　在Visual Basic 中可以用公用模塊來存放整個工程項目公用的函數(shù)、過程和全局變量等。這樣可以極大的提高代碼的效率。在項目資源管理器中為項目添加一個 Module,保存為Module.bas。由于系統(tǒng)中各個功能模塊都將頻繁使用數(shù)據(jù)庫中的各種數(shù)據(jù)，因此需要一個公共的數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種SQL語句。在主窗體中，我們將用到兩個全局變量gintM

91、ode和flagEdit用來記錄各個狀態(tài)，因而需要在模塊中聲明，代碼如下：</p><p>　　Public gintMode As Integer ’定義整形變量，記載讀寫狀態(tài)</p><p>　　Public flagEdit As Boolean ’定義Boolean變量，記載信息列表窗體是否打開</p><p>　　gintMode變量用來記錄是添加狀態(tài)還是

92、修改狀態(tài)，賦值1為添加，賦值2為修改。flagEdit變量用來標示是否進入修改的窗體。</p><p>　　由于啟動圖書管理系統(tǒng)后，需要對用戶進行判斷。如是授權(quán)用戶，將進入系統(tǒng)，否則將停止程序的執(zhí)行。這個判斷需要在系統(tǒng)運行的最初進行，因此將代碼放在公用模塊中。</p><p>　　4.2 系統(tǒng)用戶管理模塊的創(chuàng)建</p><p>　　用戶管理模塊主要實現(xiàn)：用戶登陸、添

93、加用戶、刪除用戶、修改密碼四個功能。其窗體如下</p><p><b>　　（圖3-3）</b></p><p>　　用戶點擊確認后，其數(shù)據(jù)會添加到數(shù)據(jù)庫中，添加用戶數(shù)據(jù)庫中會多一條新記錄，修改密碼即將數(shù)據(jù)庫中的數(shù)據(jù)進行更新（update），然后將新記錄保存到數(shù)據(jù)庫里，刪除用戶就是將數(shù)據(jù)庫中的數(shù)據(jù)清除。用戶的登錄界面與此界面基本相同，同樣是調(diào)用數(shù)據(jù)庫library表中

94、的信息，再對用戶的登錄信息進行判斷，決定用戶的權(quán)限。這里需要強調(diào)的是刪除用戶時，數(shù)據(jù)庫中所記錄的是您本次登錄所使用的用戶名和密碼，所以用戶名已定，只需對您所輸入的密碼進行判斷，密碼正確，則刪除您本次登錄的用戶名。同時也說明了您無權(quán)刪除別人的用戶名和密碼。</p><p>　　4.3 讀者種類管理模塊的創(chuàng)建</p><p>　　圖書館需要管理不同種類的讀者，并且不同讀者享受的服務(wù)不同。讀者種

95、類管理模塊主要實現(xiàn)如下功能：添加讀者種類、修改讀者種類、刪除讀者種類。</p><p>　　添加讀者種類窗體的創(chuàng)建</p><p>　　選擇“讀者管理|讀者種類管理|添加讀者種類”菜單，出現(xiàn)如下窗體：</p><p><b>　　（圖3-4）</b></p><p>　　在窗體上放置多個文本框，用來輸入讀者種類信息；兩個

96、按鈕用來確定是否添加讀者種類信息；多個標簽用來提示文本框中需要輸入的內(nèi)容。在載入窗體時，程序首先判斷所處狀態(tài)，載入窗體時，將首先通過變量gintRTmode判斷是添加 還是修改。如果是添加狀態(tài)，文本框?qū)⑶宄齼?nèi)容，窗體有提示信息；如果是修改狀態(tài)，將選擇顯示當前的記錄。用戶輸入內(nèi)容后，單擊cmdSave按鈕將觸發(fā)Click事件。</p><p>　　程序首先對是否輸入內(nèi)容進行判斷，然后進行格式判斷。程序?qū)⑴袛嗍欠裼?/p>

97、重復編號的記錄，然后添加數(shù)據(jù)到數(shù)據(jù)庫。最后根據(jù)狀態(tài)來顯示相應的信息：如果是添加狀態(tài)，將提示添加成功，然后重新顯示并清空所有文本框，以便繼續(xù)添加記錄：如果處于修改狀態(tài)，將提示修改成功，然后更新所有記錄的列表。</p><p>　　當文本框獲得焦點時將觸發(fā)下面的事件：自動選中輸入的內(nèi)容，便于修改。單擊cmdExit按鈕取消添加信息，輸入完內(nèi)容，按下回車鍵將自動進入下一個文本框，將觸發(fā)文本框的Keydown事件（Ent

98、erTOTab KeyCode）,按鍵號碼傳遞給EnterToTab函數(shù)，如果是回車自動轉(zhuǎn)換為Tab鍵。</p><p>　　關(guān)于判斷的代碼如下：</p><p>　　'添加判斷是否有相同的ID記錄</p><p>　　If gintRTmode = 1 Then</p><p>　　txtSQL = "select * f

99、rom readertype where typeno='" & Trim(txtItem(0)) & "'"</p><p>　　Set mrc = New ADODB.Recordset</p><p>　　Set mrc = ExecuteSQL(txtSQL, MsgText)</p><p>　

100、　If mrc.EOF = False Then</p><p>　　MsgBox "已經(jīng)存在此種類編號的記錄！", vbOKOnly + vbExclamation, "警告"</p><p>　　txtItem(0).SetFocus</p><p><b>　　Exit Sub</b></p&

101、gt;<p><b>　　End If</b></p><p><b>　　mrc.Close</b></p><p><b>　　End If</b></p><p>　　'判斷是否有相同內(nèi)容的記錄</p><p>　　txtSQL = "se

102、lect * from readertype where typeno<>'" & Trim(txtItem(0)) & "' and typename='" & Trim(txtItem(1)) & "'"</p><p>　　Set mrc = ExecuteSQL(txtSQL, M

103、sgText)</p><p>　　If mrc.EOF = False Then</p><p>　　MsgBox "已經(jīng)存在相同讀者種類的記錄！", vbOKOnly + vbExclamation, "警告"</p><p>　　txtItem(1).SetFocus</p><p><b&

104、gt;　　Exit Sub</b></p><p><b>　　End If</b></p><p><b>　　'先刪除已有記錄</b></p><p>　　If gintRTmode = 2 Then</p><p>　　txtSQL = "delete from

105、readertype where typeno ='" & Trim(txtItem(0)) & "'"</p><p>　　Set mrc = ExecuteSQL(txtSQL, MsgText)</p><p><b>　　End If</b></p><p><b>

106、;　　'再加入新記錄</b></p><p>　　txtSQL = "select * from readertype"</p><p>　　Set mrc = ExecuteSQL(txtSQL, MsgText)</p><p>　　mrc.AddNew</p><p>　　二 修改讀者種類窗

107、體的創(chuàng)建</p><p>　　選擇“讀者管理|讀者種類管理|修改讀者種類”菜單，出現(xiàn)如下窗體，窗體中放置一個表格控件：</p><p><b>　?。▓D3-5）</b></p><p>　　讀者種類記錄列表窗體</p><p>　　載入窗體時，觸發(fā)窗體的Load事件，顯示當前數(shù)據(jù)庫中所有的記錄。代碼中調(diào)用showTitl

108、e函數(shù)，顯示表頭，調(diào)用showData函數(shù)，顯示記錄列表。完成代碼后，選擇記錄，然后單擊鼠標右鍵，將觸發(fā)MouseUp事件，即這個事件發(fā)生在松開鼠標的時候。在彈出式菜單中選擇“修改讀者種類”將觸發(fā)菜單menuModifyreadertype的click事件，然后在圖3-4所示的窗體中載入當前記錄的內(nèi)容。當窗口變化時，需要調(diào)整標簽和表格的位置，使標簽始終處于窗體的最上方，而表格始終處于標簽的下方。窗體的大小變化時將觸發(fā)Resize事件，所

109、有代碼添加完成后，所修改的數(shù)據(jù)會更新在數(shù)據(jù)庫中。</p><p><b>　　三 刪除讀者種類</b></p><p>　　選擇“讀者管理|讀者種類管理|刪除讀者種類”菜單，將出現(xiàn)記錄列表。選擇相應記錄，單擊鼠標右鍵，選擇彈出式菜單，將刪除當前記錄。這里要判斷讀者類別信息列表內(nèi)容是否為空，即：frmReadertyoe.msgList.Rows>1,才可以進行

110、刪除。記載當前記錄的位置語句為：intCount=frmReadertype.msgList.Row txtSQL=”delete from readertype where typeno=’” &Trim(frmReadertype.msgList.TextMatrix(intCount,1))&”’” 查詢語句的執(zhí)行為：Set mrc=ExecuteSQL(txtSQL,MsgText)</p>

111、<p>　　4.4 讀者信息管理模塊的創(chuàng)建</p><p>　　讀者信息管理模塊主要實現(xiàn)如下功能：添加讀者信息、修改讀者信息、刪除讀者信息、查詢讀者信息。</p><p>　　添加讀者信息窗體的創(chuàng)建</p><p>　　選擇“讀者管理|讀者信息管理|添加讀者信息”菜單，出現(xiàn)如下窗體：</p><p>　　添加讀者信息窗體（圖3-

112、6）</p><p>　　窗體中各個控件屬性這里不做一一介紹。將各種文本框放在窗體的框架中，組成“讀者種類”和“讀者信息”兩項。載入窗體時，讀者種類中將自動添加讀者種類信息，代碼加在窗體的Load事件中。輸入完內(nèi)容后，單擊“保存”按鈕，觸發(fā)Click事件，首先檢查文本內(nèi)容是否符合格式要求，然后判斷是否有重復記錄，并更新讀者表中的相關(guān)信息，最后添加內(nèi)容到數(shù)據(jù)庫，這里要注意是否存在重復記錄，若存在重復記錄，則先刪除已

113、有記錄，再加入新記錄。</p><p><b>　　二、修改讀者信息</b></p><p>　　選擇“讀者管理|讀者信息管理|修改讀者信息”菜單，出現(xiàn)如下窗體：</p><p>　　修改讀者信息窗體（圖3-7）</p><p>　　窗體中放置了一個表格控件，所有讀者記錄都顯示在里面。選擇需要修改的記錄，在選擇菜單下拉框

114、中的“修改讀者信息”命令，出現(xiàn)“添加讀者信息窗體”，然后進行修改。選擇“修改讀者信息”命令，將觸發(fā)menuModifyreader的Click事件。程序判斷為修改狀態(tài)后，首先刪除原有記錄，然后把新內(nèi)容加入到數(shù)據(jù)庫中。</p><p><b>　　三、刪除讀者信息</b></p><p>　　在讀者記錄列表中選擇記錄，然后選擇菜單中的“刪除讀者信息”命令，將刪除當前記錄

115、。刪除信息時同樣要判斷讀者信息列表內(nèi)容是否為空。</p><p><b>　　四、查詢讀者信息</b></p><p>　　選擇“讀者管理|讀者信息管理|查詢讀者信息”菜單，出現(xiàn)下列窗體。在這里可以按照各種方式以及它們的組合進行查詢。載入窗體時，將自動加入所有讀者種類的信息，即將內(nèi)容添加到列表框中。設(shè)置完查詢內(nèi)容和方式后，單擊cmdOK 按鈕將進行查詢，代碼如下：&l

116、t;/p><p>　　Private Sub cmdOK_Click()</p><p>　　Dim sQSql As String ‘判斷查詢方式是否為讀者編號</p><p>　　If chkItem(0).Value=vbChecked Then’組合查詢語句</p><p>　　SQSql=”readerno=’”& Trim(t

117、xtIten(0) &””)&””</p><p>　　End if ‘判斷查詢方式是否為讀者姓名</p><p>　　If chkItem(1).Value=vbChecked Then</p><p>　　If Trim(sQSql & ””)=”” Then </p><p>　　SQSql=”readernam