數(shù)據(jù)庫(kù)的基本應(yīng)用

第11章數(shù)據(jù)庫(kù)的基本應(yīng)用第11章數(shù)據(jù)庫(kù)的基本應(yīng)用11.1數(shù)據(jù)庫(kù)概述1

11.2VisualBasic的數(shù)據(jù)訪問技術(shù)211.3通過數(shù)據(jù)管理器訪問數(shù)據(jù)庫(kù)311.4使用DAO訪問數(shù)據(jù)庫(kù)

4第11章數(shù)據(jù)庫(kù)的基本應(yīng)用11.5使用ADO訪問數(shù)據(jù)庫(kù)511.6數(shù)據(jù)環(huán)境設(shè)計(jì)器611.7數(shù)據(jù)報(bào)表的制作711.8綜合實(shí)例811.1.1數(shù)據(jù)庫(kù)基本概念1.數(shù)據(jù)庫(kù)系統(tǒng)的組成數(shù)據(jù)庫(kù)是信息時(shí)代的產(chǎn)物，是大量信息管理和處理的必須。人們通過數(shù)據(jù)庫(kù)可以方便地使用、查找所需要的信息。一個(gè)完整的數(shù)據(jù)庫(kù)系統(tǒng)(DataBaseSystem，簡(jiǎn)稱DBS)由數(shù)據(jù)庫(kù)(DataBase)、數(shù)據(jù)庫(kù)管理系統(tǒng)(DataBaseManagementSystem，DBMS)、數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)、數(shù)據(jù)庫(kù)管理員(DataBaseAdministrator,簡(jiǎn)稱DBA)以及用戶組成。數(shù)據(jù)庫(kù)(DB)數(shù)據(jù)庫(kù)管理系統(tǒng)(DBMS)數(shù)據(jù)庫(kù)應(yīng)用程序數(shù)據(jù)庫(kù)系統(tǒng)11.1數(shù)據(jù)庫(kù)概述12.數(shù)據(jù)庫(kù)的分類:按照數(shù)據(jù)的組織形式可以將數(shù)據(jù)庫(kù)分為層次型、網(wǎng)狀型以及關(guān)系型結(jié)構(gòu)。其中最常見的是關(guān)系型數(shù)據(jù)庫(kù)。3.關(guān)系數(shù)據(jù)庫(kù)的基本概念關(guān)系(表)記錄(行)字段(列)主鍵索引數(shù)據(jù)庫(kù)11.1數(shù)據(jù)庫(kù)概述1學(xué)號(hào)姓名性別編號(hào)(外鍵)2008011001張三12008021002王五2性別名性別編號(hào)(主鍵)男1女211.1.2SQL數(shù)據(jù)查詢SQL是StructuredQueryLanguage(結(jié)構(gòu)化查詢語言)的縮寫，是最重要的關(guān)系數(shù)據(jù)庫(kù)操作語言。1986年ANSI和ISO頒布了SQL正式標(biāo)準(zhǔn)，確認(rèn)SQL為數(shù)據(jù)庫(kù)操作的標(biāo)準(zhǔn)語言。SQL語言基本上獨(dú)立于具體的數(shù)據(jù)庫(kù)，獨(dú)立于所使用的計(jì)算機(jī)、網(wǎng)絡(luò)與操作系統(tǒng)。不同的DBMS對(duì)SQL語言的支持與標(biāo)準(zhǔn)的ANSISQL有些細(xì)微的不同。SQL的功能包括查詢、操作、定義和控制4個(gè)方面，其核心功能的命令動(dòng)詞如表所示。

