基于vb的圖書管理系統(tǒng)畢業(yè)論文

上傳人：奔*** IP屬地：河北更新時間：2024-03-01 格式：doc 頁數(shù)：24 大小：161.00KB 人氣指數(shù)：12 舉報 版權(quán)申訴

已閱讀1頁，還剩23頁未讀，繼續(xù)免費(fèi)閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、　　畢業(yè)論文(設(shè)計)　　題目基于VB的圖書管理系統(tǒng) 　　專業(yè) 計算機(jī)科學(xué)與技術(shù)（新教務(wù)）（本科） 　　摘要　　本世紀(jì)以來，由于社會生產(chǎn)力的迅速

2、發(fā)展和科學(xué)技術(shù)的突飛猛進(jìn)，人們進(jìn)行信息交流的深度和廣度不斷增加，管理所需要的信息量急劇增長，同時對信息的處理要求及時、準(zhǔn)確，這導(dǎo)致了傳統(tǒng)的信息處理方法和手段已不能適應(yīng)現(xiàn)代管理的需要；電子計算機(jī)的誕生和在信息處理中的應(yīng)用，標(biāo)志著一個嶄新時代——“信息時代”的開始，它使圖書管理現(xiàn)代化成為可能。在一定意義上說，管理信息系統(tǒng)的產(chǎn)生和發(fā)展是建立在電子計算機(jī)基礎(chǔ)之上的。　　圖書管理系統(tǒng)是典型的信息管理系統(tǒng)(

3、MIS)，其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對于后者則要求應(yīng)用程序功能完備，易使用等特點(diǎn)。　　經(jīng)過分析,我使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具，利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象，首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原型，然后對初始

4、原型系統(tǒng)進(jìn)行需求迭代，不斷修正和改進(jìn)，直到形成滿意的可行系統(tǒng)。　　關(guān)鍵詞：圖書管理數(shù)據(jù)庫 Visual Basic.NET 模塊　　目錄　　引言......................................................1&l

5、t;/p>　　一、概述..................................................2　?。ㄒ唬┸浖榻B............................................2　　（二）圖書管理的現(xiàn)狀....................................

6、..2　　二、系統(tǒng)分析..............................................3　?。ㄒ唬┫到y(tǒng)產(chǎn)生的背景.......................................3　　（二）系統(tǒng)性能要求....................................

7、....3　　三、系統(tǒng)設(shè)計...............................................4　?。ㄒ唬┫到y(tǒng)模塊圖..........................................4　?。ǘ┫到y(tǒng)的代碼設(shè)計...............................

8、........5　?。ㄈ?shù)據(jù)庫設(shè)計..........................................8　　四、系統(tǒng)實現(xiàn)...............................................9　?。ㄒ唬┏绦蜻\(yùn)行..............................

9、..............9　　五、結(jié)論.................................................19　　致謝.....................................................20　　參考文獻(xiàn)....................

10、.............................20　　引言　　當(dāng)今時代是飛速發(fā)展的的信息時代。在各行各業(yè)中離不開信息處理，這正是計算機(jī)被廣泛應(yīng)用于信息管理系統(tǒng)的原因。計算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。使用計算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。尤其對于復(fù)雜的信息管理，計

11、算機(jī)能夠充分發(fā)揮它的優(yōu)越性。計算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)是系統(tǒng)管理的前提。本系統(tǒng)就是為了管理好圖書館信息而設(shè)計的。　　圖書館作為一種信息資源的集散地，圖書和用戶借閱資料繁多，包含很多的信息數(shù)據(jù)的管理，現(xiàn)今，有很多的圖書館都是初步開始使用，甚至尚未使用計算機(jī)進(jìn)行信息管理。根據(jù)調(diào)查得知，他們以前對信息管理的主要方式是基于文本，表格等紙介質(zhì)的手工處理，對于圖書借閱情況（如

12、借書天數(shù)，超過限定借書時間的天數(shù)）的統(tǒng)計和核實等往往采用對借書卡的人工檢查進(jìn)行，對借閱者的借閱權(quán)限，以及借閱天數(shù)等用人工計算，手抄進(jìn)行。數(shù)據(jù)處理工作量大，容易出錯。由于數(shù)據(jù)繁多，容易丟失，且不易查找?？偟膩碚f，缺乏系統(tǒng)規(guī)范的信息管理手段。盡管有的圖書館有計算機(jī)，但是尚未用于信息管理，沒有發(fā)揮它的效力，資源閑置比較突出，這就是管理信息系統(tǒng)的開發(fā)的基于環(huán)境。　　基于這個問題，我認(rèn)為有必要建立一個圖書

