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

1、<p>　　畢業(yè)設計（論文）中文摘要</p><p><b>　　圖書管理系統(tǒng)</b></p><p><b>　　作 者： </b></p><p><b>　　指導老師：</b></p><p>　　摘要:圖書管理系統(tǒng)是典型的計算機信息管理系統(tǒng)(MIS),其

2、開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。而對于后者則要求應用程序功能完備,易使用等特點。本管理系統(tǒng)包括了系統(tǒng)登錄、讀者管理、書籍管理、借閱信息管理四個總的功能塊。在各個功能塊中又具體包括了讀者種類信息管理、讀者信息管理、書籍類別管理、書籍信息管理、借書信息管理、還書信息管理功能。使用戶方便的對圖書館的信息進行管理，為讀者借閱還書的節(jié)省了大量的時間。

3、 經(jīng)過分析,我使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一功能方便而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應用原型,然后,對初始原型系統(tǒng)進行需求迭代,不斷修正和改進,直到形成用戶滿意的可行系統(tǒng)。</p><p>　　關鍵字：圖書管理系統(tǒng)、數(shù)據(jù)庫、VISUAL BASIC、窗體、SOL2000。</p><p

4、><b>　　Abstract</b></p><p>　　Abstract:Books management system is the typical computer information management system (MIS), its development mainly includes the backstage database the establishme

5、nt and the maintenance as well as front end the application procedure development two aspects. Establishes the data uniformity and the integrity regarding former request is strong, the data security good storehouse. But

6、requests the application procedure function regarding latter completely, is easy to use and so on the characteristic</p><p>　　After the analysis, I use MICROSOFT Corporation VISUAL the BASIC development kit,

7、 uses each kind of object-oriented development kit which it provides, the data window this function convenience but succinctly operates the database in particular the intellectualized object, first establishes the system

8、 application prototype in the short time, then, carries on the demand iteration to the initial prototype system, unceasingly revises and the improvement, until forms user satisfaction the feasible sy</p><p>

9、　　Key words : books management system management system, database, VISUAL BASIC, Window, SOL2000</p><p>　　目錄 </p><p><b>　　摘要1</b></p><p>　　Abstract………

10、………………………………………...…………………. 1</p><p><b>　　前言1</b></p><p>　　第一章 圖書管理信息系統(tǒng)的問題1</p><p>　　1.1 圖書管理信息系統(tǒng)的簡介1</p><p>　　1.2 圖書管理信息系統(tǒng)的用戶需求1</p><p>　　

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

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

13、;　　3.4 Active數(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ù)庫的連接性14</p><p>　　第四章 圖書管理信息系統(tǒng)的

14、具體實現(xiàn)15</p><p>　　4.1 系統(tǒng)客戶端程序16</p><p>　　4.2 系統(tǒng)用戶管理模塊的創(chuàng)建17</p><p>　　4.3 讀者種類管理模塊的創(chuàng)建18</p><p>　　4.4 讀者信息管理模塊的創(chuàng)建21</p><p>　　4.5 書籍類別管理模塊的創(chuàng)建24</p>

15、<p>　　4.6 書籍信息管理模塊的創(chuàng)建26</p><p>　　4.7 借書信息管理創(chuàng)建28</p><p>　　4.8 還書信息管理創(chuàng)建28</p><p>　　4.8 圖書管理系統(tǒng)的實現(xiàn)29</p><p>　　第五章 系統(tǒng)測試與系統(tǒng)性能分析30</p><p><b>　　結束

16、語32</b></p><p><b>　　參考文獻32</b></p><p><b>　　致 謝34</b></p><p><b>　　前 言</b></p><p>　　隨著人類社會的發(fā)展，人類知識不斷地增長、擴大。書籍就漸漸地成為人們獲取、增長

17、知識的主要途徑，而圖書館就自然而然地在人們的生活中占據(jù)了一定的位置。在圖書館方面，就必然面臨著一個問題：怎樣才能科學、有效的把圖書館里圖書管理好？又如何知道被借圖書為何人所借？所借圖書什么時候歸還？又如何從借書者那里得到圖書的信息。這些問題直接關系到讀者求知的方便程度，也關系到圖書館的發(fā)展。本系統(tǒng)以以上問題為依據(jù)，對所提問題給予一一的解決。在現(xiàn)代社會中，計算機已經(jīng)在各行各業(yè)發(fā)揮著重要的作用，用計算機來管理已經(jīng)成為必然的結果。圖書館也不例

18、外，在圖書館的管理過程中，同樣也必需使用計算機來輔助管理。有了計算機的輔助管理，必然要有一套較完善的計算機處理系統(tǒng)（圖書管理系統(tǒng)）來管理圖書，這樣才能科學、有效的對圖書進行管理</p><p>　　利用圖書管理系統(tǒng)進行管理，能更有效的對圖書進行系統(tǒng)管理，方便讀者對各類圖書的查詢，同時也大大提高了辦理借書、還書手續(xù)方面的工作效率和提高圖書館的服務效率，為讀者提供方便。針對上述情況，本人開發(fā)了一套圖書管理專業(yè)軟件--

19、圖書管理系統(tǒng)，該系統(tǒng)并不針對某一個圖書館而開發(fā)，所以在小型方面相對較廣些。相對于同類軟件來說，該系統(tǒng)功能較齊全，集合了圖書館從進書、查詢、借書、還書、罰金等多種功能，同時讀者可以對圖書的情況有個具體的了解，圖書管理員也可以對某一圖書的具體情況有個充分的了解，對其圖書管理有很好的掌握。在操作方面也比較方便，界面也較友好。在數(shù)據(jù)庫方面，該系統(tǒng)采用SQL Server2000數(shù)據(jù)庫系統(tǒng)，在安全性方面也有了較大的提高。與傳統(tǒng)的手工作業(yè)相比，它大