11.1數(shù)據(jù)庫(kù)概述1SQL功能命令動(dòng)詞數(shù)據(jù)定義Create，Alter，Drop數(shù)據(jù)操縱Insert，Update，Delete數(shù)據(jù)控制Grant，Revoke數(shù)據(jù)查詢Select（1）CreateTable語句格式：CreateTable<表名>[(<列名>類型[<長(zhǎng)度>][notnull][<primarykey>]

[,<列名>類型[<長(zhǎng)度>][notnull][<primarykey>]

……])功能：創(chuàng)建一個(gè)新表。示例：CreateTable性別表(性別名Integernotnullprimarykey,性別編號(hào)char(10))（2）AlterTable語句格式：AlterTable<表名>（Add<列名>類型,或者dropcolumn<列名>）功能：修改表結(jié)構(gòu)。示例：AlterTable性別表add說明char(15)

AlterTable性別表dropcolumn說明11.1數(shù)據(jù)庫(kù)概述1（3）DropTable語句格式：DropTable<表名>功能：刪除表。示例：DropTable性別表（4）Insert語句格式：InsertInto<表名>[(<列名>[,<列名>]……)]Values(<常量>[,<常量>]……)功能：添加新的記錄到表中。示例：InsertInto性別表(性別名，

性別編號(hào))Values(１,”女”)11.1數(shù)據(jù)庫(kù)概述1（5）Update語句格式：Update表名Set<列名>=<表達(dá)式>[,<列名>=<表達(dá)式>]……[Where<條件>]功能：對(duì)合乎條件的記錄，改變其中一個(gè)或多個(gè)字段(列)值。示例：Update性別表Set性別名=”男”

Where性別編號(hào)=1（6）Delete語句格式：DeleteFrom<表名>[Where<條件>]功能：刪除表中記錄。若無Where子句則刪除表中全部數(shù)據(jù)但表仍存在。示例：DeleteFrom性別表Where性別編號(hào)=111.1數(shù)據(jù)庫(kù)概述1（7）Select語句格式：Select[Distinct]<字段名表>From<表名>[,<表名>][Where<條件表達(dá)式>][GroupBy<字段名>[Having<條件表達(dá)式>]][OrderBy<字段名>[Asc/Desc]]功能：在數(shù)據(jù)表中進(jìn)行數(shù)據(jù)檢索。各分句作用說明：

11.1數(shù)據(jù)庫(kù)概述1子句作用Select指定要查看的字段From指定要從中檢索的表Where指定選擇的標(biāo)準(zhǔn)GroupBy把所選擇的記錄分組Having分組的提取條件OrderBy指定查詢所得記錄的排序方式示例1：顯示學(xué)生的學(xué)號(hào)，姓名，性別，并且按照性別排序。Select學(xué)號(hào)，姓名，性別名稱From學(xué)生表,性別表Where學(xué)生表.性別編號(hào)=性別表.性別編號(hào)Orderby性別編號(hào)示例2：計(jì)算學(xué)生表中男生和女生人數(shù)，并輸出女生的人數(shù)。

SelectCount(*)

as學(xué)生人數(shù)From學(xué)生表,性別表

Where學(xué)生表.性別編號(hào)=性別表.性別編號(hào)ＧroupBy性別表.性別編號(hào)Having性別編號(hào)=211.1數(shù)據(jù)庫(kù)概述1在VisualBasic中數(shù)據(jù)訪問的過程主要分為三個(gè)階段，首先通過數(shù)據(jù)庫(kù)訪問組件通過數(shù)據(jù)訪問接口連接數(shù)據(jù)庫(kù)，然后在窗體中將窗體控件與數(shù)據(jù)庫(kù)的訪問組件相連，最后，窗體控件通過數(shù)據(jù)庫(kù)訪問組件提供的方法或者對(duì)從數(shù)據(jù)庫(kù)訪問組件中返回的數(shù)據(jù)集進(jìn)行處理，并返回給數(shù)據(jù)庫(kù)庫(kù)組件，以實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)數(shù)據(jù)的處理。ＶisualBasic擁有豐富多樣的數(shù)據(jù)處理方式，為每種類型的數(shù)據(jù)庫(kù)訪問技術(shù)都提供了相應(yīng)的數(shù)據(jù)訪問接口，各種數(shù)據(jù)庫(kù)訪問組件如何通過不同的數(shù)據(jù)訪問接口連接數(shù)據(jù)庫(kù)，將在以下的小節(jié)分別詳細(xì)介紹。以下章節(jié)主要介紹四種數(shù)據(jù)訪問方式：11.3通過數(shù)據(jù)管理器訪問數(shù)據(jù)庫(kù)11.4使用DAO訪問數(shù)據(jù)庫(kù)11.5使用ADO訪問數(shù)據(jù)庫(kù)11.6數(shù)據(jù)環(huán)境設(shè)計(jì)器