13、管理系統(tǒng)，使圖書管理工作規(guī)范化，系統(tǒng)化，程序化，避免圖書管理的隨意性，提高信息處理的速度和準(zhǔn)確性，能夠及時，準(zhǔn)確，有效的查詢和修改圖書情況。　　一、概述　?。ㄒ唬┸浖榻B　　本系統(tǒng)所采用的編程語言為visual basic 6.0與微軟

14、的 access作為操作數(shù)據(jù)庫。　　Visual Basic 6.0是Micrsoft公司出品的開發(fā)工具，Visual Basic是一種可視化的，面向?qū)ο蟮腤indows開發(fā)語言，它具有易用、通用和開發(fā)效率高的特點(diǎn)。隨著微軟對它不斷地改進(jìn)以及計算機(jī)本身性能的提高，使得Visual Basic越來越適合一般的應(yīng)用程序開發(fā)。　　在VisualBasic環(huán)境下

15、，利用事件驅(qū)動的編程機(jī)制、新穎易用的可視化設(shè)計工具，使用Windows內(nèi)部的廣泛應(yīng)用程序接口函數(shù)，以用動態(tài)鏈接庫、對象的鏈接與世隔嵌入、開放式數(shù)據(jù)連接等技術(shù)，可以高效、快速地開發(fā)Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)。　　正如Bill Gate所說，世界上絕大多數(shù)的Windows應(yīng)用程序是用Visual Basic編寫的。在眾多的開發(fā)工具中，我們?yōu)槭裁匆x擇Visual Bas

16、ic6.0呢？因為VB具有眾多其它開發(fā)工具所沒有的優(yōu)點(diǎn)：開發(fā)的高效、語言的高效、編譯的高效、執(zhí)行的高效、維護(hù)的高效。　?。ǘ﹫D書管理的現(xiàn)狀　　隨著計算機(jī)技術(shù)的飛速發(fā)展，其應(yīng)用方面已滲透到社會生活的各個領(lǐng)域。它已經(jīng)成為我們學(xué)習(xí)和工作的得力助手。在學(xué)校，尤其是在一些高校，圖書是學(xué)校的一項重要資源，圖書的管理也是學(xué)校的一項常規(guī)性的重要工作。而長期以來，學(xué)生圖

17、書管理都是依賴人工進(jìn)行的?，F(xiàn)今，有很多的學(xué)校都已經(jīng)開始使用計算機(jī)進(jìn)行圖書信息管理，并且起得良好的效果。近年來我校招生情況越來越好，所以圖書管理工作越來越繁重，但由于種種原因，管理人員并沒有增加，因此原有的人工管理工作已不能適應(yīng)現(xiàn)行的工作需要。同時，陳舊的人工管理也不利于推廣計算機(jī)應(yīng)用。為使圖書管理工作科學(xué)化、規(guī)范化，就必須采用計算機(jī)輔助管理。　　當(dāng)今時代是飛速發(fā)展的的信息時代。在各行各業(yè)中離不開

18、信息處理，這正是計算機(jī)被廣泛應(yīng)用于信息管理系統(tǒng)的原因。計算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。使用計算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。尤其對于復(fù)雜的信息管理，計算機(jī)能夠充分發(fā)揮它的優(yōu)越性。計算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)是系統(tǒng)管理的前提。本系統(tǒng)就是為了管理好圖書館信息而設(shè)計的。　　二、系統(tǒng)分析<

19、;/p>　?。ㄒ唬┫到y(tǒng)產(chǎn)生的背景　　圖書管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。　　經(jīng)過分析,我使用 MICROSOFT公司的 VISUAL BASIC開

20、發(fā)工具，利用其提供的各種面向?qū)ο蟮拈_發(fā)工具，尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象，首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原型，然后對初始原型系統(tǒng)進(jìn)行需求迭代，不斷修正和改進(jìn)，直到形成滿意的可行系統(tǒng)。　?。ǘ┫到y(tǒng)性能要求　　除了滿足用戶要求外，系統(tǒng)的性能也很重要。如果新系統(tǒng)不能為用戶提高工作效率和使用方便，那么，

