【正文】 } } getch。printf(“█ ▓▓▓▓▓▓▓▓▓▓我已閱讀并同意該協(xié)議?（是/否）▓▓▓▓▓▓▓▓▓▓▓▓ ▉n”)。printf(“■┃〓〓〓〓〓〓〓對(duì)不起，你尚未同意該協(xié)議，不能使用該系統(tǒng)〓〓〓〓〓〓〓〓〓┃█n”)。printf(“████████████▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉▉█▉n”)。if(strcmp(ch,ch1)==0)break。chenwenxie4()。system(“cls”)。for(i=0。time()。time()。time()。time()。char choice=3,ch[40],ch1[3]=“是”,cw。void tishi2()。void qingkong4()。void sousuo1(Borr *headborrower)。void paixu(Books *head1,Stus *head2,Borr *head3)。void bianli(Books *head1,Stus *head2,Borr *head3)。int yanzheng2(Borr* head,int num)。int yanzheng(Books* head,int num)。void qingkong2()。void qingkong()。Borr borrowercreat()。Books bookcreat()。Borr* yuyuexie()。Stus* chenwenxie22()。Books* chenwenxie1()。void chenwendu2(Stus *head)。void printborrower(Borr *head)。Books* chenwensousou14(Books* head12,char type[])。Borr* borrowersorting32(Borr *head)。Stus* studentsorting22(Stus *head)。Books* booksorting12(Books *head)。Borr* deleteborrower2(Borr *head,int num)。Stus* deletestudent1(Stus *head,int num)。Borr* chenwensousou34(Borr* head34,int num34)。Borr* chenwensousou32(Borr* head32,int num32)。Stus* chenwensousou23(Stus* head23,int num23)。Stus* chenwensousou21(Stus* head21,int num21)。Books* chenwensousou13(Books* head13,int num13)。Books* chenwensousou11(Books* head11,int num11)。Stus* insertstudent(Stus *head2,Stus *pb)。Stus* buildstudentlist()。Borr* buildborrowerlist()。void fangkuang()。void time()。void chenwenxie4()。struct books *next。int sum。char type[40]。char name[40]。typedef struct books{ struct books *front。struct stus *front。int sum。char name[40]。typedef struct stus{ int numbers。int sum。int stu。struct borrower *front。void youke()。不僅使我們?cè)谝?guī)定時(shí)間內(nèi)完成了系統(tǒng)的設(shè)計(jì)，同時(shí)還使我們學(xué)到了很多有益的知識(shí)和寶貴的經(jīng)驗(yàn)在此，我謹(jǐn)向他們表示最衷心的感謝。我也希望今后還會(huì)有更多的機(jī)會(huì)讓我們?nèi)?shí)踐，去充實(shí)自己。這個(gè)機(jī)會(huì)既讓我們學(xué)習(xí)鞏固了知識(shí)，也讓我們發(fā)現(xiàn)了自己的不足之處。以后自己還要多動(dòng)手編寫一些程序。這次實(shí)驗(yàn)我覺(jué)得自己不僅學(xué)到了很多軟件設(shè)計(jì)方面的知識(shí)，也讓我鞏固了以前所學(xué)的知識(shí)以及看到了自己以前學(xué)習(xí)中的不足之處。通過(guò)這次上機(jī)實(shí)驗(yàn)，我發(fā)現(xiàn)了自己對(duì)數(shù)據(jù)庫(kù)和vb語(yǔ)言掌握的并不牢，有的知識(shí)點(diǎn)根本就不懂。這次是對(duì)我們掌握所學(xué)知識(shí)的一次考核。測(cè)試修改密碼信息的正確性。測(cè)試借書信息查詢的正確性。測(cè)試書籍掛失信息的正確性。 書籍管理測(cè)試進(jìn)度安排：測(cè)試新書入庫(kù)信息的正確性。測(cè)試查詢借閱卡信息的正確性，包括輸入的讀者信息等。刷新新書列表With = adStateClosed .RequeryEnd WithAddListNewCase 1 39。 ”是否要執(zhí)行保存操作？“, vbCritical + vbYesNo, ”圖書典藏管理“)= vbYes Then = 1 = TrueEnd IfEnd IfUnload Me End Sub 39。 ”是否要執(zhí)行保存操作？“, vbCritical + vbYesNo, ”圖書典藏管理“)= vbYes Then = 0 = TrueEnd IfElseIf LstIn(1).ListCount 0 ThenIf MsgBox(”你選定了部分新書準(zhǔn)備入庫(kù)，但沒(méi)執(zhí)行保存操作“ amp。選擇當(dāng)前條碼ListItem_Add lstPre(Index), LstIn(Index), Index, False End Sub Private Sub cmdExit_Click()If LstIn(0).ListCount 0 ThenIf MsgBox(”你選定了部分新書準(zhǔn)備入庫(kù)，但沒(méi)執(zhí)行保存操作“ amp。保存記錄MsgBox ”數(shù)據(jù)保存成功！“, vbInformation, ”圖書征訂管理“ = True: = True = True: = TrueisAdding = False: = TrueEnd If End Sub Dim objcopy As Recordset Private Sub cmbOut_Click()AddListOutEnd Sub Private Sub cmdAddAll_Click(Index As Integer)39。 ”已被使用，請(qǐng)選擇其他編號(hào)！“, vbCritical, ”系統(tǒng)用戶管理“ = 0 = Len(txtNum)Exit SubElse39。 ”“If ThenMsgBox ”編號(hào):“ amp。對(duì)錯(cuò)？With objcopy 0 Then.MoveFirst.Find ”編號(hào)“ amp。 ”不是系統(tǒng)用戶，請(qǐng)檢查輸入！“, vbCritical, ”登錄驗(yàn)證“txtLog(0).SetFocustxtLog(0).SelStart = 0txtLog(0).SelLength = Len(txtLog(0))(”口令“) Trim(txtLog(1))ThenMsgBox ”口令錯(cuò)誤，請(qǐng)檢查輸入口令！“, vbCritical, ”登錄驗(yàn)證“txtLog(1).SetFocus: txtLog(1)= ”“ElseCurrentUserNum =.Fields(編號(hào))CurrentUserPassword =.Fields(”口令“)CurrentUserStatus =.Fields(”權(quán)限“)MsgBox ”歡迎使用常州信息學(xué)院管理系統(tǒng)！“, vbInformation, ”登陸成功！“Unload MeEnd IfEnd If.CloseEnd WithEnd If End Sub Private Sub Form_Load() = RGB(192, 210, 270)End Sub（2）用戶管理窗體界面圖52 用戶管理窗體用戶管理窗體代碼 39。 Trim(txtLog(0))amp。:若添加成功，則輸出提示新書添加成功界面；若沒(méi)有添加成功，輸出提示未成功原因界面。:對(duì)數(shù)據(jù)庫(kù)查詢是否已存在此書，若存在則將此書數(shù)量加一，提示添加成功；若沒(méi)有此書，則將此書的基本信息存入數(shù)據(jù)庫(kù)，并提示添加書籍成功。：輸入書籍ID和借閱IDN數(shù)據(jù)庫(kù)是否打開YN借閱卡ID是否存在YN提示不存在該書籍關(guān)閉數(shù)據(jù)庫(kù)返回提示不存在該借閱者關(guān)閉數(shù)據(jù)庫(kù)返回?cái)?shù)據(jù)庫(kù)連接失敗返回?cái)?shù)據(jù)庫(kù)中是否存在書籍IDY將借閱者的借書數(shù)量減1將書籍的數(shù)量加1提示還書成功關(guān)閉數(shù)據(jù)庫(kù)返回 圖45圖書歸還模塊：此程序用戶對(duì)新進(jìn)圖書的入口登記處理。將借閱者借閱的數(shù)量減一，將數(shù)據(jù)庫(kù)中此書數(shù)量加一，同時(shí)提醒借閱歸還，然后返回。：首先驗(yàn)證借閱者輸入的借閱ID是否存在，若存在進(jìn)行下一步；若不存在則返回。輸入書籍ID和借閱IDN數(shù)據(jù)庫(kù)是否打開YN借閱卡ID是否存在YY判斷借閱ID是否借書超出4本提示超出最大借書數(shù)量關(guān)閉數(shù)據(jù)庫(kù)返回提示不存在該借閱者關(guān)閉數(shù)據(jù)庫(kù)返回?cái)?shù)據(jù)庫(kù)連接失敗返回NN數(shù)據(jù)庫(kù)中是否存在書籍IDY將借閱者的借書數(shù)量加1提示不存在該書籍關(guān)閉數(shù)據(jù)庫(kù)返回將書籍的數(shù)量減1提示借書成功關(guān)閉數(shù)據(jù)庫(kù)返回 圖44圖書借閱模塊：此程序用于圖書的歸還，用戶在登錄自己的ID之后，用戶可以對(duì)需要?dú)w還的圖書進(jìn)行操作，如果符合歸還要求，則可以將圖書歸還。將借閱者借閱的數(shù)量増一，將數(shù)據(jù)庫(kù)中此書數(shù)量減一，同時(shí)提醒借閱成功，然后返回。，則檢查此借閱ID是否借閱書籍超出4本，若超出則提示超出借閱數(shù)目，返回；若沒(méi)有超出，則進(jìn)行下一操作。：實(shí)現(xiàn)對(duì)圖書的書籍借閱功能。：若輸入的圖書存在即輸出圖書詳細(xì)信息界面；若輸入的圖書不存在則顯示圖書不存在界面。：對(duì)進(jìn)行想要查詢的書籍進(jìn)行搜索，若存在此書則顯示該書的詳細(xì)信息；若不存在此書，則提示沒(méi)有此書并返回。用戶通過(guò)輸入相應(yīng)的圖書信息來(lái)查詢，數(shù)據(jù)庫(kù)根據(jù)用戶提供的信息來(lái)搜索，最后給出客戶相應(yīng)的圖書信息。:若添加成功，則輸出提示用戶注冊(cè)成功界面；若未成功，則提示輸出未成功原因界面。:查詢新用戶的用戶名是否存在，若存在則停止添加返還數(shù)據(jù)庫(kù)；若用戶不存在，則進(jìn)行添加，并進(jìn)行注冊(cè)，注冊(cè)成功后返回。流程邏輯如圖所示：輸入用戶名和密碼N數(shù)據(jù)庫(kù)是否打開Y連接失敗返回N用戶名和密碼是否正確Y輸入次數(shù)是否超過(guò)5次YN重新輸入密碼關(guān)閉數(shù)據(jù)庫(kù)返回登陸成功進(jìn)入主界面圖41用戶登錄流程邏輯:此程序用于添加新的用戶，用戶通過(guò)向數(shù)據(jù)庫(kù)內(nèi)輸入必要的信息來(lái)注冊(cè)成為新的用戶，才通過(guò)一系列的驗(yàn)證之后，即注冊(cè)成為真正的用戶。:實(shí)現(xiàn)用戶的登錄功能:用戶通過(guò)輸入用戶ID,用戶名和密碼進(jìn)行用戶登陸，通過(guò)認(rèn)證后，用戶即可進(jìn)入用戶界面。退出功能：各個(gè)功能模塊和主窗體都設(shè)有關(guān)閉命令按鈕，可方便地退出各模 塊或系統(tǒng)。維護(hù)功能：為普通管理員提供查詢及相應(yīng)的修改，刪除功能，為高級(jí)管理提 供對(duì)所有信息的修改刪除功能。錄入功能：為普通管理員提供相應(yīng)的錄入功能，為高級(jí)管理員提供對(duì)所有信息的錄入功能。（2）系統(tǒng)功能分析權(quán)限功能：權(quán)限功能設(shè)置的對(duì)象為高級(jí)管理員、普通管理員、讀者。系統(tǒng)用戶管理：包括系統(tǒng)用戶數(shù)據(jù)的錄入、修改與刪除等功能。圖書典藏：包括新書分配、庫(kù)室調(diào)配等功能。 系統(tǒng)模塊功能解析（1）系統(tǒng)設(shè)計(jì)分析本圖書管理系統(tǒng)主要有以下功能: 圖書征訂：包括圖書征訂數(shù)據(jù)的錄入、修改、刪除與審校等功能。然后根據(jù)系統(tǒng)功能分析設(shè)計(jì)出需要的數(shù)據(jù)庫(kù)，繪制系統(tǒng)數(shù)據(jù)流圖與總結(jié)數(shù)據(jù)字典、設(shè)計(jì)數(shù)據(jù)庫(kù)結(jié)構(gòu)。圖書管理系統(tǒng)使用的是SQL Server2000的數(shù)據(jù)管理系統(tǒng)和以Visual 。功能分析之后，再根據(jù)各個(gè)崗位、各個(gè)用戶對(duì)數(shù)據(jù)和使用權(quán)限的不同要求作出局部ER圖，然后再把各個(gè)局部ER圖綜合起來(lái)形成統(tǒng)一的整體ER圖。概念設(shè)計(jì)階段主要任務(wù)和目標(biāo)是根據(jù)需求分析的結(jié)果，包括一般聯(lián)系實(shí)體，畫出對(duì)應(yīng)的ER圖。數(shù)據(jù)輸出部分：主要是各種統(tǒng)計(jì)查詢，包括：根據(jù)圖書信息（如書名、作者、出版社等）查閱圖書及其借閱信息、統(tǒng)計(jì)輸出圖書類型比例等。提供較為完善的差錯(cuò)控制與友好的用戶界面，盡量避免誤操作。提供舊書銷毀功能，對(duì)于淘汰、損壞、丟失的書目可及時(shí)對(duì)數(shù)據(jù)庫(kù)進(jìn)行修改。提供統(tǒng)計(jì)分析功能。提供方便的查詢方法。能夠?qū)D書進(jìn)行注冊(cè)登記，也就是將圖書的基本信息（如：書名、作者、價(jià)格等）預(yù)先存入數(shù)據(jù)庫(kù)中，供以后檢索。退出功能:系統(tǒng)管理員每次離開必須進(jìn)行退出功能，確保管理功能不被他人所用，這樣更方便圖書管理系統(tǒng)出現(xiàn)問(wèn)題時(shí)，找到責(zé)任人。系統(tǒng)管理員每次登陸前輸入自己的ID與密碼，系統(tǒng)對(duì)其信息進(jìn)行核實(shí)，如基本信息正確，則系統(tǒng)管理員可進(jìn)行系統(tǒng)管理功能，若系統(tǒng)檢查不正確，則系統(tǒng)管理員不可以進(jìn)行相應(yīng)的操作。對(duì)管理員進(jìn)行注冊(cè)，系統(tǒng)生成相應(yīng)信息。讀者獲得新的圖書借閱卡。若讀者需重新辦理，則重新填寫相關(guān)信息，系統(tǒng)自動(dòng)生成心的借閱卡信息記錄，讀者重新設(shè)置帳號(hào)即密碼，并交納相應(yīng)的費(fèi)用。借閱卡掛失的一般步驟可分為：讀者將掛失情況即時(shí)到圖書管理員處進(jìn)行登記，并填寫登記單。如果讀者的信息不正確，系統(tǒng)將提示錯(cuò)誤，并且系統(tǒng)設(shè)定，當(dāng)錯(cuò)誤次數(shù)超過(guò)5次時(shí)，系統(tǒng)將不予查詢。讀者要進(jìn)行信息查詢，可以通過(guò)系統(tǒng)將自己的借閱卡賬戶、密碼輸入系統(tǒng)，系統(tǒng)通過(guò)核對(duì)找到讀者的信息。借閱卡信息查詢。讀者在辦理借閱卡時(shí)，必須輸入個(gè)人有關(guān)注冊(cè)信息，包括讀者姓名、性別、出生日期、家庭住址、身份證號(hào)碼、電話號(hào)碼等信息。辦理借閱卡:圖書館向讀者提供借閱服務(wù)，讀者必須具有有效憑證方可借閱。圖書管理員將信息記入借閱卡。進(jìn)行書籍掛失的步驟一般如下：讀者將所丟圖書信息告訴圖書管理員并將借閱卡交給圖書管理員。讀者逾期未歸還圖書超過(guò)三天，將按照每本每天進(jìn)行一定的罰款。圖書管理員進(jìn)行登記，同時(shí)把還書信息記入借閱卡。圖書管理員對(duì)圖書進(jìn)行檢查，看有無(wú)損壞，如果出現(xiàn)圖書的損壞情況，讀者應(yīng)進(jìn)行相應(yīng)的賠償。當(dāng)借閱圖書的數(shù)量超過(guò)5本或者出現(xiàn)未按期歸還圖書的情況，則不好進(jìn)行借閱處理。具體的步驟如下：讀者向圖書管理員提交請(qǐng)求和圖書借閱卡,圖書管理員檢查讀者提供的借閱卡，如果該借閱證真實(shí)準(zhǔn)確，讀者已經(jīng)借閱的圖書并沒(méi)有超過(guò)允許借書量，而且讀者沒(méi)有逾期