20、大提高了工作效率，而且系統(tǒng)采用人機對話方式，菜單提示，界面友好、操作簡單，實現(xiàn)開架借。</p><p>　　第一章 圖書管理信息系統(tǒng)的問題</p><p>　　1.1 圖書管理系統(tǒng)的簡介</p><p>　　圖書管理系統(tǒng)是針對圖書館的大量業(yè)務處理工作而開發(fā)的管理軟件。根據(jù)用戶的要求，實現(xiàn)借閱管理、讀者管理、和圖書管理，等幾個方面的功能。</p>&l

21、t;p>　　本軟件是為了規(guī)范單位的圖書館日常運作，加強圖書借閱的信息管理而開發(fā)設計的。時間比較倉促，肯定存在許多問題，同時將邊運行邊修改與完善，使其更好的服務于圖書館的日常管理，滿足圖書館管理方面的各種需要。      </p><p>　　本軟件界面友好，操作簡單，小巧實用，運行穩(wěn)定，自動化程度較高，具備多種功能，能滿足一般小型圖書室的日常管理需要。可進行

22、書籍、讀者、借書和還書等信息的錄入、修改與刪除，同時提供靈活豐富的查詢，更好是對圖書的具體行蹤能提供跟準確的位置等功能，方便統(tǒng)計匯總。對借書者所借書是否被借，被何人所借，借書者的姓名、地址、聯(lián)系方式，何時歸還等等經(jīng)查詢即可知曉。本系統(tǒng)以此為目的，開發(fā)了相應的數(shù)據(jù)庫與工作界面，以完成以上功能。</p><p>　　1.2 圖書理理系統(tǒng)的用戶需求</p><p>　　1.2.1 總體功能需求&

23、lt;/p><p>　　圖書管理系統(tǒng)是針對圖書館的大量業(yè)務處理工作用計算機進行全面現(xiàn)代化管理.主要包括讀者管理、書籍管理、和借閱信息管理， 等幾個方面的功能,以實現(xiàn)用戶方便的借書.還書.查詢所需書籍等需求。</p><p>　　具體系統(tǒng)功能需求描述</p><p><b>　　(1)讀者管理</b></p><p>　　讀者

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

25、t;　　(3) 借閱信息管理</p><p>　　借閱信息管理包括借書信息管理和還書信息管理，借書信息管理要完</p><p>　　成對所借書籍的添加.修改.刪除.查詢功能；還書信息管理要完成對所還書籍的添加.修改.刪除功能。</p><p>　　(4) 數(shù)據(jù)備份管理</p><p>　　管理員能對數(shù)據(jù)進行數(shù)據(jù)備份與數(shù)據(jù)恢復功能。</p

26、><p>　　1.3 圖書管理信息系統(tǒng)功能分析</p><p>　　系統(tǒng)開發(fā)的總任務是實現(xiàn) 圖書館管理信息關系的系統(tǒng)化、規(guī)范化和自動化。系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務的基礎上完成的，本系統(tǒng)的需要完成功能主要有：</p><p>　　有關讀者種類標準的制定、種類信息的輸入，包括種類編號、種類名稱、借書數(shù)量、借書期限、有效期限等。</p><p>

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

28、<p>　　書籍信息的輸入，包括書籍編號、書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍價格、登記日期、是否借出等。</p><p>　　書籍信息的查詢，包括書籍編號、書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍價格、登記日期等。</p><p>　　書籍信息的修改，包括借書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、是否借出等。</p

29、><p>　　借書信息的查詢、修改，包括借書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期等。</p><p>　　還書信息的輸入，包括還書信息編號、讀者編號、讀者姓名、書籍編號、書籍名稱、借書日期、還書日期等。</p><p>　　書籍罰金信息的輸入，包括丟失書籍罰金。丟失書籍罰金包括書籍編號、書籍名稱、書籍價格和賠償圖書的金額。</p>&

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

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

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

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

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

35、號、讀者姓名、書籍編號、書籍名稱、借書日期、還書日期等。</p><p>　　2.2 數(shù)據(jù)庫邏輯結構設計</p><p>　　采用SQL Sever 2000來完成圖書管理信息系統(tǒng)的數(shù)據(jù)庫，需將上面的數(shù)據(jù)庫的概念結構轉(zhuǎn)化為SQL的數(shù)據(jù)庫所支持的實際數(shù)據(jù)模型，這也就是數(shù)據(jù)庫的邏輯結構。</p><p>　　圖書管理信息管理系統(tǒng)數(shù)據(jù)庫中的表格的設計結果有以下的表格所表

36、示，這些表格表示在數(shù)據(jù)庫中的一個表：</p><p>　　readertypetable 讀者種類信息表</p><p>　　表中內(nèi)容有：讀者種類編號、讀者種類名稱、借書數(shù)量、借書期限、有效期限。</p><p>　　readertable 讀者信息表格</p><p>　　表中內(nèi)容有：readertype中的所有內(nèi)容、讀者編號、讀者姓

37、名、讀者性別、電話號碼、辦證日期、工作單位、家庭住址。</p><p>　　booktypetable 書籍類別信息表</p><p>　　表中內(nèi)容有：書籍類別編號、書籍類別名稱、關鍵詞、。</p><p>　　booktable 書籍信息表</p><p>　　表中內(nèi)容有：書籍名稱、書籍類別、作者姓名、出版社名稱、出版日期、書籍頁