21、用戶是絕對不能接受的。　　系統(tǒng)的性能要求一般包括：計算或查詢響應(yīng)時間、處理容量、存儲容量、人機(jī)交互的友好性，系統(tǒng)的安全性、可靠性以及容錯能力等，如果是網(wǎng)絡(luò)系統(tǒng)，還應(yīng)包括系統(tǒng)傳輸（交換）能力。例如：對資料查詢的性能要求是：常用資料檢索響應(yīng)時間，非常用資料檢索響應(yīng)時間，資料信息存儲容量，后備存儲容量，可以打印報表的類型、數(shù)量。　　系統(tǒng)性能一般由以下幾個方面確

22、定：　　容量要求：確定系統(tǒng)的容量要求，如處理的記錄和處理數(shù)據(jù)的最大容量等。　　精度要求：確定系統(tǒng)的精度要求。如數(shù)據(jù)或數(shù)值計算的精度要求、數(shù)據(jù)傳輸?shù)木纫蟮取?lt;/p>　　時間特性要求：確定系統(tǒng)的時間特性要求。如處量時間、響應(yīng)時間及其峰值負(fù)載期間允許偏離范圍，系統(tǒng)各項功能的順序關(guān)系，由于輸入類型的不同和操作方式的變化而引起

23、的優(yōu)先順序的變化等。　　適應(yīng)性要求：必須指明反映系統(tǒng)環(huán)境變化和系統(tǒng)適應(yīng)能力的各種參數(shù)。說明當(dāng)需求發(fā)生某些變化時系統(tǒng)的適應(yīng)能力，指出為適應(yīng)這些變化而需要設(shè)計的軟件和過程。　　人機(jī)交互友好性：要有適用于用戶特點(diǎn)和智能化人機(jī)交互界面，便于用戶操作使用。　　系統(tǒng)的可靠性：為提高系統(tǒng)的可靠性采用了模塊化、結(jié)構(gòu)化設(shè)計，對于需

24、要容錯處理的模塊提供備份，以減少系統(tǒng)故障。　　根據(jù)用戶的需求，應(yīng)具有如下性能：　　數(shù)據(jù)庫和網(wǎng)絡(luò)擴(kuò)充的能力。　　快速的信息交換能力及響應(yīng)能力。　　具有較大的數(shù)據(jù)存儲能力。　　系統(tǒng)快速恢復(fù)能力。&

25、lt;/p>　　保障數(shù)據(jù)庫系統(tǒng)和網(wǎng)絡(luò)系統(tǒng)的安全。　　三、系統(tǒng)設(shè)計　　（一）系統(tǒng)模塊圖　　圖3-1系統(tǒng)模塊圖　　本系統(tǒng)主要包括：圖書

26、管理模塊、讀者管理模塊、圖書借閱管理模塊、系統(tǒng)管理模塊。　　圖書管理模塊包括：圖書類別管理（首先是以圖書類別的編號為依據(jù)，來達(dá)到添加、修改、查詢圖書類別記錄。同時，也對數(shù)據(jù)庫中的圖書類別表的編號進(jìn)行檢查）；圖書信息管理（以圖書編號為流動方向的依據(jù)，來達(dá)到添加、修改、記錄、刪除圖書記錄）。　　讀者管理模塊包括：讀者管理（以讀者類別編號為流動方向的依據(jù)，來達(dá)

27、到添加、修改、記錄讀者類別記錄。）；讀者信息管理（以讀者的編號為依據(jù)，來達(dá)到添加、修改、查詢、刪除讀者信息的記錄。同時，也對數(shù)據(jù)庫中的讀者信息表的編號進(jìn)行檢查）。　　圖書借閱管理模塊包括：借書管理（以借閱編號為流動方向的依據(jù)，來達(dá)到添加、查詢借書記錄）；還書管理（是實現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和查詢操作，在借閱信息中包括借閱編號、讀者編號、讀者姓名、書籍名稱、出借日期和還書日期。并通過添加功能來達(dá)

28、到借閱信息表的數(shù)據(jù)的更新，通過查詢可使管理員很快地了解借閱信息，從而避免書籍的丟失現(xiàn)象產(chǎn)生）。　　系統(tǒng)管理包括：添加管理員,修改密碼,退出系統(tǒng)。　?。ǘ┫到y(tǒng)的代碼設(shè)計　　本系統(tǒng)的查詢功能代碼（例舉實例）如下：　　功能介紹：用于顯示（當(dāng)讀者借書/還書時）該讀者已借閱的所有