11.2VisualBasic的數(shù)據(jù)訪問技術(shù)2在VB中自帶一些“自動(dòng)編程”的工具，其中就有一個(gè)名叫“數(shù)據(jù)管理器(DataManager”的應(yīng)用程序-Visdata.exe，它是基于DAO數(shù)據(jù)訪問對(duì)象模型設(shè)計(jì)的，可在VB開發(fā)環(huán)境中啟動(dòng)，也可以獨(dú)立運(yùn)行。凡是和VisualBasic有關(guān)的數(shù)據(jù)庫(kù)的基本操作，例如數(shù)據(jù)庫(kù)結(jié)構(gòu)的建立、記錄的添加和修改都可以利用這個(gè)工具完成。在VB的專業(yè)版中提供了這個(gè)程序的源程序，它的工程文件名是VISDATA.VBP。與VB同時(shí)發(fā)行的還有一個(gè)基于ADO的插件，名叫“數(shù)據(jù)窗體模版”(DFW，DataFormWinzard)，使用這個(gè)插件，用戶只需選擇一個(gè)數(shù)據(jù)庫(kù)和一個(gè)數(shù)據(jù)表，DFW就可以自動(dòng)生成對(duì)此數(shù)據(jù)表進(jìn)行增、刪、改和瀏覽的窗體。使用可視化數(shù)據(jù)管理器建立數(shù)據(jù)庫(kù)的過程分為3步：第一步建立數(shù)據(jù)庫(kù)結(jié)構(gòu)；第二步添加表到數(shù)據(jù)庫(kù)中；第三步向表中輸入數(shù)據(jù)。11.3通過數(shù)據(jù)管理器訪問數(shù)據(jù)庫(kù)3例11?1通過可視化數(shù)據(jù)管理器創(chuàng)建一個(gè)名稱為“選課”的Access的數(shù)據(jù)庫(kù)，其中包含一個(gè)“性別表”的表格。表格的結(jié)構(gòu)見表11?3，數(shù)據(jù)見表11?4。11.3通過數(shù)據(jù)管理器訪問數(shù)據(jù)庫(kù)3表11?3性別表結(jié)構(gòu)字段名稱數(shù)據(jù)類型性別編號(hào)INT性別名稱Text(10)表11?4性別表數(shù)據(jù)性別編號(hào)性別名稱1男2女11.4.1DAO對(duì)象模型使用數(shù)據(jù)訪問對(duì)象編程包括兩個(gè)部分：一是創(chuàng)建對(duì)象變量，二是通過設(shè)置對(duì)象的屬性，調(diào)用對(duì)象的方法來操作它們。1．DAO對(duì)象的創(chuàng)建2．DAO數(shù)據(jù)訪問對(duì)象的常用方法（1）SetDataBase方法功能：以指定的方式打開數(shù)據(jù)庫(kù)。格式：Set數(shù)據(jù)庫(kù)=工作區(qū)..OpenDataBase(數(shù)據(jù)庫(kù)名,打開方式，讀寫方式，連接方式)（2）SetRecordset方法功能：從數(shù)據(jù)庫(kù)中讀取數(shù)據(jù)賦給指定記錄。格式：SetRecordset=數(shù)據(jù)庫(kù)名(表文件名，打開方式，表字段類型，鎖定字段列表)（3）MoveFirst、MovePrevious、MoveNext、MoveLast、AddNew、Delete、BOF、EOF與Data控件方法相同。11.4使用DAO訪問數(shù)據(jù)庫(kù)

411.4.2Data控件Data控件是VisualBasic的標(biāo)準(zhǔn)控件之一，可以直接從工具箱中加入窗體，在工具箱中的圖標(biāo)為。1.數(shù)據(jù)控件的常用屬性（1）Connect：指定Data控件所連接的數(shù)據(jù)庫(kù)類型，默認(rèn)的屬性值是Access。（2）DatabaseName：選擇要訪問的數(shù)據(jù)庫(kù)文件。（3）RecordSource：確定要訪問的數(shù)據(jù)源。11.4使用DAO訪問數(shù)據(jù)庫(kù)

4

例11?2利用Data控件連接Access數(shù)據(jù)庫(kù)，假設(shè)數(shù)據(jù)庫(kù)為“選課.mdb”存放在C盤根目錄，其中包含一個(gè)表為“專業(yè)表”。Data1.Connect=”Access”Data1.DataBaseName=”c:\選課.mdb”Data1.RecordSource=”專業(yè)表”或者Data1.Connect=”Access”Data1.DataBaseName=”c:\選課.mdb”Data1.RecordSource=“Select*from專業(yè)表where專業(yè)=‘計(jì)算機(jī)’”

11.4使用DAO訪問數(shù)據(jù)庫(kù)

4例11?3利用連接Foxpro數(shù)據(jù)庫(kù)，假設(shè)Foxpro數(shù)據(jù)庫(kù)文件存放在“d:\fox”目錄下。表文件為“學(xué)生.dbf”。

Data1.Connect=”FoxPro3.0;”Data1.databaseName=”c:\fox”Data1.RecordSource=”選課.dbf”

（4）RecordSetType：設(shè)置記錄集類型，包括表類型記錄集、動(dòng)態(tài)類型記錄集、快照類型記錄集3種。（5）ReadOnly：設(shè)置是否可以修改數(shù)據(jù)庫(kù)中的數(shù)據(jù)。（6）Exclusive：該屬性用于控制被打開的數(shù)據(jù)庫(kù)是否允許與其他應(yīng)用程序共享。（7）BOFAction和EOFAction屬性:當(dāng)記錄指針指向RecordSet對(duì)象的開始(第一條記錄)或結(jié)束(最后一條記錄)時(shí)，數(shù)據(jù)控件要采取的操作。11.4使用DAO訪問數(shù)據(jù)庫(kù)

42.數(shù)據(jù)控件的常用事件(1)Reposition事件：當(dāng)記錄集指針從一條記錄移動(dòng)到另一條記錄時(shí)，將發(fā)生重定位事件。因而利用該事件，用戶可以對(duì)當(dāng)前記錄進(jìn)行處理。(2)Validate事件：當(dāng)要移動(dòng)記錄指針前，修改與刪除記錄前或卸載含有數(shù)據(jù)控件的窗體時(shí)觸發(fā)3.數(shù)據(jù)控件的常用方法(1)Refresh方法：用于“刷新”Data控件的屬性設(shè)置。例如，重新設(shè)置了控件的Connect、DatabaseName、RecordSource、ReadOnly等屬性值后，必須調(diào)用Refresh方法使所作的更改生效。(2)UpdateRecord方法：可以將數(shù)據(jù)從數(shù)據(jù)庫(kù)中重新讀到被數(shù)據(jù)控件綁定的控件內(nèi)。(3)UpdateControls方法：可以強(qiáng)制數(shù)據(jù)控件將綁定控件內(nèi)的數(shù)據(jù)寫入數(shù)據(jù)庫(kù)中而不再觸發(fā)Validate事件。在代碼中用該方法確認(rèn)修改。11.4使用DAO訪問數(shù)據(jù)庫(kù)

411.4.3RecordSet對(duì)象的屬性和方法數(shù)據(jù)綁定控件連接好數(shù)據(jù)庫(kù)，可以對(duì)表中的記錄進(jìn)行操作，對(duì)數(shù)據(jù)庫(kù)的操作主要包括增加、修改和刪除記錄，這些都要通過記錄集對(duì)象來完成。記錄集是一種訪問數(shù)據(jù)庫(kù)的工具?？梢詫⒁粋€(gè)或幾個(gè)表中的記錄構(gòu)成記錄集(和表類似)，用戶可以根據(jù)需要通過使用記錄集對(duì)象選擇數(shù)據(jù)。1．記錄集類型的屬性RecordSetType有3種取值：0-表類型(Table)1-動(dòng)態(tài)類型(Dynaset)2-和快照(Snapshot)11.4使用DAO訪問數(shù)據(jù)庫(kù)

4屬性名稱含義AbsolutePosition返回當(dāng)前指針值，如果是第1條記錄，其值為０BOF判斷是否在首記錄之前。EOF判斷是否在末記錄之后。NoMatch如果未找到相匹配的記錄，則為True否則為FalseRecordCount返回記錄集的記錄總數(shù)3．Fields屬性Fields.Count：返回記錄集中的字段個(gè)數(shù)。例如：Data1.Recordset.Fields.CountFields(Item).子屬性:子屬性Value返回指定字段的值，Name返回指定字段的名稱，Size返回指定字段的長(zhǎng)度，Type返回指定字段的類型代碼。例如

Data1.Recordset.Fields("院系名稱").Value

Data1.Recordset.Fields(0).Value

11.4使用DAO訪問數(shù)據(jù)庫(kù)

42．記錄集屬性4．記錄集方法（1）Move方法組：數(shù)據(jù)控件.記錄集.Move方法（2）Find方法組：數(shù)據(jù)控件.記錄集.Find方法（3）Seek方法組:數(shù)據(jù)控件.記錄集.seek比較式,Key1,Key2……（4）數(shù)據(jù)記錄的維護(hù)：數(shù)據(jù)控件.記錄集.方法名方法名稱含義MoveFirst將記錄集指針移動(dòng)到第一條記錄MovePrevious將記錄集指針移動(dòng)到上一條記錄MoveNext移動(dòng)記錄集指針到下一條記錄MoveLast移動(dòng)記錄集指針到最后一條記錄11.4使用DAO訪問數(shù)據(jù)庫(kù)

411.4使用DAO訪問數(shù)據(jù)庫(kù)

4方法名稱含義FindFirst查詢符合條件的第一條記錄FindLast查詢符合條件的最后一條記錄FindNext查詢符合條件的下一條記錄FindPrevious查詢符合條件的前一條記錄方法名稱含義Open打開記錄集AddNew向記錄集增加一條新記錄Edit對(duì)記錄集進(jìn)行編輯，修改完后要用Update更新Update如果增加或修改記錄后，必須用此方法更新,將緩沖區(qū)里的內(nèi)容寫入數(shù)據(jù)庫(kù)CancelUpdate緩沖區(qū)的內(nèi)容不寫入數(shù)據(jù)庫(kù)Delete從記錄集中將當(dāng)前記錄刪除，在刪除后移動(dòng)記錄指針，操作不可恢復(fù)Close關(guān)閉Recordset對(duì)象以便釋放所有關(guān)聯(lián)的系統(tǒng)資源。11.4.4數(shù)據(jù)綁定控件數(shù)據(jù)庫(kù)連接組件不能在窗體中顯示數(shù)據(jù)，為了將數(shù)據(jù)顯示在窗體中，還需與應(yīng)用程序中的數(shù)據(jù)綁定控件相連接，從而實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)的操作。所謂數(shù)據(jù)綁定控件是一些能夠和數(shù)據(jù)庫(kù)中的數(shù)據(jù)表的某個(gè)字段建立關(guān)聯(lián)的控件。以下列表是本書所介紹的可作為數(shù)據(jù)綁定控件的常用控件（左）和Active控件（右）。TextBox文本框控件Label標(biāo)簽控件ListBox列表框控件ComboBox組和框控件CheckBox復(fù)選框控件PictureBox圖片框控件Image圖像控件OLE容器控件11.4使用DAO訪問數(shù)據(jù)庫(kù)