38、數(shù)、登記日期。</p><p>　　lendbooktable 借閱信息表</p><p>　　表中內(nèi)容有：包括booktable表中的書籍名稱、書籍類別、作者姓名、出版社、書籍備注信息，以及讀者信息中的讀者編號、讀者姓名、讀者種類、借書日期。</p><p>　　2.3 數(shù)據(jù)庫邏輯結構的實現(xiàn)</p><p>　　2.3.1 數(shù)據(jù)庫系統(tǒng)設計

39、數(shù)據(jù)庫設計主要是進行數(shù)據(jù)庫的邏輯設計，即將數(shù)據(jù)按一定的分類、分組系統(tǒng)和邏輯層次組織起來，是面向用戶的。數(shù)據(jù)庫設計時需要綜合企業(yè)各個部門的存檔數(shù)據(jù)和數(shù)據(jù)需求，分析各個數(shù)據(jù)之間的關系，按照DBMS提供的功能和描述工具，設計出規(guī)模適當、正確反映數(shù)據(jù)關系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型。數(shù)據(jù)庫設計的步驟是：（1） 數(shù)據(jù)庫結構定義：目前的數(shù)據(jù)庫管理系統(tǒng)（DBMS）有的是支持聯(lián)機事務處理CLTP（負責對事務數(shù)據(jù)進

40、行采集、處理、存儲）的操作型DBMS，有的可支持數(shù)據(jù)倉庫、有聯(lián)機分析處理CLAP（指為支持決策的制定對數(shù)據(jù)的一種加工操作）功能的大型DBMS，有的數(shù)據(jù)庫是關系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫。針對選擇的DBMS，進行數(shù)據(jù)庫結構定義。（2） 數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫中數(shù)據(jù)表的結構，數(shù)據(jù)表的邏輯結構包括：屬性名稱、類型、表示形式、缺省值、校驗規(guī)則、是否關鍵字、可否為空等。關系型數(shù)據(jù)庫要盡量按關系規(guī)范化要求進行數(shù)據(jù)庫設計，

41、但為使效率高，規(guī)范化程度應根據(jù)應用環(huán)境和條件來決定。數(shù)據(jù)表設計不僅要滿足數(shù)據(jù)存儲的要求，還要增加一些如反映有關信</p><p>　　2.3.2  數(shù)據(jù)庫設計范式分析</p><p>　　第一范式(first normal form，簡稱1st NF)就是指在同一表中沒有重復項出現(xiàn)，如果有則應將重復項去掉。這個去掉重復項的過程就稱之為規(guī)范化處理。在本文所討論的開發(fā)方法里，1st

42、NF實際上是沒有什么意義的。因為我們按規(guī)范化建立的指標體系和表的過程都自動保證了所有表都滿足1st NF。 第二范式(second normal form，簡稱 2nd NF)是指每個表必須有一個(而且僅一個)數(shù)據(jù)元素為主關鍵字(primary key)，其它數(shù)據(jù)元素與主關鍵字一一對應。例如，在圖l9.7中如果我們將讀者姓名定義為主關鍵字(其它數(shù)據(jù)元素中的記錄數(shù)據(jù)都有可能重名，故不能作為主關鍵字)，故只要知道了讀者一個記錄就知

43、道一個圖書的記錄或者是借書的記錄，就可以唯一地在同一行中找到該姓名的任何一項具體信息。通常我們稱這種關系為函數(shù)依賴(functional depEndence)關系。即表中其它數(shù)據(jù)元素都依賴于主關鍵字，或稱該數(shù)據(jù)元素唯一地被主關鍵字所標識。本系統(tǒng)的查詢功能等性能都運用了第二范式。 第三范式(third normal form，簡稱 3rd NF)就是指表中</p><p>　　2.3.3 數(shù)據(jù)表的設計&

44、lt;/p><p>　　經(jīng)過前面的需求分析和概念結構設計以后，得到數(shù)據(jù)庫的邏輯結構。然后用SQL server 2000 數(shù)據(jù)庫系統(tǒng)中的SQL企業(yè)管理器實現(xiàn)該邏輯結構。下面是就用戶表格、讀者種類信息表格、讀者信息表格、書籍類別信息表格的SQL語句舉例如下：</p><p>　　readertypetable 讀者種類信息表（圖2-3）</p><p>　　readert

45、able 讀者信息表格（圖2-4）</p><p>　　booktypetable 書籍類別信息表（圖2-5）</p><p>　　bookstable 書籍信息表（圖2-6）</p><p>　　lendbooktable借閱信息表（圖2-7）</p><p>　　在圖2-7中如果我們將讀者姓名定義為主關鍵字(其它數(shù)據(jù)元素中的記錄

46、數(shù)據(jù)都有可能重名，故不能作為主關鍵字)，故只要知道了讀者一個記錄就知道一個圖書的記錄或者是借書的記錄，就可以唯一地在同一行中找到該姓名的任何一項具體信息，依賴讀者姓名即可聯(lián)系表與表的連接。本系統(tǒng)性能都運用了第二范式。</p><p>　　得到上面的各項數(shù)據(jù)項和數(shù)據(jù)結構以后，就可以設計出能夠滿足用戶需求的各種實體，以及他們之間的關系，為以后的邏輯結構設計打下基礎。</p><p>　　根據(jù)上