29、書籍，方便管理員及讀者了解信息　　Private Sub about_Click()　　Form3.Show　　End Sub　　'數(shù)據(jù)查詢的實現(xiàn)

30、　　Private Sub start_Click()　　'對應(yīng)不同的選項進(jìn)行查詢　　On Error GoTo wrong　　Dim LibName As String　　If combo1.ListIndex = -1 Or Text1.Text = &quo

31、t;" Then　　MsgBox "你沒有輸入查詢內(nèi)容或選擇查詢項"　　Else　　a = Text1.Text　　Adodc1.CommandType = adCmdText&l

32、t;p>　　i = combo1.ListIndex　　b = combo1.List(i)　　Set DataGrid1.DataSource = Adodc1　　Select Case SSTab1.Tab　　Case 2&

33、lt;/p>　　If i <> 6 Then　　Adodc1.RecordSource = "select * from libary where " & b & " like '%" & a & "%'" '借閱信息查詢

34、　　Adodc1.Refresh　　Else　　Adodc1.RecordSource = "select * from libary "　　Adodc1.Refresh

35、End If　　Case 3　　If i <> 7 Then　　Adodc1.RecordSource = "select * from S_book where " & b & " like &#

36、39;%" & a & "%'" '書籍查詢　　Adodc1.Refresh　　Else　　Adodc1.RecordSource = "select * from S_book "</p

37、>　　Adodc1.Refresh　　End If　　Case 4　　If i <> 5 Then　　Adodc1.RecordSource = "

38、;select * from S_no where " & b & " like '%" & a & "%'" '學(xué)號查詢　　Adodc1.Refresh　　Else

39、Adodc1.RecordSource = "select * from S_no "　　Adodc1.Refresh　　End If　　End Select　　End If&

40、lt;/p>　　L1.名稱 = "共找到" & Adodc1.Recordset.RecordCount & "條記錄"　　Exit Sub　　wrong:

41、;　　MsgBox Err.Description　　End Sub　　Private Sub book_Click()　　SSTab1.Tab = 3　　With combo1<b&g

42、t;　　.Clear　　.Text = "請選擇類別"　　.AddItem "名稱", 0　　.AddItem "作者", 1　　.AddItem "書號", 2</

43、p>　　.AddItem "名稱", 3　　.AddItem "出版社", 4　　.AddItem "出版時間", 5　　.AddItem "內(nèi)容介紹", 6　　.

44、AddItem "所有記錄", 7　　End With　　Adodc1.Refresh　　End Sub　　（三）數(shù)據(jù)庫設(shè)計</p&

45、gt;　　圖書管理系統(tǒng)的數(shù)據(jù)庫采用SQLServer2000 ，系統(tǒng)數(shù)據(jù)庫的名稱為“MIScar”。數(shù)據(jù)庫中包含了多張數(shù)據(jù)表。下面分別給出數(shù)據(jù)表概要說明和主要數(shù)據(jù)表的結(jié)構(gòu)。　?。?）讀者類別：用于查詢讀者類別的基本信息。見表3-1所示：　　表3-1讀者類別信息表　?。?）借閱：用來存儲借閱圖

46、書的信息。見表3-2所示：　　表3-2借閱信息表　?。?）讀者信息：存儲讀者的信息。表3-3所示：　　表3-3讀者信息表　?。?）系統(tǒng)管理：用于儲存系統(tǒng)用戶的基本信息。見表3-4所示：</p

47、>　　表3-4系統(tǒng)管理表　　四、系統(tǒng)實現(xiàn)　?。ㄒ唬┏绦蜻\(yùn)行　　1.系統(tǒng)登錄窗體<b&g

48、t;　　圖4-1 系統(tǒng)登錄　　系統(tǒng)登錄窗體代碼：　　Option Explicit　　Dim cnt As Integer '記錄確定次數(shù)　　Private Sub

49、Command1_Click()　　Dim sql As String　　Dim rs_login As New ADODB.Recordset　　If Trim(txtuser.Text) = "" Then '判斷輸入的用戶名是否為空&

50、lt;p>　　MsgBox "沒有這個用戶", vbOKOnly + vbExclamation, ""　　txtuser.SetFocus　　Else　　sql = "select * from 系統(tǒng)管理 where

