Visual Basic程序設(shè)計(jì)簡(jiǎn)明教程（第二版）課件：數(shù)據(jù)庫(kù)應(yīng)用

2024/11/111數(shù)據(jù)庫(kù)應(yīng)用

概述

數(shù)據(jù)管理器

ADO控件數(shù)據(jù)控件程序舉例2024/11/11210.1概述數(shù)據(jù)庫(kù)是一組特定數(shù)據(jù)的集合，是按照一定方式組織、存儲(chǔ)以及管理存儲(chǔ)在計(jì)算機(jī)內(nèi)的相關(guān)數(shù)據(jù)的集合。數(shù)據(jù)庫(kù)中數(shù)據(jù)的組織形式有多種，按數(shù)據(jù)庫(kù)所采用的數(shù)據(jù)模型分類，可分為：基于層次模型的數(shù)據(jù)庫(kù)、基于網(wǎng)狀模型的數(shù)據(jù)庫(kù)、基于關(guān)系模型的數(shù)據(jù)庫(kù)。關(guān)系數(shù)據(jù)庫(kù)，就是把數(shù)據(jù)表示成表的集合，通過建立各表之間的關(guān)系來(lái)定義結(jié)構(gòu)的一種數(shù)據(jù)庫(kù)。數(shù)據(jù)庫(kù)以文件的形式保存于存儲(chǔ)器中，一個(gè)數(shù)據(jù)庫(kù)文件可以包含一個(gè)、也可以包括多個(gè)組成這個(gè)數(shù)據(jù)庫(kù)的文件。2024/11/11310.1概述——數(shù)據(jù)庫(kù)

表：

在關(guān)系數(shù)據(jù)庫(kù)中，一個(gè)關(guān)系就可以表示為一個(gè)表，是關(guān)系數(shù)據(jù)庫(kù)的基本組成。表的作用是保存數(shù)據(jù)庫(kù)中的數(shù)據(jù)。假設(shè)用于存儲(chǔ)學(xué)生相關(guān)信息的數(shù)據(jù)庫(kù)是由學(xué)生學(xué)籍信息表、成績(jī)表和選課表組成的學(xué)生數(shù)據(jù)庫(kù)(XS.mdb)，那么整個(gè)學(xué)生數(shù)據(jù)庫(kù)的結(jié)構(gòu)如圖所示。2024/11/114學(xué)生數(shù)據(jù)庫(kù)結(jié)構(gòu)2024/11/115關(guān)鍵字：同一個(gè)表中的記錄是不重復(fù)的、唯一的。這可以通過設(shè)置某一字段為主關(guān)鍵字值來(lái)保證這種唯一性。為區(qū)別表中的每一條記錄，可以將某一字段設(shè)為主關(guān)鍵字，作為一個(gè)記錄的唯一標(biāo)識(shí)。排序：對(duì)于一個(gè)數(shù)據(jù)表，可以按某一字段對(duì)表中所有的記錄進(jìn)行升序或降序排列。索引：數(shù)據(jù)查找是數(shù)據(jù)庫(kù)操作的一項(xiàng)重要運(yùn)算，為提高查找效率，常常通過建立索引來(lái)達(dá)到查詢目的。索引是基于表建立的單獨(dú)的物理數(shù)據(jù)庫(kù)結(jié)構(gòu)，是一種特殊類型的表，其中包含關(guān)鍵字段的值和指向?qū)嶋H記錄位置的指針，這些值與指針按照特定的順序存儲(chǔ)。視圖：視圖是在表的基礎(chǔ)上建立的，它是一個(gè)虛擬表，但它的各項(xiàng)操作與真實(shí)的表是相同的。目的在于簡(jiǎn)化數(shù)據(jù)的表達(dá)。數(shù)據(jù)庫(kù)是包含了數(shù)據(jù)表的一個(gè)或多個(gè)文件的文件。VisualBasic支持多種數(shù)據(jù)庫(kù)，常用的、也是缺省的數(shù)據(jù)庫(kù)是.mdb文件，即MicrosoftAccess數(shù)據(jù)庫(kù)。2024/11/11610.1概述——數(shù)據(jù)訪問對(duì)象模型