47、面的設計規(guī)劃出的實體有：讀者類別信息實體、讀者信息實體、書籍類別信息實體、書籍信息實體、借閱信息實體。由于上面已經(jīng)介紹了各個實體的包含內(nèi)容，這里就不在對每個實體的E-R圖做介紹?，F(xiàn)介紹各個實體之間的相互關系E-R圖如下：</p><p><b>　　圖2-2</b></p><p>　　第三章 圖書管理信息系統(tǒng)的開發(fā)環(huán)境</p><p>　　

48、3.1 圖書理信息系統(tǒng)的開發(fā)語言簡介</p><p>　　3．1．1 開發(fā)環(huán)境的選擇</p><p>　　Microsoft公司推出Windows以后，立即以其新穎的圖形用戶界面、卓越的多任務操作系統(tǒng)性能、高層次的軟件開發(fā)平臺而風靡全球。尤其是Office使用軟件的方便使用使許多應用人員想到手動的設計Windows用戶界面。然而由于對于程序員來說，工作的難度很大。為了適應Windows下

49、運行程序，就必須建立相應的窗口、菜單、對話框等各種控件，面對這種情況，1990年Microsoft公司推出了Windows應用程序開發(fā)工具——VB,從而達到了可視化的結果。在visual basic中，既繼承了basic語言簡單易用的特點，又采用了面向?qū)ο?、事件?qū)動的編程機制，用一種巧妙的方法把windows編程復雜性封裝起來，提供了可見即所得的可視界面設計方法。</p><p>　　Vb已經(jīng)經(jīng)歷了幾個版本，Vb

50、6.0在功能上進一步得到完善和擴充，尤其在數(shù)據(jù)庫管理與網(wǎng)絡應用方面更勝一籌。Vb6.0包括三個版本：學習版，專業(yè)版，企業(yè)版。我們所用的是企業(yè)版（中文）。</p><p>　　Vb6.0的功能特點：具有面向?qū)ο蟮目梢曉O計工具，事件驅(qū)動的編程機制，易學易用的應用程序集成開發(fā)環(huán)境，結構化的程序設計語言，支持多種數(shù)據(jù)庫的訪問，ole技術，active技術，完備的help聯(lián)機幫助功能。</p><p&g

51、t;　　Vb6.0的運行環(huán)境：Vb6.0是windows95/98或windows NT下的一個應用程序，本身對軟硬件沒有特殊的要求。跟windows95/98或windows NT要求是一致的。 </p><p>　　硬件要求：一般在586以上的處理器、16MB以上的內(nèi)存、100MB以上的硬盤等。 </p><p>　　軟件要求：wi

52、ndows95/98或windows NT3.51以上版本。</p><p>　　3.2 數(shù)據(jù)庫環(huán)境的選擇</p><p>　　SQL Server 2000是關系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。 SQL Server 2000能作為一個功能強大的數(shù)據(jù)庫服務器有效地工作，而且數(shù)據(jù)庫引擎也應用于客戶端本地存儲獨立數(shù)據(jù)庫的應用程序中。SQL Server 2000可以

53、動態(tài)的配置成能有效的使用客戶端桌面的可用資源，而不需要為每個客戶端專設一個數(shù)據(jù)庫管理員。SQL Server 2000能提高超大型系統(tǒng)所學要的數(shù)據(jù)庫服務。SQL Server 2000提供了很多的編程組件和工具。</p><p>　　3.3 VB語言和函數(shù)</p><p>　　Microsoft 公司的Visual Basic6.0是開發(fā)Windows應用程序,尤其是數(shù)據(jù)庫應用程序的快捷有

54、效的工具, 和以前各版本相比,功能更加強大,使用起來更加方便。另外，在Visual Basic6.0中可以用公用模塊來存放整個工程項目公用函數(shù)、過程和全局變量等。這樣可以極大的提高代碼的效率。在項目資源管理器中為項目添加一個Module，保存為Module.bas。往下就可以寫入需要的代碼了。</p><p>　　由于系統(tǒng)中各個功能模塊都將頻繁使用數(shù)據(jù)庫中的各種資源，因此需要一個公共的數(shù)據(jù)操作函數(shù)，用來執(zhí)行各種S

55、QL語句。這就需要添加函數(shù)ExecuteSQL了。ExecuteSQL函數(shù)的參數(shù)是SQL，它用來存放需要執(zhí)行的SQL語句。函數(shù)執(zhí)行時，首先判斷SQL語句中包含的內(nèi)容；當執(zhí)行查詢操作時，ExecuteSQL函數(shù)將返回一個與函數(shù)同名的記錄集對象（Recordset），所有滿足條件的記錄包含在對象中；當執(zhí)行如刪除、添加等操作時，不返回記錄集對象。</p><p>　　在ExecuteSQL函數(shù)中使用了Connect S

56、tring函數(shù)，這個函數(shù)用來連接數(shù)據(jù)庫，代碼如下：</p><p>　　Public Function ConnectString() As String</p><p>　　‘返回一個數(shù)據(jù)庫連接</p><p>　　ConnectString=”FileDSN=tushuguanlixitong.dsn;UID=sa;PWD=”</p><p&

57、gt;　　End Function</p><p>　　由于在后面的程序中，需要頻繁的檢查各種文本框的內(nèi)容是否為空，這也定義了Testtxt函數(shù)，代碼為：Public Function Testtxt(txt As String) As Boolean</p><p>　　‘判斷輸入內(nèi)容是否為空</p><p>　　If Trim(txt)=”” Then</

58、p><p>　　Testtxt=False</p><p><b>　　Else</b></p><p>　　Testtxt=True</p><p><b>　　End If</b></p><p>　　End Function.</p><p>　　如