51、用戶名='" & txtuser.Text & "'"　　rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic　　If rs_login.EOF = True Then　　MsgBox &qu

52、ot;沒有這個用戶", vbOKOnly + vbExclamation, ""　　txtuser.SetFocus　　Else '檢驗密碼是否正確　　If Trim(rs_login.Fields(1)) =

53、 Trim(txtpwd.Text) Then　　userID = txtuser.Text　　userpow = rs_login.Fields(2)　　rs_login.Close　　Unload Me&l

54、t;p>　　Form1.Show　　Else　　MsgBox "密碼不正確", vbOKOnly + vbExclamation, ""　　txtpwd.SetFocus

55、　　End If　　End If　　End If　　cnt = cnt + 1　　If cnt = 3 Then

56、Unload Me　　End If　　Exit Sub　　End Sub　　Private Sub Command2_Click()<

57、;/p>　　Unload Me　　End Sub　　Private Sub Form_Load()　　Dim connectionstring As String　　c

58、onnectionstring = "provider=Microsoft.Jet.oledb.4.0;" & _　　"data source=book.mdb"　　conn.Open connectionstring　　cnt = 0</b

59、>　　End Sub　　本界面適用于用戶登錄　　用戶登錄時，在“用戶名”位置輸入正確的用戶名，然后填寫自己的密碼，最后點(diǎn)擊“確定”按鈕，如果密碼正確，則直接進(jìn)入圖書管理系統(tǒng)，如果密碼或用戶名不正確，則會提示“沒有這個用戶名”。

60、　　2. 系統(tǒng)主界面窗體　　圖4-2 系統(tǒng)主界面　　系統(tǒng)主界面窗體代碼：　　Private Sub add_admin_Click()　　frmadduser.Show　　End Sub<

61、;/p>　　Private Sub add_back_book_Click()　　frmbackbookinfo.Show　　End Sub　　Private Sub add_book_info_Click()<p&g

62、t;　　frmaddbookinfo.Show　　End Sub　　Private Sub add_book_style_Click()　　frmaddbookstyle.Show　　End Sub

63、;　　Private Sub add_lend_book_Click()　　frmfindbook.Show　　End Sub　　Private Sub add_reader_info_Click()<p

64、>　　frmaddreaderinfo.Show　　End Sub　　Private Sub add_reader_style_Click()　　frmaddreaderstyle.Show　　End Sub&

65、lt;/b>　　Private Sub change_pwd_Click()　　frmchangepwd.Show　　End Sub　　Private Sub del_book_info_Click()&

66、lt;p>　　frmmodifybookinfo.Show　　End Sub　　Private Sub del_book_style_Click()　　frmmodifybookstyle.Show　　End

67、Sub　　Private Sub del_reader_info_Click()　　frmreaderinfo.Show　　End Sub　　Private Sub del_reader_style_Click()

68、　　frmmodifyreaderstyle.Show　　End Sub　　Private Sub exit_sys_Click()　　End<b&

69、gt;　　End Sub　　Private Sub find_book_info_Click()　　frmfindbook.Show　　End Sub　　Private Sub find_lend_book_Cli

70、ck()　　frmfindborrowinfo.Show　　End Sub　　Private Sub find_reader_info_Click()　　frmfindreader.Show&

71、lt;b>　　End Sub　　Private Sub Form_Load()　　End Sub　　Private Sub modify_book_info_Click()　　frmmodifybookinf

72、o.Show　　End Sub　　Private Sub modify_book_style_Click()　　frmmodifybookstyle.Show　　End Sub

73、　　Private Sub modify_reader_info_Click()　　frmreaderinfo.Show　　End Sub　　Private Sub modify_reader_style_Click()<p

74、>　　frmmodifyreaderstyle.Show　　End Sub　　系統(tǒng)主界面窗體主要有四大模塊：圖書管理、讀者管理、圖書借閱管理、系統(tǒng)管理　　進(jìn)入該界面后可以進(jìn)行自己想要進(jìn)行的操作。圖書管理模塊包括：圖書類別管理（添加、修改、查詢圖書類別記錄），圖書信息管理

