【正文】 As New SqlDataAdapter(cmd) Dim ds As New DataSet (ds) Return (0) End Function Public Shared Sub Execute(ByRef clsDdb As SqlConnection, ByVal cmd As SqlCommand) () End SubEnd Class. 用戶登錄模塊用戶登錄模塊主要功能：，檢索用戶信息表，核對用戶名和密碼，輸入正確的用戶名和密碼，單擊“登錄”按鈕，實現(xiàn)登錄過程。圖 52用戶登錄界面該模塊系統(tǒng)源碼為：Protected Sub Submit_ServerClick(ByVal sender As Object, ByVal e As ) Handles Dim userInfo As UserInfomation = _ (Nothing, , ) If Not userInfo Is Nothing Then (userCode) = () Else = 用戶名或者密碼錯誤，請重新輸入！ End If End Sub. 圖書瀏覽模塊該模塊是對一般用戶瀏覽和查閱圖書信息使用的。在檢索圖書過程中用到該類的getUserInfo事件，用于從圖書信息表中獲取信息。其中用到BookInfo、BookOut和Student三個類，BookOut類用于圖書借出的操作，Student類用于學(xué)生信息的查詢、更新、添加和刪除操作。如圖 55所示。如圖 56所示。系統(tǒng)管理員可以瀏覽、更新、添加和刪除讀者信息，這里的讀者主要是指學(xué)生。圖57 圖 57管理讀者信息界面該模塊系統(tǒng)源碼為：Protected Sub Submit_Click(ByVal sender As Object, ByVal e As ) Handles = Dim StudentInfo As New Student If = Then 39。And (action) Is Nothing Then 39。 (Me, StudentInfo) 39。End If End If Else amp。 圖 58用戶管理界面該模塊系統(tǒng)源碼為：Protected Sub Page_Load(ByVal sender As Object, ByVal e As ) Handles = 用戶管理 If Not Then If Not (userCode) Then Dim userInfo As UserInfomation userInfo=((userCode).ToString) If (action) Is Nothing Then If Not = 2 Then () End If End If End If End If If Not Then = () () End If End Sub. 修改信息模塊修改信息模塊的主要功能：任何用戶登錄后，都可以修改自己的用戶名、登錄名和密碼。 Dim StudentInfo As New Student Dim userInfo As New UserInfomation If (userCode) Is Nothing Then If And And Then userInfo = ((userCode)) If = Then If Then amp。 = Dim chkUserInfo As UserInfomation Dim chkOk As Boolean39。New Date(1900, 1, 1) = 000000 (Me, userInfo) 39。= 用戶登錄名已存在，請重新輸入！ End If End IfEnd Sub. 連接數(shù)據(jù)庫本系統(tǒng)沒有建立存儲過程，將系統(tǒng)中數(shù)據(jù)庫的連接以及數(shù)據(jù)的操作功能封裝成幾類存放在App_code文件中。一個成功的測試是指揭示了迄今為止尚未發(fā)現(xiàn)的錯誤的測試。測試應(yīng)從“小規(guī)?！遍_始，逐步轉(zhuǎn)向“大規(guī)模”。以用戶的角度通過操作本系統(tǒng)來發(fā)現(xiàn)系統(tǒng)存在的錯誤和缺陷。總 結(jié)畢業(yè)實習(xí)讓我們學(xué)會將四年所學(xué)的專業(yè)理論知識與實踐結(jié)合起來，培養(yǎng)實際工作能力與分析能力，以達到學(xué)以致用的目的。 SERVER 2000作為開發(fā)工具的時候， SERVER 2000良好的可移植性很適合做Web開發(fā)，但是也考慮到我以前從來沒有使用過這兩種工具來開發(fā)項目，對于這兩種工具的使用沒有任何可借鑒的經(jīng)驗，這無形之中就增加了我做畢業(yè)設(shè)計的難度，我必須從頭開起。但這是我第一次使用數(shù)據(jù)庫開發(fā)管理系統(tǒng)，接觸的不多，經(jīng)驗還不夠，存在比較多的問題也是不能避免的。張老師認真負責(zé)的工作態(tài)度、嚴(yán)謹(jǐn)?shù)闹螌W(xué)風(fēng)格，使我深受啟發(fā)；開發(fā)的同時，有不明白的問題和同學(xué)們之間的相互探討也使我獲益匪淺。phane Faroult，Peter Robson . SQL語言藝術(shù). 電子工業(yè)出版社[9] 王珊. 數(shù)據(jù)庫系統(tǒng)原理教程. 清華大學(xué)出版社 [10] John Cater. 數(shù)據(jù)庫設(shè)計與編程實例詳解— 使用Access, SQL與VB. 電子工業(yè)出版社[11] 李應(yīng)偉. . 清華大學(xué)出版社[12] Scot Hillier. Scot Hillier’s OOM+ Programming with Visual Basic. Sams,2009年9月 。所以我再次感謝我的老師和給予過我?guī)椭耐瑢W(xué)們！最后還要感謝大學(xué)四年來所有的老師，為我們打下專業(yè)知識的基礎(chǔ)，同時還要感謝所有的同學(xué)們，正是因為有了你們的支持和鼓勵，此次畢業(yè)設(shè)計才會順利完成。畢業(yè)設(shè)計將我學(xué)習(xí)的知識進行了一次綜合，我必須將以前所學(xué)融會貫通，且靈活運用并且更加深入地研究學(xué)習(xí)之后才能完成我的設(shè)計，這也正是學(xué)習(xí)的真諦，希望我能夠成功地通過這次檢驗，成為一名優(yōu)秀的畢業(yè)生！致 謝經(jīng)過幾個月的忙碌和工作，本次畢業(yè)設(shè)計已經(jīng)接近尾聲，作為一個本科生的畢業(yè)設(shè)計，由于經(jīng)驗的匱乏，難免有許多考慮不周全的地方，如果沒有導(dǎo)師的督促和指導(dǎo)，想要完成這個設(shè)計是難以想象的。雖然我所設(shè)計的系統(tǒng)稍顯稚嫩，由于本人對圖書館的管理機制不夠清楚，有許多功能都沒有實現(xiàn)，而實現(xiàn)了的功能也不夠完善，并且可操作性也不是很好，另外基本操作都由鍵盤輸入，這就很難避免輸入的錯誤，顯得比較麻煩。通過對本系統(tǒng)的開發(fā)，我對軟件開發(fā)過程有了更清晰的了解，對圖書管理系統(tǒng)的流程有了一定的認識，在開發(fā)過程還認真學(xué)習(xí)了編程算法知識，極大地拓寬了我的知識面，令我收獲頗豐。軟件由數(shù)據(jù)（包括鍵盤輸入、鼠標(biāo)單擊、磁盤文件、打印輸出等等）和程序（可執(zhí)行的流程、轉(zhuǎn)換、邏輯和運算）兩個最基本的要素組成。為了達到最有效，應(yīng)該由獨立的第三方來構(gòu)造測試。應(yīng)該在測試工作真正開始前較長時間就進行測試計劃。6. 測試. 測試目標(biāo)測試是一個為了發(fā)現(xiàn)錯誤而執(zhí)行程序的過程。(Me, StudentInfo) 39。登錄名不存在 If chkUserInfo Is Nothing Then chkOk = True ElseIf = Then chkOk = True End If If chkOk Then If (userCode) Is Nothing _ And (action) Is Nothing Then (Me, userInfo) Else If (action) Is Nothing Then (Me, userInfo) 39。= 舊密碼不正確，請重新輸入！ End If End If End If If = Then