4DBGrid數(shù)據(jù)庫(kù)表格控件DBList數(shù)據(jù)庫(kù)列表控件DBCombo數(shù)據(jù)庫(kù)組合控件DataGrid數(shù)據(jù)表格控件DataList數(shù)據(jù)列表控件DataCombo數(shù)據(jù)組合控件MSFlexGrid數(shù)據(jù)庫(kù)表格控件11.4.5Data控件示例例11?4在“選課”數(shù)據(jù)庫(kù)中創(chuàng)建“院系表”，并創(chuàng)建一個(gè)窗體實(shí)現(xiàn)對(duì)院系表數(shù)據(jù)的維護(hù)，包括實(shí)現(xiàn)數(shù)據(jù)移動(dòng)(首條、上一條、下一條、末條)，數(shù)據(jù)維護(hù)(增加、編輯、刪除)以及結(jié)束程序的功能。設(shè)計(jì)窗體如圖11?15所示，運(yùn)行窗口如圖11?16所示。11.4使用DAO訪問數(shù)據(jù)庫(kù)

4ActiveX數(shù)據(jù)對(duì)象(ActiveXDataObject,

ADO)提供了更加簡(jiǎn)明的數(shù)據(jù)訪問對(duì)象模型，是一種建立在被稱為OLEDB的數(shù)據(jù)訪問接口之上的高性能的、統(tǒng)一的數(shù)據(jù)訪問對(duì)象，能夠處理任何類型的本地或遠(yuǎn)程數(shù)據(jù)。ADO技術(shù)在VB數(shù)據(jù)庫(kù)程序中獲得了廣泛的應(yīng)用。11.5使用ADO訪問數(shù)據(jù)庫(kù)511.5.1ADO對(duì)象模型ADO采用了OLEDB的數(shù)據(jù)訪問模式。它是數(shù)據(jù)訪問對(duì)象(DAO)、遠(yuǎn)程數(shù)據(jù)對(duì)象(RDO)和開放數(shù)據(jù)庫(kù)互聯(lián)(ODBC)三種方式的擴(kuò)展。不論是存取本地的還是遠(yuǎn)程的數(shù)據(jù)，ADO都提供統(tǒng)一接口。ADO定義的可編程的分層對(duì)象集合包括Command對(duì)象：包含關(guān)于某個(gè)命令，例如查詢字符串、參數(shù)定義等的信息。Connection對(duì)象：包含關(guān)于某個(gè)數(shù)據(jù)庫(kù)提供程序的信息Error對(duì)象：包含數(shù)據(jù)提供程序出錯(cuò)時(shí)的擴(kuò)展信息。Field對(duì)象：包含記錄集中數(shù)據(jù)的某個(gè)單列的信息。Parameter對(duì)象：包含參數(shù)化的Command對(duì)象的某個(gè)參數(shù)的信息。Property對(duì)象：包含某個(gè)ADO對(duì)象的提供程序定義的特征Recordset對(duì)象：包含某個(gè)查詢返回的記錄。11.5使用ADO訪問數(shù)據(jù)庫(kù)511.5.2ADO數(shù)據(jù)控件ADOData控件是ActiveX數(shù)據(jù)對(duì)象。由于ADOData控件不是VisualBasic的內(nèi)部控件，因此在使用之前必須將其添加到控件箱中去。在控件箱上添加“MicrosoftADODataControl6.0(OLEDB)”項(xiàng)。