75、（以添加、修改、記錄、刪除圖書記錄）。　　讀者管理模塊包括：讀者管理（添加、修改、記錄讀者類別記錄），讀者信息管理（添加、修改、查詢、刪除讀者信息的記錄）。　　圖書借閱管理模塊包括：借書管理（添加、查詢借書記錄），還書管理（是實現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和查詢操作，在借閱信息中包括借閱編號、讀者編號、讀者姓名、書籍名稱、出借日期和還書日期。并通過添加功能來

76、達(dá)到借閱信息表的數(shù)據(jù)的更新，通過查詢可使管理員很快地了解借閱信息，從而避免書籍的丟失現(xiàn)象產(chǎn)生）。　　系統(tǒng)管理包括：添加管理員，修改密碼，退出系統(tǒng)。　　3.添加圖書類別窗體　　圖4-3添加圖書類別界面　　添加圖書類別界面代碼：　　O

77、ption Explicit　　Private Sub Command1_Click()　　Dim rs_bookstyle As New ADODB.Recordset　　Dim sql As String　　If Trim(Text1.Text) = "&q

78、uot; Then　　MsgBox "圖書種類不能為空", vbOKOnly + vbExclamation, ""　　Text1.SetFocus　　Exit Sub　　En

79、d If　　If Trim(Text2.Text) = "" Then　　MsgBox "種類編號不能為空", vbOKOnly + vbExclamation, ""　　Text2.SetFocus<p

80、>　　Exit Sub　　End If　　sql = "select * from 圖書類別 where 類別名稱='" & Text1.Text & "'"

81、　rs_bookstyle.Open sql, conn, adOpenKeyset, adLockPessimistic　　If rs_bookstyle.EOF Then　　rs_bookstyle.AddNew　　rs_bookstyle.Fields(0) = Trim(Text1.Text)</p

82、>　　rs_bookstyle.Fields(1) = Trim(Text2.Text)　　rs_bookstyle.Update　　MsgBox "添加圖書類別成功！", vbOKOnly, ""　　rs_bookstyle.Close<

83、/p>　　Else　　MsgBox "讀者類別重復(fù)！", vbOKOnly + vbExclamation, ""　　Text1.SetFocus　　Text1.Text = ""<

84、/p>　　rs_bookstyle.Close　　Exit Sub　　End If　　End Sub　　Private Sub C

85、ommand2_Click()　　Unload Me　　End Sub　　Private Sub Form_Load()　　End Sub

86、　　本界面主要用于添加圖書類別　　點(diǎn)擊“圖書管理”，出現(xiàn)圖書類別的窗體，然后在“圖書類別”中填入要添加的圖書的類別名稱，并輸寫圖書編號，點(diǎn)擊“確定”按鈕，則彈出另一個窗體，顯示“添加圖書類別成功”。　　4.添加讀者類別窗體　　圖4-4添加讀者類別界面

87、　　添加讀者類別窗體代碼：　　Option Explicit　　Dim rs_readerstyle As New ADODB.Recordset　　Private Sub Command1_Click()　　Dim sql As String&l

88、t;p>　　If Trim(Text1.Text) = "" Then　　MsgBox "讀者種類不能為空", vbOKOnly + vbExclamation, ""　　Text1.SetFocus　　Exit Sub</

89、b>　　End If　　If Trim(Text2.Text) = "" Then　　MsgBox "借書數(shù)量不能為空", vbOKOnly + vbExclamation, ""<

90、;p>　　Text2.SetFocus　　Exit Sub　　End If　　If Trim(Text3.Text) = "" Then　　MsgBox "借書

91、期限不能為空", vbOKOnly + vbExclamation, ""　　Text3.SetFocus　　Exit Sub　　End If　　If Trim(Te

92、xt4.Text) = "" Then　　MsgBox "有限期限不能為空", vbOKOnly + vbExclamation, ""　　Text4.SetFocus　　Exit Sub&l

93、t;p>　　End If　　sql = "select * from 讀者類別 where 種類名稱='" & Text1.Text & "'"　　rs_readerstyle.Open sql, conn, adOpenKeyset, a

94、dLockPessimistic　　If rs_readerstyle.EOF Then　　rs_readerstyle.AddNew　　rs_readerstyle.Fields(0) = Trim(Text1.Text)　　rs_readerstyle.Fields(

95、1) = CInt(Text2.Text)　　rs_readerstyle.Fields(2) = CInt(Text3.Text)　　rs_readerstyle.Fields(3) = CInt(Text4.Text)　　rs_readerstyle.Update

