【正文】 Not IsDate() Then MsgBox 請(qǐng)按照yyyymmdd格式輸入日期, vbOKOnly + vbExclamation, Exit Sub End If If Not IsDate() Then MsgBox 請(qǐng)按照yyyymmdd格式輸入日期, vbOKOnly + vbExclamation, Exit Sub End Ifsql = select * from 書(shū)籍信息 where 書(shū)籍編號(hào)=39。采用MDI的子程序，所以運(yùn)行后，它出現(xiàn)在主程序的界面下，如圖18所示。　　下面是響應(yīng)“增加用戶”子菜單Click事件，調(diào)出增加用戶窗體代碼?！　ublic conn As New ’ 標(biāo)記連接對(duì)象　　Public userID As String ’ 標(biāo)記當(dāng)前用戶ID　　Public userpow As String ’ 標(biāo)記用戶權(quán)限　　Public find As Boolean ’ 標(biāo)記查詢(xún)　　Public sqlfind As String ’ 查詢(xún)語(yǔ)句　　Public rs_data1 As New 　　Public findok As Boolean　　Public frmdata As Boolean　　Public Const keyenter = 13 ’ enter鍵的ASCII碼　　在主窗體添加完菜單之后，就要為各個(gè)子菜單創(chuàng)建事件處理程序。默認(rèn)情況下名為Module1?！　?chuàng)建公共模塊的步驟如下:　　(1) 在菜單中選擇“工程”→“添加模塊”命令，則出現(xiàn)模塊對(duì)話框，如圖18所示?！D15 用戶登錄子窗體 (5) 添加讀者類(lèi)別如圖16，其控件如表9所示。圖13 增加用戶子窗體表5 增加用戶子窗體控件控 件 類(lèi) 別控件Name控件TextLabelLabel1輸入用戶名Label2輸入密碼Label3確認(rèn)密碼TextBoxText1(空)Text2(空)Text3(空)ComboBoxComb1選擇權(quán)限CommandButtonCommandl確定Command2取消(3) 修改密碼子窗體如圖14所示。表4 圖書(shū)登記子窗體控件控 件 類(lèi) 別控件Name控件TextLabelLabel1編號(hào)Label2書(shū)名Label3類(lèi)型Label4購(gòu)買(mǎi)日期Label5TextBoxText1(空)Text2(空)Text3(空)Text4(空)Text5(空)CommandButtonCommand1Command2ADO DataAdodc1(空)DataGridDataGrid1(空)　　圖書(shū)借閱和圖書(shū)賠償子窗體分別，因?yàn)樗鼈兊目丶c圖書(shū)登記子窗體的雷同，在此不作介紹?！　”? 所有子窗體子 窗 體 名Text圖書(shū)登記frmdengji圖書(shū)借閱frmjieyue增加新用戶frmadduser查詢(xún)輸出frmfind登錄系統(tǒng)frmlogin修改密碼frmchangepwd下面分別給出這些子窗體，以及它們所使用的控件?！　≡谛陆╒isual Basic工程時(shí)自帶的窗體中，將其屬性MIDChild改成True，則這個(gè)窗體成為MID窗體的子窗體。類(lèi)似地創(chuàng)建一些菜單項(xiàng)，如表2所示。　　將“菜單”組件從“工具箱”拖到窗體上。該窗體的一些屬性如表1所示?！　〔藛螒?yīng)用程序中，有5個(gè)菜單選項(xiàng)，每個(gè)選項(xiàng)對(duì)應(yīng)著ER圖的一個(gè)子項(xiàng)目。圖12 圖書(shū)管理系統(tǒng)界面　　這是一個(gè)多文檔界面(MDI)應(yīng)用程序，可以同時(shí)顯示多個(gè)文檔，每個(gè)文檔顯示在各自的窗體中。然后在ODBC對(duì)話框中單擊“確定”按鈕完成ODBC設(shè)置?！　D10創(chuàng)建新數(shù)據(jù)源”對(duì)話框　　選擇Microsoft Access Driver(*.mdb)，單擊“完成”按鈕，出現(xiàn)如圖11對(duì)話框。打開(kāi)控制面板中的“管理工具”→“數(shù)據(jù)源”(ODBC)，出現(xiàn)如圖9所示的對(duì)話框。 amp?！　　D8用ADO連接數(shù)據(jù)庫(kù)　　在程序設(shè)計(jì)的公共模塊中，先定義ADO連接對(duì)象?！　　　　D6 圖書(shū)資料表 圖7 系統(tǒng)管理表　　　　?！　　D5 圖書(shū)借閱表　　圖書(shū)資料表，如圖6所示。圖書(shū)登記表，如圖4所示。　　建立Access 數(shù)據(jù)庫(kù)　　啟動(dòng)Access，如圖3所示。有些情況，如由于數(shù)據(jù)庫(kù)應(yīng)用環(huán)境發(fā)生變化，增加了新的應(yīng)用或新的實(shí)體，取消了某些應(yīng)用，有的實(shí)體與實(shí)體間的聯(lián)系發(fā)生變化，則需要調(diào)整數(shù)據(jù)庫(kù)的模式及內(nèi)模式。 數(shù)據(jù)庫(kù)的重組及重構(gòu)造數(shù)據(jù)庫(kù)運(yùn)行一段時(shí)間后，由于記錄不斷增、刪、改，增添、修改的數(shù)據(jù)不能為空，否則不能保存到數(shù)據(jù)庫(kù)中。 數(shù)據(jù)庫(kù)性能的監(jiān)督、分析和改造利用Microsoft SQL Server2000提供的檢測(cè)系統(tǒng)性能參數(shù)的工具，在數(shù)據(jù)庫(kù)運(yùn)行過(guò)程中，監(jiān)督數(shù)據(jù)進(jìn)行分析，找出改進(jìn)系統(tǒng)性能的方法，并做適當(dāng)調(diào)整。同樣，數(shù)據(jù)庫(kù)的完整性的約束條件也會(huì)變化，需要DBA不斷修正。系統(tǒng)中用戶的密級(jí)改變。2.對(duì)數(shù)據(jù)庫(kù)經(jīng)常性的維護(hù)工作主要包括：1.字段名數(shù)據(jù)類(lèi)型說(shuō)明讀者姓名文本必添字段“是”，允許空字符為“否”讀者編號(hào)文本必添字段“是”，允許空字符為“否”性別文本字段大小2讀者類(lèi)別文本字段大小50工作單位文本字段大小50家庭住址文本字段大小50電話號(hào)碼文本字段大小50登記日期日期/時(shí)間無(wú)已借數(shù)量數(shù)字無(wú)字段名數(shù)據(jù)類(lèi)型說(shuō)明圖書(shū)編號(hào)文本必添字段“是”，允許空字符為“否”書(shū)名文本必添字段“是”，允許空字符為“否”類(lèi)別文本字段大小50作者文本字段大小50出版社文本字段大小50出版日期日期/時(shí)間無(wú)登記日期日期/時(shí)間無(wú)是否借出文本字段大小2字段名數(shù)據(jù)類(lèi)型說(shuō)明類(lèi)別名稱(chēng)文本必添字段“是”，允許空字符為“否”類(lèi)別編號(hào)文本必添字段“是”，允許空字符為“否”圖書(shū)管理信息系統(tǒng)數(shù)據(jù)庫(kù)中各個(gè)表格的設(shè)計(jì)結(jié)果如下面的幾個(gè)表格所示。. 系統(tǒng)邏輯和物理設(shè)計(jì)根據(jù)上面的數(shù)據(jù)庫(kù)ER圖，現(xiàn)在需要將上面的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為SQL Server2000數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。一個(gè)好的全局ER模式，除能準(zhǔn)確、全面地反映用戶功能需求外，還應(yīng)滿足下列條件：實(shí)體類(lèi)型的個(gè)數(shù)要盡可能的少；實(shí)體類(lèi)型所含屬性個(gè)數(shù)盡可能少；實(shí)體類(lèi)型間聯(lián)系無(wú)冗余。3)全局ER模式的優(yōu)化 沖突分為三類(lèi)：屬性沖突、結(jié)構(gòu)沖突、命名沖突。 合并的原則是：首先進(jìn)行兩兩合并；先和合并那些現(xiàn)實(shí)世界中有聯(lián)系的局部結(jié)構(gòu)；合并從公共實(shí)體類(lèi)型開(kāi)始，最后再加入獨(dú)立的局部結(jié)構(gòu)。一般把同名實(shí)體類(lèi)型作為公共實(shí)體類(lèi)型的一類(lèi)候選，把具有相同鍵的實(shí)體類(lèi)型作為公共實(shí)體類(lèi)型的另一類(lèi)候選。 為了給多個(gè)局部ER模式的合并提供開(kāi)始合并的基礎(chǔ)，首先要確定各局部結(jié)構(gòu)中的公共實(shí)體類(lèi)型。全局概念結(jié)構(gòu)不僅要支持所有局部ER模式，而且必須合理地表示一個(gè)完整、一致的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)。還要考察一個(gè)實(shí)體類(lèi)型內(nèi)部是否存在聯(lián)系，兩個(gè)實(shí)體類(lèi)型之間是否存在聯(lián)系，多個(gè)實(shí)體類(lèi)型之間是否存在聯(lián)系，等等。一種完整的方式是對(duì)局部結(jié)構(gòu)中任意兩個(gè)實(shí)體類(lèi)型，依據(jù)需求分析的結(jié)果，考察局部結(jié)構(gòu)中任意兩個(gè)實(shí)體類(lèi)型之間是否存在聯(lián)系。利用ER方法進(jìn)行數(shù)據(jù)庫(kù)的概念設(shè)計(jì)，可分成三步進(jìn)行：首先設(shè)計(jì)局部ER模式，然后把各局部ER模式綜合成一個(gè)全局模式，最后對(duì)全局ER模式進(jìn)行優(yōu)化，得到最終的模式，即概念模式。然后再把概念模式轉(zhuǎn)換成邏輯模式。針對(duì)圖書(shū)管理系統(tǒng)的需求，通過(guò)對(duì)圖書(shū)管理系統(tǒng)流程分析，設(shè)計(jì)此系統(tǒng)需要如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：圖書(shū)信息：包括的數(shù)據(jù)項(xiàng)有：圖書(shū)編號(hào)、書(shū)名、圖書(shū)類(lèi)別、作者出版社、出版日期、登記日期讀者信息：包括的數(shù)據(jù)項(xiàng)有：讀者姓名、編號(hào)、性別、讀者類(lèi)別、工作單位、家庭住址、電話號(hào)碼、登記日期和已借書(shū)數(shù)量圖書(shū)借閱信息：包括的數(shù)據(jù)項(xiàng)有：借閱編號(hào)、讀者編號(hào)、讀者姓名、圖書(shū)編號(hào)、圖書(shū)名稱(chēng)、出借日期和還書(shū)日期。同時(shí)，合理的數(shù)據(jù)庫(kù)結(jié)構(gòu)也將有利于程序的實(shí)現(xiàn)。 數(shù)據(jù)庫(kù)在一個(gè)信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的好壞將直接對(duì)應(yīng)用系統(tǒng)的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。圖書(shū)管理讀者管理圖書(shū)借閱管理系統(tǒng)管理添加管理員修改密碼退出系統(tǒng)圖書(shū)類(lèi)別管理圖書(shū)信息管理讀者信息管理讀者類(lèi)別管理借書(shū)管理還書(shū)管理系統(tǒng)初始設(shè)置一個(gè)超級(jí)用戶名和密碼，操作人員可以利用這個(gè)超級(jí)用戶名和密碼登錄，之后，可以設(shè)置其他的超級(jí)用戶名稱(chēng)，也可以設(shè)置權(quán)限用戶，同時(shí)也設(shè)置了這個(gè)用戶可以使用的權(quán)限。其中，讀者類(lèi)別包括各種類(lèi)名稱(chēng)、借書(shū)期限和有效期限4部分。其中，讀者信息包括讀者姓名、讀者編號(hào)、性別、讀者類(lèi)別、工作單位、家庭住址、電話號(hào)碼、登記日期