【正文】 \ = 0 MsgBox 數(shù)據(jù)已恢復(fù)完畢！ Else MsgBox 請(qǐng)選擇要恢復(fù)的數(shù)據(jù)！ End If End If End Sub Private Sub Command2_Click() = True Unload Me End Sub 。 BAK Set itmX = (, , key, 1) End If End If End If 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 31 If = True Then 39。 備 份 卡 amp。 Left$(, Len() 3) amp。備份數(shù)據(jù)庫(kù) If 0 Then If Right(, 3) mdb Then MsgBox 數(shù)據(jù)庫(kù)格式不正確，系統(tǒng)無法進(jìn)行備份！ Exit Sub End If Mydatabase = Date amp。 39。 End Sub Private Sub Drive1_Change() = End Sub Private Sub File1_Click() = amp。調(diào)用 Form_Load 過程 = amp。聲明整型變量 Dim Mydatabase Private Sub Form_Load() = 39。Download by Dim itmX, key As String 39。H00FF0000amp。 Height = 210 Left = 135 TabIndex = 11 Top = 105 Width = 3030 End Begin Label1 BackStyle = 0 39。Transparent Caption = ※ 請(qǐng)選擇數(shù)據(jù)備份或數(shù)據(jù)恢復(fù) ForeColor = amp。 Caption = 數(shù)據(jù)備份或數(shù)據(jù)恢復(fù) Height = 420 Left = 1800 Style = 1 39。Graphical TabIndex = 1 Top = 4470 Width = 2175 End Begin Command1 BackColor = amp。 Caption = amp。True _Version = 393217 Icons = ImageList1 SmallIcons = ImageList1 ForeColor = 2147483640 BackColor = 2147483643 BorderStyle = 1 Appearance = 1 NumItems = 0 End End Begin Command2 BackColor = amp。True HideSelection = 1 39。 Caption = 備份卡列表 Height = 3540 Left = 45 TabIndex = 2 Top = 465 Width = 3915 Begin ListView1 Height = 3180 Left = 105 TabIndex = 3 Top = 240 Width = 3690 _ExtentX = 6509 _ExtentY = 5609 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 26 Sorted = 1 39。*.mdb TabIndex = 5 Top = 1380 Width = 3615 End End Begin Frame1 BackColor = amp。H0000C000amp。 Caption = 數(shù)據(jù)備份 Height = 270 Left = 4065 TabIndex = 9 Top = 90 Value = 1 39。 Caption = 數(shù)據(jù)恢復(fù) Height = 270 Left = 5730 TabIndex = 10 Top = 90 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 24 Width = 1935 End Begin Option1 BackColor = amp。所有者中心 Begin Option2 BackColor = amp。False MinButton = 0 39。 Begin main_xtwh_sjbf BorderStyle = 1 39。在此，我再說一次謝謝，謝謝大家?。?！。除了敬佩韓老師的專業(yè)水平外，她的治學(xué)嚴(yán)謹(jǐn)和科學(xué)研究的精神也是我永遠(yuǎn)學(xué)習(xí)的榜樣，并將積極影響我今后的學(xué)習(xí)和工作。韓老師平日里工作繁多，但在我做畢業(yè)設(shè)計(jì)的每個(gè)階段，從查閱資料到設(shè)計(jì)草案的確定和修改，中期檢查，后期詳細(xì)設(shè)計(jì)，裝配草圖等整個(gè)過程中都給予了我悉心的指導(dǎo)。 謝辭 經(jīng)過半年的忙碌和工作，本次畢業(yè)設(shè)計(jì)已經(jīng)接近尾聲，由于經(jīng)驗(yàn)的匱乏，難免有許多考慮不周全的地方，如果沒有導(dǎo)師的督促指導(dǎo)，以及一起工作的同學(xué)們的支持，想要完成這個(gè)設(shè)計(jì)是難以想象的。 圖 58 數(shù)據(jù)備份對(duì)話框 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 21 結(jié)論 這次的圖書管理系統(tǒng)采用的是 Visual 和 access 完成的，雖然以前學(xué)過 Visual Basic 程序設(shè)計(jì)，但是畢竟擱置了這么久，很多的控件的功能和屬性都忘記了，比如說 button，怎么讓 button 顏色變成我自己想要的顏色，來京的時(shí)候我?guī)Я?VB 書，查了下才知道是把它的 style 屬性改下就可以，諸如此類的困難還有很多，其中，我覺得最重要的還是數(shù)據(jù)庫(kù)的設(shè)計(jì)和界面的設(shè)計(jì)，因?yàn)檫@些決定了你的 這個(gè)系統(tǒng)的發(fā)展方向。 圖 54 修改當(dāng)前用 戶密碼的界面 （ 3）添加用戶操作 添加用戶主要是系統(tǒng)管理員在添加使用圖書管理系統(tǒng)的其他的用戶 55 添加用戶界面 點(diǎn)擊確定，用戶添加成功會(huì)出現(xiàn)如下圖 56 所示的對(duì)話框，則剛才輸入的信息會(huì)添加到 database 表中的用戶表中保存起來，方便下次使用。 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 18 圖 52 用戶登錄界面 （ 1）系統(tǒng)運(yùn)行主界面 點(diǎn)擊確定，如果用戶名和密碼都是正確的就會(huì)進(jìn)入如下圖 53 的界面，如果用戶名和密碼有任何一個(gè)不對(duì)，就會(huì)出現(xiàn)提示框，提示是用戶名輸入錯(cuò)誤還是密碼輸入錯(cuò)誤，系統(tǒng)將會(huì)自動(dòng)清空文本框。標(biāo)記當(dāng)前用戶 ID 公共模塊 創(chuàng)建各個(gè)窗體 公共模塊建立之后根據(jù)該圖書管理的需求和我們自身所擁有的知識(shí)建立frmlogin 窗體（登陸窗體），讀者類別（讀者類別管理）、讀者類別查找、讀者信息、讀者信息查找、還書管理、普通用戶管理、數(shù)據(jù)備份、添加用戶、圖書管理系統(tǒng)（系統(tǒng)管理員登陸界面）、圖書借閱、圖書類別管理、圖書信洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 17 息管理、圖書信息瀏覽、圖 書續(xù)借、修改密碼 十八個(gè)窗體，如下圖 51 51 總體窗體圖 把需要的窗體創(chuàng)建完成后，根據(jù)每個(gè)窗體需要實(shí)現(xiàn)的功能添加控件，然后對(duì)界面進(jìn)行設(shè)計(jì)，使其在一定程度上比較美觀，最后是綜合窗體里面的控件和需要實(shí)現(xiàn)的功能來編寫代碼，代碼的編寫可以參考各種資料來實(shí)現(xiàn)其功能。在這個(gè)系統(tǒng)中，每個(gè)功能模塊都要使用數(shù)據(jù)庫(kù)，因此可以使用一個(gè)公用有數(shù)據(jù)操作函數(shù)，來執(zhí)行一系列的 SQL 語(yǔ)句。在這個(gè)實(shí)例中，先刪除這個(gè)窗體，然后選擇“文件”→“保存工程”菜單，在出現(xiàn)的“文件另存為”對(duì)話框中輸入這個(gè)工程項(xiàng)目的名稱“ book” ,并且選擇要保存這個(gè)工程的目錄，單擊“保存”按鈕，保存工程。 建立公共模塊 運(yùn)行 VisualBasic 后，選擇“文件”菜單下的“新建工程”菜單，然后從工程模板中選擇“標(biāo)準(zhǔn) EXE”項(xiàng)，單擊“確定”按鈕。 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 13 讀 者 編 號(hào)書 籍 名 稱借 閱 信 息借 閱 編 號(hào)還 書 日 期讀 者 姓 名借 出 日 期書 籍 編 號(hào) 圖 45 借閱信息實(shí)體及其屬性圖 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 根據(jù)數(shù)據(jù)庫(kù)的需求分析， 讀者類別、讀者信息、借閱信息、書籍信息、圖書類別、用戶表 各字段具體屬性如 41 所示 表 41 讀者類別表 （ book） 字段名 數(shù)據(jù)類型 是否主鍵 是否為空 種類名稱 文本（ 50） 否 否 借書數(shù)量 數(shù)字 否 否 借書期限 數(shù)字 否 否 有限期限 文本（ 30） 否 否 讀者信息表，各字段具體屬性如 42 所示 表 42 讀者信息表 字段名 數(shù)據(jù)類型 是否主鍵 是否為空 讀者姓名 文本（ 10） 否 否 讀者編號(hào) 文本（ 20） 否 否 洛陽(yáng)理工學(xué)院畢業(yè)設(shè)計(jì)（論文） 14 性別 文本（ 4） 否 否 讀者類別 文本（ 20） 否 否 工作單位 文本（ 50） 否 否 家庭住址 文本（ 50） 否 否 電話號(hào)碼 文本（ 15） 否 否 登記日期 日期 /時(shí)間 否 否 已借書數(shù)量 數(shù)字 否 否 借閱信息表 ,各字段具體屬性如 43 所示 表 43 借閱信息表 字段名 數(shù)據(jù)類型 是否主鍵 是否為空 借閱編號(hào) 自動(dòng)編號(hào)（遞增） 否 否 讀者編號(hào) 文本（ 30） 否 否 讀者姓名 文本（ 10） 否 否 書籍編號(hào) 文本（ 20） 否 否 出借日期 日期 /時(shí)間 否 否 還書日期 日期 /時(shí)間 否 否 應(yīng)還日期 日期 /時(shí)間 否 否