96、MsgBox "添加讀者類別成功！", vbOKOnly, ""　　rs_readerstyle.Close　　Else　　MsgBox "讀者類別重復(fù)！", vbOKOnly + vbExclamation, &q

97、uot;"　　Text1.SetFocus　　Text1.Text = ""　　rs_readerstyle.Close　　Exit Sub

98、End If　　End Sub　　Private Sub Command2_Click()　　Unload Me　　End Sub<

99、/p>　　Private Sub Form_Load()　　End Sub　　本界面用于添加讀者類別　　在系統(tǒng)主界面窗體中點(diǎn)擊“讀者管理”，然后點(diǎn)擊“讀者類別管理”，最后點(diǎn)擊“添加讀者類別”按鈕，就會蹦出另一個“添加讀者類別”的窗體。在相應(yīng)的位置填

100、上相關(guān)的信息，最后點(diǎn)擊“確定”按鈕，則顯示“添加成功”。　　五、結(jié)論　　在這次畢業(yè)設(shè)計過程中，使我受到了一次用專業(yè)知識、專業(yè)技能分析和解決問題的全面的、系統(tǒng)的鍛煉。使我在綜合知識的選用方面，在應(yīng)用軟件開發(fā)的基本思想、方法方面，以及在程序設(shè)計的掌握方面都能向前邁了一大步。為日后成為合格的應(yīng)用型人才打下良好的基礎(chǔ)。

101、本設(shè)計完成了需求分析，設(shè)計代碼，以及幾個模塊的數(shù)據(jù)庫設(shè)計。提高了我的程序編寫水平，并加深理解了許多課程中、書本上學(xué)到的知識和理論。同時，通過編寫畢業(yè)設(shè)計論文，我還基本掌握了軟件文檔的書寫方法和書寫格式。通過畢業(yè)設(shè)計，我學(xué)會了如何去了解一種新型的技術(shù)，去掌握一種技術(shù)。以及軟件開發(fā)的基本流程。在學(xué)習(xí)過程中，我們遇到問題經(jīng)常上網(wǎng)求助，去書店查詢資料，擴(kuò)大了自己的知識面。總之，這次畢業(yè)設(shè)計為我今后繼續(xù)學(xué)習(xí)、深造奠定了基礎(chǔ)

102、，我非常感謝各位老師、同學(xué)的支持與幫助。　　致謝　　設(shè)計的結(jié)束，也宣告了我在廣播電視大學(xué)學(xué)習(xí)生涯的結(jié)束，心里雖然充滿了期待，但也有點(diǎn)不舍，想想自己走過來的一步一步，一點(diǎn)一滴，心中感慨萬千，希望自己帶著那份對未來社會的憧憬和希望，順利通過畢業(yè)答辯，繼續(xù)學(xué)習(xí)新的專業(yè)知識。　　在論

103、文完稿之際，我特別要感謝我的指導(dǎo)老師**老師。他在我整個系統(tǒng)開發(fā)和論文撰寫的整個過程中給了我很多建議和及時的幫助。從研究方向，構(gòu)造框架，直到具體開發(fā)研究，甚至語法等等細(xì)微的工作，都一絲不茍、嚴(yán)格要求。在我今后的學(xué)習(xí)、工作，甚至生活的方方面面，都要把*老師的這種精神貫徹始終，從而不辜負(fù)朱志凌老師對我的悉數(shù)關(guān)懷和耐心指導(dǎo)！　　此外，我還要感謝與我一起在機(jī)房學(xué)習(xí)Visual Basic.NET編程軟件

104、的同學(xué)和朋友，在他們的幫助與共同探討下，我解決了許多難題，也使我的論文能夠順利完成。感謝他們在我學(xué)習(xí)和生活上的幫助。　　參考文獻(xiàn)　　[1]閃四清，《數(shù)據(jù)庫系統(tǒng)原理與應(yīng)用》清華大學(xué)出版社，1999　　[2]羅光春《Visual Basic 6.0從入門到精通》電子科技大學(xué)出版社

眾賞文庫> 全部分類> 畢業(yè)設(shè)計

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

基于vb的圖書管理系統(tǒng)畢業(yè)論文

文檔簡介

溫馨提示

最新文檔

評論

基于vb的圖書管理系統(tǒng)畢業(yè)論文

文檔簡介

溫馨提示

最新文檔

評論

免費(fèi)下載