59、果文本框內(nèi)容為空時，函數(shù)將返回True,否則將返回False。</p><p>　　3.4 Active數(shù)據(jù)對象——ADO</p><p>　　從簡單的文本文件到各種復雜的關系型數(shù)據(jù)庫，數(shù)據(jù)庫應用程序都需要面對各種各樣的數(shù)據(jù)源。Visual basic6.0提供ADO（Active Data Objects）作為應用程序和OLE-DB連接的橋梁。盡管用戶對數(shù)據(jù)的要求種類繁多，但典型的數(shù)據(jù)源

60、都是支持ODBC和SQL的。</p><p>　　ADO，即Active數(shù)據(jù)對象：實際是一種提供訪問各種數(shù)據(jù)類型的連接機制。ADO設計為一種極簡單的格式，通過ODBC的方法同數(shù)據(jù)庫接口相連。用戶可以使用任何一種ODBC數(shù)據(jù)源，即不僅適合于SQL sever、Oracle、Access等數(shù)據(jù)庫應用程序，也適合excel表格、文本文件、圖形文件和無格式數(shù)據(jù)文件。ADO是基于OLE-DB之上的技術，因此ADO通過其內(nèi)部

61、的屬性和方法提供統(tǒng)一的數(shù)據(jù)訪問接口方法。</p><p>　　Microsoft在Visual Basic6.0以后的版本都集成了ADO。它與以前的DAO、RDO相比有了很大的提高。DAO(Data Access Objects)即數(shù)據(jù)訪問對象，是一種面向?qū)ο蟮慕缑娼涌凇Ｍㄟ^DAO/Jet功能可以訪問ISAM數(shù)據(jù)庫，使用DAO/ODBC Direct功能可以實現(xiàn)遠程RDO功能。RDO(Remote Data Ob

62、jects)即遠程數(shù)據(jù)對象，為使用代碼來創(chuàng)建和操作一個遠程ODBC數(shù)據(jù)庫系統(tǒng)的各個部件提供了一個框架。RDO是ODBC API的一個淺層界面接口，是專為訪問遠程的ODBC關系數(shù)據(jù)源而設計的。</p><p>　　ADO集中了DAO和RDO的優(yōu)點，可以通過簡單的編程實現(xiàn)和各種數(shù)據(jù)結構進行連接。</p><p>　　3.4.1、ADO的編程模型

63、 </p><p>　　可以通過以下幾步來完成對數(shù)據(jù)庫的操作： ①創(chuàng)建一個到數(shù)據(jù)源的連接(connection),連接到數(shù)據(jù)庫；或者開始一個事物(Transction)。 </p><p>　?、趧?chuàng)建一個代

64、表SQL命令行（包括變量、參數(shù)、可選項等）的對象。</p><p>　　③執(zhí)行命令行。 </p><p>　?、苋绻祷匾员砀竦男问浇M織的數(shù)據(jù)，則將他們保存到緩存中，產(chǎn)生相應的數(shù)據(jù)集對象(Recordset)。</p><p>　?、萃ㄟ^對數(shù)據(jù)集對象進行各種操作,包括修改、增加、刪除等。 </p><p>　?、薷聰?shù)

65、據(jù)源，如果使用事務，確認是否接受事務期間發(fā)生的數(shù)據(jù)變化。 </p><p><b>　?、呓Y束連接或事務</b></p><p>　　3.4.2、ADO的對象模型 </p><p>　　使用ADO的目的是進入數(shù)據(jù)源，使得修改、更新數(shù)據(jù)成為可能。ADO提供一系列的類象來完成各種操作。 <

66、;/p><p>　　連接對象——Connection 一個連接(Connection)對象代表一個到指定數(shù)據(jù)源的成功連接。應用程序通過一個連接（包括實現(xiàn)數(shù)據(jù)交換的環(huán)境設置）訪問數(shù)據(jù)源，也可以直接訪問數(shù)據(jù)源（在兩層數(shù)據(jù)結構的系統(tǒng)中比較常見），或者通過類似Microsoft Internet I

67、nformation Server 的中間層間接訪問訪問數(shù)據(jù)源（這就是通常說的三層結構）。連接成功，Connection以對象的形式存在。連接對象在ADO對象模型中的地位就是在Connection里包括（Error、Command、Recordset）。因此使用連接對象的操作如下: </p><p>　　·

68、;在打開連接前需要設置ConnectionString、ConnectionTimeout和Mode屬性。 </p><p>　　·設置CursorLocation屬性，可以設置或者返回指針位置。</p><p>　　·設置DefaultDatabase屬性可以連接指定的一個默認的數(shù)據(jù)庫。</p><p>　　·設置Iso

69、lationLevel屬性可以確定事務(Transation)在連接的隔離等級。</p><p>　　·設置Provider可以連接指定的一個OLE-DB寄主。</p><p>　　·設置Open與Close方法來建立和中斷一個連接。</p><p>　　·使用Execute方法在連接上建立執(zhí)行命令，設置CommandTimeout屬性

70、來指定或者返回命令執(zhí)行時間。 </p><p>　　·使用BeginTrans、CommitTrans和RollbackTrans方法以及Attributes屬性來管理事物。</p><p>　　·通過檢察Error對象可以知道數(shù)據(jù)源返回的錯誤。</p><p>　　·通過Version屬性可以知道ADO的版本。</p>

71、<p>　　·使用OpenSchema方法可以知道數(shù)據(jù)庫的計劃信息。</p><p>　　2. 命令行對象——Command</p><p>　　命令行對象是對數(shù)據(jù)庫將要執(zhí)行的一系列操作的定義。使用命令行對象來查詢數(shù)據(jù)庫并返回數(shù)據(jù)集對象（recordset）形式的查詢結果。命令行對象指定變量、參數(shù)、以及可選項來完成對數(shù)據(jù)庫的操作，如添加記錄、刪除記錄、更新記錄等。命令