數(shù)據(jù)訪問對(duì)象（DataAccessObjects,即DAO）遠(yuǎn)程數(shù)據(jù)對(duì)象（RemoteDataObjects,即RDO）ActiveX數(shù)據(jù)對(duì)象（ActiveXDataObjects，即ADO）

返回2024/11/11710.2數(shù)據(jù)管理器——?jiǎng)?chuàng)建Access格式數(shù)據(jù)庫(kù)

在VB工作環(huán)境中，選擇“外接程序/可視化數(shù)據(jù)管理器”，出現(xiàn)右圖所示界面。選擇“文件/新建/MicrosoftAccess（M）/Version7.0MDB”,打開左圖4所示對(duì)話框。2024/11/118在上圖所示對(duì)話框中選擇合適的路徑與數(shù)據(jù)庫(kù)名稱并單擊“保存”按鈕(我們將此數(shù)據(jù)庫(kù)命名為stu.mdb并將其保存在D盤)，則出現(xiàn)如右圖5所示界面。在左圖所示數(shù)據(jù)庫(kù)窗口中單擊鼠標(biāo)右鍵并單擊“新建表”命令，即出現(xiàn)表結(jié)構(gòu)對(duì)話框。2024/11/119表結(jié)構(gòu)創(chuàng)建表2024/11/111010.2數(shù)據(jù)管理器——數(shù)據(jù)窗體設(shè)計(jì)器

使用可視化數(shù)據(jù)管理器自帶的數(shù)據(jù)窗體設(shè)計(jì)器，使我們能在最短時(shí)間內(nèi)設(shè)計(jì)出符合要求的數(shù)據(jù)操作界面窗體。具體過程為：在如上圖所示界面中選擇“實(shí)用程序/數(shù)據(jù)窗體設(shè)計(jì)器(F)”，出現(xiàn)圖中所示“數(shù)據(jù)窗體設(shè)計(jì)器”對(duì)話框。2024/11/1111創(chuàng)建窗體：窗體運(yùn)行界面返回2024/11/111210.3ADO控件——ADO的對(duì)象與集合

ADO有7個(gè)對(duì)象：Connection：通過連接訪問數(shù)據(jù)源。Command：從連接到的數(shù)據(jù)源獲取所需數(shù)據(jù)的命令信息。Parameter：與命令對(duì)象有關(guān)的參數(shù)。Recordset：獲得的一組記錄組成的記錄集。Field：包含在記錄集中某個(gè)字段的信息。Property：ADO控件屬性信息Errors：訪問數(shù)據(jù)時(shí)，從數(shù)據(jù)源返回的錯(cuò)誤信息。ADO的4個(gè)集合為：Fields、Properties、Parameters、Errors。2024/11/111310.3ADO控件——添加ADO

ADO是作為可選項(xiàng)集成在VB開發(fā)環(huán)境中的，在使用ADO之前，必須首先完成ADO的添加。實(shí)際使用時(shí)，在完成項(xiàng)目創(chuàng)建后，需要選擇“工程/引用”命令，出現(xiàn)如圖10.14所示選項(xiàng)，在列表框中選中“MicrosoftActiveXObjectsData2.6Library”，單擊“確定”按鈕，這樣就為項(xiàng)目完成了ADO的添加。2024/11/111410.3ADO控件——ADO應(yīng)用

例：?jiǎn)?dòng)Access2003創(chuàng)建名為學(xué)生.mdb的數(shù)據(jù)庫(kù)作為數(shù)據(jù)源，在該庫(kù)中建立含有“學(xué)號(hào)、姓名、性別、班級(jí)、聯(lián)系方式、家庭所在地”字段的名為xsxx（學(xué)生信息）的表。