屬性說明ConnectionString設(shè)置或返回字符串值，用來建立到數(shù)據(jù)源的連接信息。該字符串有一系列”argument=value”形式的參數(shù)構(gòu)成，參數(shù)說明如下：Provider=[數(shù)據(jù)源驅(qū)動(dòng)]DataSource=[數(shù)據(jù)源名稱(含路徑)]RemoteProvider=[打開客戶端連接時(shí)使用的數(shù)據(jù)源驅(qū)動(dòng)]RemoteServer=[服務(wù)器的路徑名稱]CommandType設(shè)置或返回整常數(shù)，指出命令類型。常數(shù)及其意義如下。1—AdCmdTxt命令文本內(nèi)容為SQL語句2—AdCmdTable命令文本內(nèi)容為表名3—AdCmdStoreProc命令文本內(nèi)容為存儲(chǔ)過程名4—AdCmdUnknow命令文本內(nèi)容類型未知RecordSource指定記錄集的一個(gè)字符串表達(dá)式。EOFAction記錄集事件，同上一節(jié)的Data控件的同名屬性。11.5使用ADO訪問數(shù)據(jù)庫(kù)511.5.3ADO控件示例例11?5在“選課”數(shù)據(jù)庫(kù)中創(chuàng)建“課程表”，為“課程表”編寫維護(hù)界面，能夠?qū)崿F(xiàn)“課程表”數(shù)據(jù)的瀏覽(首條、上一條、下一條、末條)和編輯(添加、修改、刪除、退出)，設(shè)計(jì)窗體和運(yùn)行窗口如圖所示。11.5使用ADO訪問數(shù)據(jù)庫(kù)511.5.4數(shù)據(jù)窗體向?qū)В謎sualBasic提供的數(shù)據(jù)窗體向