72、行對象在ADO對象的模型中是Connection包含Command,Command又包含Parameters。使用命令行對象的各種屬性和方法可以如下操作：</p><p>　　·設置CommandText屬性可以定義命令行的內(nèi)容，如SQL語句。</p><p>　　·使用Execute方法執(zhí)行命令行并返回一個數(shù)據(jù)集對象（recordset）。</p>&l

73、t;p>　　·設置CommandType屬性可以優(yōu)化命令的效率。</p><p>　　·設置CommandTimeout屬性可以指定服務器等待醫(yī)療命令執(zhí)行的時間。</p><p>　　·設置ActiveConnection屬性可以將一個命令行對象與一個打開的連接關聯(lián)。</p><p>　　3. 數(shù)據(jù)集對象——Recordset&l

74、t;/p><p>　　如果命令行指定數(shù)據(jù)以表的形式組織，執(zhí)行命令行后將返回相應的數(shù)據(jù)集。同過數(shù)據(jù)集可以對記錄以及組成記錄的列進行各種操作。數(shù)據(jù)集對象在ADO對象模型中的地位是Connection包含Recordset,而Recordset包含fields。</p><p>　　3.4.3、為項目添加ADO</p><p>　　ADO雖然集成在Visual Basic6.

75、0中，但只是可選項。因此在創(chuàng)建項目后，需要為項目添加ADO。</p><p>　　選擇”project”菜單中的”References”命令，在References列表框中中選擇”Microsoft ActiveX Object 2.6 Library”選項，再確定。</p><p>　　3.5 與數(shù)據(jù)庫的連接性</p><p>　　VISUAL BASIC提供了與

76、底層數(shù)據(jù)庫系統(tǒng)緊密的連接。 VISUAL BASIC支持不同的關系數(shù)據(jù)庫管理系統(tǒng)并充分發(fā)揮每一個數(shù)據(jù)庫的特長。開發(fā)人員和利用ODBC來確定數(shù)據(jù)源，則ADO就能通過數(shù)據(jù)源來對數(shù)據(jù)庫里的數(shù)據(jù)進行操作。</p><p>　　而具體的連接哪個數(shù)據(jù)庫，ODBC沒有設置限定，從而使設計者能夠應用自己比較熟悉的數(shù)據(jù)庫。</p><p>　　以下進行圖例說明：（圖3-1）</p><p

77、>　　值得一提的是VISUAL BASIC擁有數(shù)據(jù)窗口對象（FORM）。它是一個智能對象是MICROSOFT公司的技術。它能操縱關系數(shù)據(jù)庫的數(shù)據(jù)并可以編寫SQL語言。利用該對象可以修改、更新、插入、刪除、滾頁、打印數(shù)據(jù)窗口直接管理數(shù)據(jù)庫的交互與控制。在本系統(tǒng)開發(fā)過程中大多數(shù)報表均使用此對象生成，使用其操縱關系數(shù)據(jù)庫的數(shù)據(jù)十分方便、快捷。它是一個支持數(shù)據(jù)操縱的封裝性很好對象。</p><p>　　第四章 圖

78、書管理信息系統(tǒng)的具體實現(xiàn)</p><p>　　4.1 系統(tǒng)客戶端程序</p><p>　　以上的SQL語句在SQL Sever 2000查詢分析器中執(zhí)行后，將自動產(chǎn)生需要的所有表格。有關數(shù)據(jù)庫結構的所有后臺工作已經(jīng)完成?，F(xiàn)在將通過圖書管理信息系統(tǒng)中各個功能模塊的實現(xiàn)，來說明如何使用Visual Basic 來編寫 系統(tǒng)的客戶端程序。</p><p>　　創(chuàng)建工程項目

79、——工程1.vbp</p><p>　　打開Visual Basic 后，單擊File|New Project 菜單，在工程模塊中選擇Standard EXE,Visual Basic 將自動產(chǎn)生一個Form窗體，屬性都是缺省設置。將這個窗體刪除，單擊File|Save Project菜單，將這個工程項目命名為 工程1.vbp</p><p>　　創(chuàng)建圖書管理信息系統(tǒng)的主窗體</p&

80、gt;<p>　　這個項目可以使用一個Form窗體來實現(xiàn)，單擊工具欄中的 工程 按鈕，選擇 添加工程 按鈕即可生成一個窗體。在這個窗體上添加所需的控件，窗體和控件的屬性設置如下：</p><p>　　主窗體及其控件屬性設置</p><p>　　4.1.3 創(chuàng)建主窗體的菜單</p><p>　　在上圖所示的主窗體中，單擊鼠標右鍵，選擇彈出式菜單中的菜

81、單編輯器，創(chuàng)建如下所示的菜單結構。</p><p><b>　　圖書管理</b></p><p><b>　　…圖書類別管理</b></p><p><b>　　……添加圖書類別</b></p><p><b>　　……修改圖書類別</b></p&g

82、t;<p><b>　　……刪除圖書類別</b></p><p><b>　　…圖書信息管理</b></p><p><b>　　……添加圖書信息</b></p><p><b>　　……修改圖書信息</b></p><p><b>

83、;　　……刪除圖書信息</b></p><p><b>　　……查詢圖書信息</b></p><p><b>　　讀者管理</b></p><p><b>　　…讀者種類管理</b></p><p><b>　　……添加讀者種類</b><

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