ADO應(yīng)用窗體布局ADO應(yīng)用運(yùn)行界面返回2024/11/111510.4數(shù)據(jù)控件數(shù)據(jù)控件分為提供數(shù)據(jù)的數(shù)據(jù)源控件和使用數(shù)據(jù)的數(shù)據(jù)識(shí)別/綁定控件。將此兩種控件結(jié)合可以完成數(shù)據(jù)的顯示和處理，如果數(shù)據(jù)識(shí)別/綁定控件沒有數(shù)據(jù)源，就無(wú)法自動(dòng)實(shí)現(xiàn)數(shù)據(jù)的顯示和處理工作。2024/11/1116

10.4數(shù)據(jù)控件——Data控件

Data控件是VisualBasic內(nèi)置的控件，也是在VisualBasic中訪問數(shù)據(jù)庫(kù)的重要控件，通過對(duì)其屬性進(jìn)行設(shè)置，可以將數(shù)據(jù)控件與不同結(jié)構(gòu)的數(shù)據(jù)庫(kù)及其數(shù)據(jù)表建立聯(lián)系，從而對(duì)表中記錄進(jìn)行讀、寫、查詢等操作。在工具箱中顯示如：窗體中的Data控件2024/11/11171．Connect屬性例1：連接Access數(shù)據(jù)庫(kù)（默認(rèn)的）。Connect=”Access”圖10.19Data控件的屬性對(duì)話框2．DatabaseName屬性該屬性用于確定數(shù)據(jù)控件所使用的數(shù)據(jù)庫(kù)是哪一個(gè)。例2：連接Access的一個(gè)數(shù)據(jù)庫(kù)。DatabaseName=”D:\stu.mdb”3．RecordSource屬性該屬性用于確定所要訪問的數(shù)據(jù)表的名稱。例3：指定訪問stu.mdb中的stutable。RecordSource=”stutable”如果要選擇表中所有女生的數(shù)據(jù)，則：RecordSource=”Select*FormstutableWhere性別=’女’”2024/11/111810.4數(shù)據(jù)控件——常用數(shù)據(jù)綁定控件

Data控件可以操作庫(kù)表，但本身無(wú)法顯示庫(kù)中的相關(guān)數(shù)據(jù)。為此，需將能顯示數(shù)據(jù)的控件與Data控件相關(guān)聯(lián)，從而使這些控件成為Data控件的數(shù)據(jù)綁定控件。具體實(shí)現(xiàn)一般控件與Data控件完成數(shù)據(jù)綁定過程的步驟如下：1．創(chuàng)建數(shù)據(jù)源：運(yùn)行VB主程序，選擇“文件/新建/標(biāo)準(zhǔn)EXE/打開”，以默認(rèn)窗體Form1為基礎(chǔ)添加如右圖所示各控件。2024/11/11192．設(shè)置各控件屬性值：將前一圖中所示各Text控件的Text屬性值設(shè)置為空，Data控件的Caption屬性值設(shè)置為空，DatabaseName屬性值為所選數(shù)據(jù)庫(kù)及其路徑。運(yùn)行即可得左圖所示運(yùn)行結(jié)果。在此基礎(chǔ)上可以完成添加記錄、刪除記錄、保存記錄、退出等操作。2024/11/112010.4數(shù)據(jù)控件——專用數(shù)據(jù)綁定控件

1．ADODC控件ADODC控件的常用屬性主要有：ConnectionString屬性例如上圖中的ConnectionString屬性設(shè)置為：Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.3.51;PersistSecurityInfo=False;DataSource="&App.Path&"\xueshengxinxi.mdb"RecordSource屬性返回或設(shè)置語(yǔ)句，或者返回一個(gè)記錄集的查詢。它可能包含一條語(yǔ)句或一個(gè)表格名稱，例如上圖中的RecordSource屬性設(shè)置為：Adodc1.RecordSource="Select*fromxsxx"Recordset屬性返回或者對(duì)下一級(jí)ADORecordset對(duì)象的引用。如在本例中：Text1.Text=Adodc1.Recordset.Fields("學(xué)號(hào)").ValueBOF屬性指示當(dāng)前記錄位于Recordset對(duì)象的第一個(gè)記錄之前。EOF屬性指示當(dāng)前記錄位于Recordset對(duì)象的最后一個(gè)記錄之后。2024/11/11212．DBGrid控件（數(shù)據(jù)網(wǎng)格控件）

