數(shù)據(jù)庫(kù)期末作品設(shè)計(jì)報(bào)告.doc

數(shù) 據(jù) 庫(kù) 應(yīng) 用 基 礎(chǔ)作 品 設(shè) 計(jì) 報(bào) 告設(shè) 計(jì) 作 品 題 目： 圖書管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) 學(xué) 院 名 稱： 電子與信息工程學(xué)院 專 業(yè)： 電氣工程及其自動(dòng)化 班 級(jí)： 電氣101 姓 名： 李盛標(biāo) 學(xué) 號(hào) 10401170105 指 導(dǎo) 教 師： 邱雪娜 完成日期： 2013 年 11 月 15 日 引言數(shù)據(jù)庫(kù)技術(shù)，已經(jīng)成為先進(jìn)信息技術(shù)的重要組成部分，是現(xiàn)代計(jì)算機(jī)信息系統(tǒng)和計(jì)算機(jī)應(yīng)用系統(tǒng)的基礎(chǔ)和核心。數(shù)據(jù)庫(kù)從誕生到現(xiàn)在，在不到半個(gè)世紀(jì)的世紀(jì)的時(shí)間里，形成了堅(jiān)實(shí)的理論基礎(chǔ)、成熟的商業(yè)產(chǎn)品和廣泛的應(yīng)用領(lǐng)域，吸引了越來(lái)越多的研究者加入。 數(shù)據(jù)庫(kù)的誕生和發(fā)展給計(jì)算機(jī)信息管理帶來(lái)了一場(chǎng)巨大的革命。 計(jì)算機(jī)技術(shù)不斷地應(yīng)用到各行各業(yè)，大量的企業(yè)把數(shù)據(jù)存放在數(shù)據(jù)庫(kù)中，并且通過(guò)T相關(guān)的代碼語(yǔ)句來(lái)進(jìn)行快速查詢，獲取比傳統(tǒng)方式更高的效率。為了進(jìn)一步加深和鞏固我們所學(xué)的專業(yè)課程PowerBuilder數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù)的基本理論知識(shí)，使我們所學(xué)的理論能夠更好的和實(shí)際的專業(yè)聯(lián)系起來(lái)，進(jìn)一步培養(yǎng)學(xué)生的綜合分析問(wèn)題和解決問(wèn)題的能力。使學(xué)生的得到收集、處理、應(yīng)用資料信息的實(shí)踐訓(xùn)練，同時(shí)全面的考核學(xué)生所掌握的基本理論知識(shí)及其實(shí)際的專業(yè)能力，從而達(dá)到提高學(xué)生素質(zhì)的最終目的。學(xué)校安排了為期一個(gè)星期的實(shí)訓(xùn)課程，在這一個(gè)星期的時(shí)間里，希望學(xué)生能夠利用所學(xué)到的知識(shí)創(chuàng)建一個(gè)圖書館的數(shù)據(jù)系統(tǒng)，來(lái)達(dá)到圖書管理的需要。 2011年5月28日目錄1 數(shù)據(jù)庫(kù)設(shè)計(jì) 3 1.1 需求分析 3 1.2 數(shù)據(jù)庫(kù)設(shè)計(jì)內(nèi)容 3 1.3 概念設(shè)計(jì) 4 1.4 邏輯設(shè)計(jì) 5 1.5 窗口界面設(shè)計(jì)以及控件添加 6 1.6 表的設(shè)計(jì)以及數(shù)據(jù)的添加 92 數(shù)據(jù)庫(kù)編程 10 2.1 數(shù)據(jù)庫(kù)鏈接變成 10 2.2 操作界面代碼 10 2.3 數(shù)據(jù)顯示窗口編程 12 2.4 窗口按鈕編程 16 2.5 圖書類型窗口編程 18 2.6 查找窗口編程 19 2.7 用戶窗口編程 25 2.8圖書信息窗口編程 26 2.9 記錄信息窗口編程 28 2.10 數(shù)據(jù)顯示控件編程 313 實(shí)訓(xùn)心得 331 數(shù)據(jù)庫(kù)設(shè)計(jì)熟悉PowerBuilder數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù)實(shí)訓(xùn)環(huán)境，熟練掌握數(shù)據(jù)庫(kù)、表、窗口界面的設(shè)計(jì)、圖形按鈕的添加、數(shù)據(jù)庫(kù)的鏈接及函數(shù)的創(chuàng)建與應(yīng)用，確立數(shù)據(jù)庫(kù)創(chuàng)建的方向，對(duì)圖書管理系統(tǒng)進(jìn)行分析并設(shè)計(jì)系統(tǒng)實(shí)現(xiàn)需要哪幾張表以及各表結(jié)構(gòu)，確立數(shù)據(jù)庫(kù)創(chuàng)建的要求，優(yōu)化數(shù)據(jù)庫(kù)界面的設(shè)計(jì)。1.1需求分析書籍是人類不可缺少的精神食糧，對(duì)學(xué)校來(lái)說(shuō)，顯得尤為重要。所以圖書館管理系統(tǒng)應(yīng)該是能夠?yàn)樽x者提供充足的信息和快捷的查詢手段的一種方式。但一直以來(lái)人們都是使用傳統(tǒng)的人工方式來(lái)管理圖書，這就給圖書館的管理和圖書信息的查閱帶來(lái)了很大的不便，使得圖書管理的效率低下、保密性差，時(shí)間一長(zhǎng)，還容易造成文件和數(shù)據(jù)的丟失，給查找、更新和維護(hù)帶來(lái)了很大的困難。圖書管理工作繁瑣，借閱頻繁，包含大量的信息數(shù)據(jù)，因此就需要一個(gè)完善的圖書管理系統(tǒng)來(lái)實(shí)現(xiàn)對(duì)這些數(shù)據(jù)的有效管理。從而達(dá)到對(duì)圖書、讀者、員工、借閱信息、查詢進(jìn)行統(tǒng)一管理，滿足各類用戶的需求。隨著計(jì)算機(jī)信息技術(shù)的發(fā)展，數(shù)據(jù)庫(kù)作為信息技術(shù)的一部分也在飛速的發(fā)展著。使用數(shù)據(jù)庫(kù)對(duì)圖書資源進(jìn)行管理具有著手工管理無(wú)法比擬的優(yōu)點(diǎn)，它檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、成本低，所以數(shù)據(jù)庫(kù)成為了圖書館管理最主要的選擇。1.2 數(shù)據(jù)庫(kù)設(shè)計(jì)內(nèi)容利用PowerBuilder開(kāi)發(fā)一個(gè)基于SQL Anywhere數(shù)據(jù)庫(kù)的小型圖書管理系統(tǒng)。該圖書管理系統(tǒng)主要具有如下五個(gè)功能：圖書類型信息的查詢和編輯，圖書信息的查詢和編輯，用戶信息的查詢和編輯，借還書記錄的生成和查詢，指定用戶借還書記錄的查詢。其中前三個(gè)功能是必須實(shí)現(xiàn)的功能，后兩個(gè)功能為選做。此外，可根據(jù)思考題（見(jiàn)群共享中壓縮文件PB0520）中的要求優(yōu)化圖書管理系統(tǒng)的功能，也可自行對(duì)系統(tǒng)進(jìn)行功能的優(yōu)化。1.3 概念設(shè)計(jì)概念設(shè)計(jì)是在需求分析上的,用概念數(shù)據(jù)模型來(lái)表示數(shù)據(jù)以及數(shù)據(jù)之間的相互聯(lián)系,從上述的分析中規(guī)劃處圖書館管理系統(tǒng)的實(shí)體有圖書信息實(shí)體、圖書類型實(shí)體、用戶實(shí)體、借書記錄實(shí)體。用戶表性別用戶編號(hào)用戶姓名 用戶實(shí)體E-R圖類型編號(hào)圖書編號(hào)圖書信息表出版社作者圖書名稱 圖書信息實(shí)體E-R圖圖書類型表類型名稱類型編號(hào) 圖書類型實(shí)體E-R圖借書記錄表記錄編號(hào)圖書編號(hào) 歸還日期用戶編號(hào)借出日期 借書記錄實(shí)體E-R圖1.4 邏輯設(shè)計(jì) 數(shù)據(jù)庫(kù)邏輯設(shè)計(jì)是整個(gè)設(shè)計(jì)的前半段，包括所需的實(shí)體和關(guān)系，實(shí)體規(guī)范化等工作,在圖書館管理系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)中,實(shí)體與實(shí)體之間通過(guò)關(guān)系得到了很好的連接,主要體現(xiàn)在一對(duì)一的關(guān)系、一對(duì)多的關(guān)系、多對(duì)多的關(guān)系。一個(gè)1:n聯(lián)系可以轉(zhuǎn)換為一個(gè)獨(dú)立的關(guān)系模式一個(gè)1:1聯(lián)系可以轉(zhuǎn)換為一個(gè)獨(dú)立的關(guān)系模式一個(gè)n:n聯(lián)系可以轉(zhuǎn)換為一個(gè)獨(dú)立的關(guān)系模式1.5 窗體界面設(shè)計(jì)以及控件的添加 窗口設(shè)計(jì)和控件的添加是數(shù)據(jù)庫(kù)開(kāi)發(fā)必不可少的步驟之一，在圖書館管理系統(tǒng)數(shù)據(jù)庫(kù)中也是如此,圖書館管理系統(tǒng)的窗口設(shè)計(jì)采用的是普通方式和繼承方式并存的方法。如下圖所示： 圖11 登錄窗口 圖1-2 查找窗口 圖1-3 記錄窗口 圖1-4 祖先窗口(數(shù)據(jù)顯示窗口)設(shè)置好祖先窗口后，就要進(jìn)行四個(gè)子孫窗口的設(shè)置分別是：圖書類型窗口、圖書信息窗口、用戶信息窗口、記錄信息窗口。在完成窗口和控件的設(shè)置之后，我們就要對(duì)控件 create datawindow的 dataobject 屬性進(jìn)行設(shè)置，使其與之相關(guān)的表格進(jìn)行關(guān)聯(lián)。 圖1-5操作窗口 圖1-6 系統(tǒng)樹(shù)窗口1.6 表的設(shè)計(jì)以及表中數(shù)據(jù)的添加 在數(shù)據(jù)庫(kù)中表的設(shè)計(jì)以及表中數(shù)據(jù)的添加都是至關(guān)重要的，此次實(shí)訓(xùn)設(shè)計(jì)中的表格以及數(shù)據(jù)如下圖所示： 圖1-7 圖書信息表 圖1-8 借書記錄表 圖1-9 圖書類型表 圖1-10 用戶信息表2 數(shù)據(jù)庫(kù)編程無(wú)論是采用哪種開(kāi)發(fā)工具開(kāi)發(fā)應(yīng)用程序，編寫代碼是必不可少的。編寫代碼的過(guò)程也就是平常所說(shuō)的編程，在 PowerBuilde 中采用的是Powerscript語(yǔ)言，它簡(jiǎn)單易學(xué)，編寫程序的格式比較自由，用Powerscript語(yǔ)言編程能夠更好、更快捷、更方便的創(chuàng)建數(shù)據(jù)庫(kù)，更加準(zhǔn)確的添加數(shù)據(jù)及其實(shí)現(xiàn)數(shù)據(jù)庫(kù)一系列的功能。2.1 數(shù)據(jù)庫(kù)鏈接代碼應(yīng)用對(duì)象的open事件SQLCA.DBMS = ODBCSQLCA.AutoCommit = FalseSQLCA.DBParm=ConnectString=DSN=mybook;UID=caowei;PWD=7077 connect using SQLCA;if SQLCA.SQLCode0 then messagebox(連接失敗,原因:+sqlca.sqlerrtext,stopsign!)halt closeend ifopen(dljm)2.2 操作界面編程(1)界面設(shè)置代碼如下：w_main的closequery事件string wtitle=if not cb_type.enabled then wtitle=圖書類型elseif not cb_book.enabled then wtitle=圖書信息elseif not cb_user.enabled then wtitle=用戶信息elseif not cb_log.enabled then wtitle=借書記錄elseif not cb_query.enabled then wtitle=記錄查詢end ifif wtitle thenmessagebox(系統(tǒng)提示, 請(qǐng)先關(guān)閉【+wtitle+】窗口!,exclamation!) return -1end if(2) 窗口關(guān)閉代碼如下：cb_close的clicked事件close(parent)2.3 數(shù)據(jù)顯示窗口編程(祖先窗口代碼編輯)(1) 數(shù)據(jù)讀取代碼如下所示：dw_base的open事件this.x=w_main.x+w_main.widththis.y=w_main.ythis.tag=this.title/保存窗口的標(biāo)題dw_1.settransobject(SQLCA)/連接事務(wù)對(duì)象dw_1.retrieve()/讀取數(shù)據(jù)dw_1.object.datawindow.readonly=truedw_1.setrowfocusindicator(hand!)/設(shè)置行指示標(biāo)記(2) 函數(shù)設(shè)置代碼如下：1) dw_base的closequery事件string msg=部分?jǐn)?shù)據(jù)被改動(dòng)！是否存盤？if this.titlethis.tag thenchoosecasemessagebox(提示,msg,question!,yesnocancel!,1)case 1cb_save.event clicked()case 2 return 0case 3return 1end chooseend if2) f_checkempty自定義函數(shù)string msgdw_1.setcolumn(col_name)/設(shè)置當(dāng)前列if dw_1.gettext()= thenmsg=+col_title+值不能為空！請(qǐng)修改.messagebox(提示,msg,exclamation!)return -1else return 1end if3) f_resetitem自定義函數(shù)string org_valueinteger i,cols/i為計(jì)數(shù)變量，col存放列總數(shù)long currow/記錄當(dāng)前行currow=dw_1.getrow()/獲得當(dāng)前行的行號(hào)choose case dw_1.getitemstatus(currow,0,primary!) case new!,newmodified!/new表示新插入行，還沒(méi)設(shè)任何值 dw_1.deleterow(0)/直接刪除該行case datamodified!/如果數(shù)據(jù)被修改過(guò)則進(jìn)行恢復(fù)cols=integer(dw_1.object.datawindow.column.count)for i=1 to cols/采用循環(huán)方式恢復(fù)所有數(shù)據(jù)列的值if dw_1.getitemstatus(currow,i,primary!)=datamodified! then org_value=dw_1.getitemstring(currow,i,primary!,true)dw_1.setitem(currow,i,org_value) end ifnextend choose4) f_setstatus自定義函數(shù)long currow /存放當(dāng)前記錄行的行號(hào)f_setstart()dw_1.object.datawindow.readonly=viewmodecb_add.enabled=viewmodecb_del.enabled=viewmodecb_find.enabled=viewmodecb_reload.enabled=viewmodecb_close.enabled=viewmodeif viewmode then /若是瀏覽狀態(tài) cb_edit.text=編輯 cb_save.text=保存 dw_1.tag=/清除數(shù)據(jù)窗口控件保存的當(dāng)前記錄行的行號(hào)else cb_edit.text=取消 cb_save.text=確定 /設(shè)置數(shù)據(jù)窗口控件的初始編輯狀態(tài) currow=dw_1.getrow()/獲得當(dāng)前行的行號(hào) dw_1.tag=string(currow) dw_1.scrolltorow(currow)/滾屏，確保當(dāng)前行可見(jiàn) dw_1.selectrow(currow,false)/去掉加亮 dw_1.setfocus()/將輸入焦點(diǎn)移到數(shù)據(jù)窗口控件中 dw_1.setcolumn(1)/將第一列設(shè)為當(dāng)前列 dw_1.selecttext(1,len(dw_1.gettext()end iff_setend()(5)dw_1的losefocus事件：this.accepttext()/數(shù)據(jù)窗口控件失去輸入焦點(diǎn)時(shí)接收懸浮數(shù)據(jù)dw_1的itemfocuschanged事件long editrow /存放當(dāng)前記錄行的行號(hào)if this.tag then /若為編輯狀態(tài)，見(jiàn)f_setstatus函數(shù)editrow=long(this.tag)/獲得當(dāng)前正在編輯的記錄行號(hào)if editrowrow then/判斷是否是當(dāng)前行號(hào)this.setrow(editrow)/不是則修改當(dāng)前行號(hào)this.scrolltorow(editrow)/讓當(dāng)前行可顯示end ifend if2.4 窗口按鈕編程(1) cb_add(添加)按鈕：long newrownewrow=dw_1.insertrow(0)/插入新行到最后dw_1.setrow(newrow)/將新行設(shè)為當(dāng)前行f_setstatus(false)調(diào)用f_setstatus函數(shù)將窗口設(shè)為編輯狀態(tài)(2) cb_del(刪除)按鈕：string msg=是否刪除當(dāng)前記錄？請(qǐng)確定.dw_1.selectrow(dw_1.getrow(),true)/加亮顯示要?jiǎng)h除的行if messagebox(提示,msg,Question!,YesNo!,2)=1 thendw_1.deleterow(0)/刪除當(dāng)前行elsedw_1.selectrow(dw_1.getrow(),false)/取消行的加亮顯示end if(3) cb_edit(編輯)按鈕：if this.text=編輯 thenf_setstatus(false)/若文本為“編輯”設(shè)為編輯狀態(tài)elsef_setstatus(true)/若文本為“取消”設(shè)為瀏覽狀態(tài)f_resetitem()/恢復(fù)原始數(shù)據(jù)值end if(4) cb_save(保存)按鈕：integer rtnif this.text=保存 thenrtn=dw_1.update()/更新操作if rtn=1 then/更新成功 COMMIT USING SQLCA;/提交語(yǔ)句else/更新失敗ROLLBACK USING SQLCA;/回滾語(yǔ)句end ifparent.title=parent.tag/讓窗口的title恢復(fù)為原始titleend if(5) cb_close(關(guān)閉)按鈕：close(parent)(6)cb_reload(重載)按鈕：dw_1.retrieve()2.5 圖書類型窗口編程(1) w_type窗口的close事件w_main.cb_type.enabled=true(2) cb_save的clicked事件if this.text=確定 then if f_checkempty(id,編號(hào))=-1 then returnif f_checkempty(title,名稱)=-1 then returnf_setstatus(true)/退出編輯狀態(tài)parent.title=parent.tag+(*)/用戶進(jìn)行了編輯且未保存，修end if(3) 主窗口cb_type按鈕的clicked事件：open(w_type)this.enabled=false其執(zhí)行結(jié)果如下圖2-1所示2.6 查找窗口編程(1) w_find窗口的編程：定義shared variables：dw_base pwin/注意祖先窗口名(2) w_find的open事件this.width=3000this.height=1200pwin=parentwindow()choose case pwin.classname()case w_typeddlb_1.additem(“編號(hào)*id”)ddlb_1.additem(“類型 *title)case w_userddlb_1.additem(“編號(hào)*id)ddlb_1.additem(姓名*name)case w_bookddlb_1.additem(編號(hào)*id)ddlb_1.additem(類型*typeid)ddlb_1.additem(書名*title)ddlb_1.additem(作者*author)ddlb_1.additem(出版社*company)case w_logddlb_1.additem(記錄編號(hào)*id)ddlb_1.additem(圖書編號(hào)*bookid)ddlb_1.additem(用戶編號(hào)*userid)ddlb_1.additem(借出日期*borrow)ddlb_1.additem(歸還日期*return)end chooseddlb_1.selectitem(1)ddlb_2.selectitem(1)ddlb_2.enabled=false/按記錄行查找時(shí)禁止選擇查找關(guān)系cb_next.tag=1/存放查找記錄的起始行cb_next.enabled=false/開(kāi)始時(shí)不能操作“下一個(gè)”按鈕sle_1.tag=string(pwin.dw_1.rowcount()/存放總的記錄行數(shù)sle_1.text=sle_1.setfocus()(3) find的deactivate事件if this.width3000 thenthis.width=3000this.height=1200end if(4) find窗口中ddlb_1控件的selectionchanged事件：if index=1 then/若指定按記錄行查找ddlb_2.selectitem(1)/查找關(guān)系默認(rèn)為“=”ddlb_2.enabled=false/禁止選擇查找關(guān)系cb_next.enabled=falseelse/按其他方式查找ddlb_2.enabled=trueend ifsle_1.setfocus()(5) w_find窗口中cb_find按鈕的clicked事件：string msg=,fstr=/fstr用于存放查詢條件文本串integer nbitlong frow /存放查找到的記錄行的行號(hào)pwin.dw_1.selectrow(0,false)/取消之前所有行的加亮顯示if sle_1.text= then msg=查詢目標(biāo)不能為空！請(qǐng)輸入.messagebox(提示,msg,exclamation!)sle_1.setfocus()returnend ifnbit=pos(ddlb_1.text,* fstr=mid(ddlb_1.text,nbit+1) choose case fstrcase row if not isnumber(sle_1.text) or sle_1.text=0 or & long(sle_1.text)long(sle_1.tag) then msg=【記錄行】的范圍是1- + sle_1.tag+ !請(qǐng)修改.messagebox(提示,msg,exclamation!)sle_1.setfocus()returnend if frow=long(sle_1.text)pwin.dw_1.scrolltorow(frow)pwin.dw_1.selectrow(frow,true) parent.width=300parent.height=100cb_close.setfocus()/以便按enter鍵關(guān)閉w_find窗口return/不再執(zhí)行后續(xù)代碼case borrow,return/查找日期型數(shù)據(jù)fstr=string(+fstr+,yy-mm-dd)+ddlb_2.text+sle_1.text+ fstr+=+ddlb_2.text+sle_1.text+ end choose cb_find.tag=fstr/查詢條件保存到cb_find.tagcb_next.tag=1/設(shè)置查詢起始行cb_next.event clicked()(6) cb_find窗口中cb_next按鈕的clicked事件：string fstr,msglong srow,erow,frowfstr=cb_find.tag/獲得查詢條件srow=long(cb_next.tag) erow=long(sle_1.tag) frow=pwin.dw_1.find(fstr,srow,erow)if frow=0 thenmsg=沒(méi)找到滿足條件的記錄！請(qǐng)重新設(shè)置條件.messagebox(提示,msg,exclamation!)cb_find.tag=/清除存放在cb_find.tag中的查找條件即fstrcb_next.tag=1/設(shè)置查詢起始行cb_next.enabled=falsesle_1.setfocus()sle_1.selecttext(1,len(sle_1.text)else/如果找到pwin.dw_1.scrolltorow(frow)/滾屏pwin.dw_1.selectrow(frow,true)cb_next.tag=string(frow+1)cb_next.enabled=true parent.width=300parent.height=100cb_close.setfocus()end if(7) w_find窗口中cb_close的clicked事件close(parent)(8) 在dw_base的查找按鈕(cb_find)的clicked事件中編寫：open(w_find)其運(yùn)行結(jié)果如下圖2-2所示2.7 用戶窗口編程(1) w_user窗口的close事件w_main.cb_user.enabled=true(2) 保存按鈕cb_save的clicked事件if this.text=確定 thenif f_checkempty(id,編號(hào))=-1 then return if f_checkempty(name,姓名)=-1 then return f_setstatus(true)parent.title=parent.tag+(*)end if（3） 在w_main中關(guān)聯(lián)w_user，cb_user按鈕的clicked事件編程：open(w_user)this.enabled=false其運(yùn)行結(jié)果如下圖2-3所示2.8 圖書信息窗口編程(1) w_book窗口的close事件w_main.cb_book.enabled=true(2) 保存按鈕cb_save的clicked事件：if this.text=確定 thenif f_checkempty(id,編號(hào))=-1 then return if f_checkempty(title,書名)=-1 then return if f_checkempty(author,作者)=-1 then return if f_checkempty(company,出版社)=-1 then return f_setstatus(true)parent.title=parent.tag+(*)end if(3) 添加按鈕cb_add的clicked事件代碼long rowstring newidrow=dw_1.getrow() /得到新增行行號(hào)newid=string(row,00000)dw_1.setitem(row,id,newid)/直接設(shè)置列值，id為列名dw_1.setcolumn(2)(4) 在w_main中關(guān)聯(lián)w_book，為cb_book的clicked事件編程：open(w_book)this.enabled=false其運(yùn)行結(jié)果如下圖2-4所示2.9 記錄信息窗口編程(1) w_log窗口的close事件w_main.cb_log.enabled=true(2) 保存按鈕cb_save的clicked事件代碼string fstr,msglong rowif this.text=確定 thenrow=dw_1.getrow()choose case dw_1.getitemstatus(row,0,primary!)case new!,newmodified!if f_checkempty(bookid,圖書編號(hào))=-1 then return if f_checkempty(userid,用戶編號(hào))=-1 then return dw_1.setcolumn(bookid)fstr=bookid=+dw_1.gettext()+and isnull(return)if dw_1.find(fstr,row - 1,1)0 thenmsg=編號(hào)為+dw_1.gettext() + 的圖書借出！請(qǐng)重選. messagebox(提示,msg,exclamation!)returnend ifcase el