85、b>　　……修改讀者信息</b></p><p><b>　　……刪除讀者信息</b></p><p><b>　　……查詢讀者信息</b></p><p><b>　　圖書借閱管理</b></p><p><b>　　…借書信息</b>

86、</p><p><b>　　…還書信息</b></p><p><b>　　…圖書罰金</b></p><p><b>　　…查詢借書信息</b></p><p><b>　　系統(tǒng)管理</b></p><p><b>　

87、　…添加管理員</b></p><p><b>　　…修改用戶密碼</b></p><p><b>　　…數(shù)據(jù)備份</b></p><p><b>　　…數(shù)據(jù)恢復</b></p><p><b>　　…退出</b></p><

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

89、　　由于啟動圖書管理系統(tǒng)后，需要對用戶進行判斷。如是授權用戶，將進入系統(tǒng)，否則將停止程序的執(zhí)行。這個判斷需要在系統(tǒng)運行的最初進行，因此將代碼放在公用模塊中。</p><p>　　4.2 系統(tǒng)用戶管理模塊的創(chuàng)建</p><p>　　用戶管理模塊主要實現(xiàn)：用戶登陸、添加管理員、數(shù)據(jù)備份、修改密碼四個功能。其窗體如下</p><p>　　添加管理員界面（圖4-2）<

90、/p><p>　　用戶點擊確認后，其數(shù)據(jù)會添加到數(shù)據(jù)庫中，添加用戶數(shù)據(jù)庫中會多一條新記錄，修改密碼即將數(shù)據(jù)庫中的數(shù)據(jù)進行更新（update），然后將新記錄保存到數(shù)據(jù)庫里，刪除用戶就是將數(shù)據(jù)庫中的數(shù)據(jù)清除。用戶的登錄界面與此界面基本相同，同樣是調(diào)用數(shù)據(jù)庫tushuguanlixitong表中的信息，再對用戶的登錄信息進行判斷，決定用戶的權限。這里需要強調(diào)的是新用戶名不能與當前的用戶名一致，數(shù)據(jù)庫中所記錄的是您本次登錄所

91、使用的用戶名和密碼，所以用戶名已定，只需對您所輸入的用戶名進行判斷，用戶名正確，則您創(chuàng)建了登錄的新用戶名。</p><p>　　4.3 讀者種類管理模塊的創(chuàng)建</p><p>　　圖書館需要管理不同種類的讀者，并且不同讀者享受的服務不同。讀者種類管理模塊主要實現(xiàn)如下功能：添加讀者種類、修改讀者種類、刪除讀者種類。</p><p>　　添加讀者種類窗體的創(chuàng)建</

92、p><p>　　選擇“讀者管理|讀者種類管理|添加讀者種類”菜單，出現(xiàn)如下窗體：</p><p><b>　?。▓D4-3）</b></p><p>　　在窗體上放置多個文本框，用來輸入讀者種類信息；兩個按鈕用來確定是否添加讀者種類信息；多個標簽用來提示文本框中需要輸入的內(nèi)容。添加好數(shù)據(jù)后，單點擊 確定 按鈕，系統(tǒng)通過Dim sql As Strin

93、g性質(zhì)來來判定文本框不能為空，如果一文本框出錯取消，則全部文本框?qū)⑶宄齼?nèi)容，且窗體有提示信息。當判斷好了后，單擊Command1按鈕將觸發(fā)Click事件。</p><p>　　實現(xiàn)添加類別功能的代碼如下：</p><p>　　Private Sub Command1_Click()</p><p>　　Dim sql As String</p><

94、;p>　　Dim conn As New ADODB.Connection</p><p>　　Dim rs_readerstyle As New ADODB.Recordset</p><p>　　If Trim(Text1.Text) = "" Then</p><p>　　MsgBox "讀者種類不能為空 ", v

95、bOK0nly + vbExclamation, ""</p><p>　　Text1.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　If Trim(Text2.Text) = &qu

96、ot;" Then</p><p>　　MsgBox "借書數(shù)量不能為空", vbOK0nly + vbExclamation, ""</p><p>　　Text2.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>

97、;　　End If</b></p><p>　　If Trim(Text3.Text) = "" Then</p><p>　　MsgBox "借書期限不能為空", vbOK0nly + vbExclamation, ""</p><p>　　Text3.SetFocus</p>

98、<p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　If Trim(Text4.Text) = "" Then</p><p>　　MsgBox "有限期限不能為空", vbOK0nly + vbExclama

99、tion, ""</p><p>　　Text4.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If </b></p><p>　　Dim connectionstring As String</p>&

100、lt;p>　　connectionstring = "FileDSN=tushuguanlixitong.dsn"</p><p>　　conn.Open connectionstring</p><p>　　sql = "select * from readerstyletable where 種類名稱='" & Text1.

101、Text & "'"</p><p>　　rs_readerstyle.Open sql, conn, adOpenKeyset, adLockPessimistic</p><p>　　If rs_readerstyle.EOF Then</p><p>　　rs_readerstyle.AddNew</p>&l

102、t;p>　　rs_readerstyle.Fields(0) = Trim(Text1.Text)</p><p>　　rs_readerstyle.Fields(1) = Trim(Text2.Text)</p><p>　　rs_readerstyle.Fields(2) = Trim(Text3.Text)</p><p>　　rs_readerstyl

103、e.Fields(3) = Trim(Text4.Text)</p><p>　　rs_readerstyle.Update</p><p>　　MsgBox "添加讀者類別成功!", vbOKOnly, ""</p><p>　　rs_readerstyle.Close</p><p>　　frmad