DBGrid控件即數(shù)據(jù)網(wǎng)格控件，可以用來(lái)以表格形式顯示數(shù)據(jù)庫(kù)表中的數(shù)據(jù)。DBGrid控件布局運(yùn)行結(jié)果2024/11/1122DBGrid的常用屬性：DataSource屬性可以將DBGrid的DataSource屬性設(shè)置為一個(gè)ADO控件，以便將ADO控件所連接的數(shù)據(jù)源中的數(shù)據(jù)自動(dòng)填充至DBGrid的表格中。AllowAddNew屬性設(shè)置或者返回一個(gè)值，表明用戶是否能夠向與DBGrid控件連接的Recordset對(duì)象中添加新紀(jì)錄。AllowArrows屬性設(shè)置或返回一個(gè)值，該值決定控件是否用箭頭鍵對(duì)網(wǎng)格定位。AllowDelete屬性設(shè)置或返回一個(gè)值，指出用戶可否從與DBGrid控件連接的Recordset對(duì)象中刪除記錄。AllowUpdate屬性設(shè)置或返回一個(gè)值，提示用戶可否修改DBGrid控件中的數(shù)據(jù)。2024/11/11233．DBCombo控件（數(shù)據(jù)組合框）與DBList控件（數(shù)據(jù)列表框）

DBCombo控件DBList控件都是數(shù)據(jù)綁定列表框，都可以自動(dòng)從附加數(shù)據(jù)源中的字段填充數(shù)據(jù)，且可以選擇性地更新另一個(gè)數(shù)據(jù)源中的相關(guān)表的字段。這兩個(gè)控件功能相同，但DBCombo控件是組合框。2024/11/1124DBCombo控件主要屬性設(shè)置：RowSource屬性取值為Adodc1。將Adodc1與DBCombo控件綁定。Style屬性取值為2-dbcDropdownList。表示設(shè)置組合框類型，不允許用戶輸入。ListField屬性取值為所列字段名稱。DBList控件的主要屬性設(shè)置：RowSource屬性取值為Adodc2。將Adodc2與DBList控件綁定。ListField屬性取值為所列字段名稱。2024/11/112510.4數(shù)據(jù)控件——數(shù)據(jù)識(shí)別/綁定控件

數(shù)據(jù)識(shí)別/綁定控件為數(shù)據(jù)輸入、數(shù)據(jù)編輯、數(shù)據(jù)查看創(chuàng)建相關(guān)界面。這類控件都具有DataSource和DataField屬性，目的在于指名所使用的數(shù)據(jù)源及相應(yīng)字段。這類控件有DataGrid、DataList、DataCombo、HierarchicalFlexGrid等控件。這些控件在VB工作環(huán)境中的工具箱上是看不到的，使用之前需要用戶選擇“工程/部件”命令，在出現(xiàn)的“部件”對(duì)話框中選擇“MicrosoftADODataControl6.0(OLEDB)”，同時(shí)為方便使用，將“MicrosoftDataListControl6.0(OLEDB)、MicrosoftDataGridControl6.0(OLEDB)、“MicrosoftChartControl6.0(OLEDB)”等控件也一并選中，單擊“確定”按鈕，在工具箱中會(huì)出現(xiàn)相應(yīng)的圖標(biāo)。使用時(shí)，用鼠標(biāo)直接選取即可。返回2024/11/112610.5程序舉例1、建立數(shù)據(jù)庫(kù)可以采用直接在Access中創(chuàng)建數(shù)據(jù)庫(kù)，或者用在VB提供的可視化的數(shù)據(jù)管理器中建立數(shù)據(jù)庫(kù)，或以其它方式建立該數(shù)據(jù)庫(kù)，本例中采用10.2節(jié)中介紹的方法創(chuàng)建數(shù)據(jù)庫(kù)。該數(shù)據(jù)庫(kù)有三張表組成，其名稱分別為：stutable、stukecheng、stuchengji，對(duì)應(yīng)存儲(chǔ)：學(xué)生的學(xué)籍信息、課程