104、dreaderstyle.Hide</p><p><b>　　Else</b></p><p>　　MsgBox "讀者類別重復！", vbOKOnly + vbExclamation, ""</p><p>　　Text1.SetFocus</p><p>　　Text1.Te

105、xt = ""</p><p>　　rs_readerstyle.Close</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　4.3.2 修改讀者種類窗體的創(chuàng)建</p><p>　

106、　選擇“讀者管理|讀者種類管理|修改讀者種類”菜單，出現(xiàn)如下窗體，窗體中放置一個表格控件：</p><p>　　讀者種類記錄列表窗體（圖4-4）</p><p>　　載入窗體時，觸發(fā)窗體的Load事件，顯示當前數(shù)據(jù)庫中所有的記錄。因此在Option Explicit里創(chuàng)建一個Recordset。代碼中仍創(chuàng)建Dim sql As String，顯示記錄列表。完成代碼后，選擇修改類或者刪除，然

107、后在文本框中操作，接著點擊 刷新，將觸發(fā)Recordset中的Update事件，窗體載入當前記錄的內(nèi)容，在窗體加載代碼里，Dim connectionstring As String作為橋梁通過Recordset將窗體內(nèi)容記錄到數(shù)據(jù)庫中。所有代碼添加完成后，所修改的數(shù)據(jù)會更新在數(shù)據(jù)庫中。通過cmdupdate更新在窗體上。</p><p>　　4.3.3 刪除讀者種類</p><p>　

108、　選擇“讀者管理|讀者種類管理|刪除讀者種類”菜單，將出現(xiàn)記錄列表。選擇相應記錄，單擊鼠標右鍵，選擇彈出式菜單，將刪除當前記錄。當讀者類別信息列表內(nèi)容為空時，刪除功能將不起作用，Dim sql As String缺少對象。</p><p>　　4.4 讀者信息管理模塊的創(chuàng)建</p><p>　　讀者信息管理模塊主要實現(xiàn)如下功能：添加讀者信息、修改讀者信息、刪除讀者信息、查詢讀者信息。<

109、;/p><p>　　4.4.1 添加讀者信息窗體的創(chuàng)建</p><p>　　選擇“讀者管理|讀者信息管理|添加讀者信息”菜單，出現(xiàn)如下窗體：</p><p>　　添加讀者信息窗體（圖4-5）</p><p>　　窗體中各個控件屬性這里不做一一介紹。將各種文本框放在窗體的框架中，組成“讀者種類”和“讀者信息”兩項。載入窗體時，讀者種類中將自動添加讀

110、者種類信息，代碼加在窗體的Load事件中。輸入完內(nèi)容后，單擊“確定”按鈕，觸發(fā)Click事件，首先檢查文本內(nèi)容是否符合格式要求，然后判斷是否有重復記錄，并更新讀者表中的相關信息，最后添加內(nèi)容到數(shù)據(jù)庫。這里要強調(diào)的是添加讀者時可以添加相同的用用戶。</p><p>　　4.4.2 修改讀者信息</p><p>　　選擇“讀者管理|讀者信息管理|修改讀者信息”菜單，出現(xiàn)如下窗體：</p&

111、gt;<p>　　修改讀者信息窗體（圖4-6）</p><p>　　窗體中放置了一個表格控件，所有讀者記錄都顯示在里面。選擇需要修改的記錄，在選擇菜單下拉框中的“修改讀者信息”命令，出現(xiàn)“添加讀者信息窗體”，然后進行修改。選擇“修改讀者信息”命令，將觸發(fā)Frmchangdelreaderinfo的Click事件。程序判斷為修改狀態(tài)后，首先刪除原有記錄，然后把新內(nèi)容加入到數(shù)據(jù)庫中。</p>

112、<p>　　4.4.3 刪除讀者信息</p><p>　　在讀者記錄列表中選擇記錄，然后選擇菜單中的“刪除信息”按鈕，將刪除當前記錄，再選擇 刷新 按鈕 則窗體中的內(nèi)容將改變成你刪除后的內(nèi)容。數(shù)據(jù)庫中也將得到刪除后的更改數(shù)據(jù)。刪除信息時同樣要判斷讀者信息列表內(nèi)容是否為空。</p><p>　　4.4.4 查詢讀者信息</p><p>　　選擇“讀者管

113、理|讀者信息管理|查詢讀者信息”菜單，出現(xiàn)下列窗體。在這里可以按照各種方式以及它們的組合進行查詢。載入窗體時，將自動加入所有讀</p><p><b>　?。▓D4-7）</b></p><p>　　者種類的信息，即將內(nèi)容添加到列表框中。設置完查詢內(nèi)容和方式后，單擊cmd Command1 按鈕將進行查詢，代碼如下：</p><p>　　Priv

114、ate Sub Command1_Click()</p><p>　　Dim rs_findreader As New ADODB.Recordset</p><p>　　Dim conn As New ADODB.Connection</p><p>　　Dim sql As String</p><p>　　If Check1.Value

115、 = vbChecked Then</p><p>　　sql = "讀者編號='" & Trim(Text1.Text & "") & "'"</p><p><b>　　End If</b></p><p>　　If Check2.Value

116、 = vbChecked Then</p><p>　　If Trim(sql) = "" Then</p><p>　　sql = "讀者姓名='" & Trim(Text2.Text & " ") & "'"</p><p><b>

117、　　Else</b></p><p>　　sql = sql & "and 類別='" & Trim(Text2.Text & " ") & "'"</p><p><b>　　End If</b></p><p><b