《Visual Basic程序設計》課件第10章

主要內容數(shù)據(jù)庫的基本概念

創(chuàng)建數(shù)據(jù)庫

學生信息管理

ADO對象模型

ADO控件

1.1數(shù)據(jù)、數(shù)據(jù)庫和數(shù)據(jù)庫管理系統(tǒng)

1.數(shù)據(jù)2.數(shù)據(jù)庫

3.數(shù)據(jù)庫管理系統(tǒng)功能：（1）數(shù)據(jù)庫定義功能； （2）數(shù)據(jù)庫操縱功能； （3）數(shù)據(jù)庫運行和管理功能； （4）數(shù)據(jù)庫的建立和維護功能。1.2數(shù)據(jù)模型和關系型數(shù)據(jù)庫

1.數(shù)據(jù)模型網(wǎng)狀模型、層次模型、關系模型等，它是按計算機系統(tǒng)的觀點對數(shù)據(jù)建模。當前流行的數(shù)據(jù)庫管理系統(tǒng)大多數(shù)都采用關系數(shù)據(jù)模型。2.關系型數(shù)據(jù)庫（1）數(shù)據(jù)表（2）字段和記錄（3）關鍵字（4）索引3.關系型數(shù)據(jù)庫的關聯(lián)（1）“一對一”關系

（2）“一對多”關系

（3）“多對多”關系

1.3VB數(shù)據(jù)庫應用程序的組成

VisualBasic數(shù)據(jù)庫應用程序是由用戶界面、數(shù)據(jù)庫引擎和數(shù)據(jù)庫三部分組成的

用戶界面數(shù)據(jù)庫引擎數(shù)據(jù)倉庫2.1學生信息管理（1）案例說明本案例介紹了在VB中如何創(chuàng)建一個學生信息數(shù)據(jù)庫“學生信息庫”。參考教材P239頁

2.2程序實現(xiàn)利用VB提供的可視化數(shù)據(jù)管理器可以建立多種類型的數(shù)據(jù)庫。在此以創(chuàng)建MicrosoftAccess數(shù)據(jù)庫為例，因為這種數(shù)據(jù)庫是VB內聯(lián)的，擴展名為.Mdb。下面詳細介紹其創(chuàng)建過程。3.1學生信息管理（2）案例說明本案例介紹了“學生信息系統(tǒng)”的登錄框。程序運行后彈出一個密碼框，要求用戶輸入用戶名和密碼，以驗證用戶的合法性。“學生信息數(shù)據(jù)庫”中的“密碼表”用來存放用戶名和用戶密碼，必須在“密碼登錄”窗口中輸入正確的信息。

3.2

程序實現(xiàn)

1.界面設計新建一個工程，在窗體上添加2個標簽控件，1個組合框控件，一個文本框，2個命令按鈕，還需要添加一個數(shù)據(jù)控件Data，各個控件的屬性設置見表10-6。

2.代碼設計：3.3相關知識1.數(shù)據(jù)訪問接口

數(shù)據(jù)控件（DataControl）、數(shù)據(jù)訪問對象（DAO，DataAccessObject）、遠程數(shù)據(jù)對象（RDO，RemoteDataObject）、Active數(shù)據(jù)對象（ADO，ActiveDataObject）

2.數(shù)據(jù)控件和數(shù)據(jù)綁定控件

3.Data控件

（1）從工具箱中選擇Data控件； （2）將Data控件添加到窗體中去； （3）設置Data控件的DatabaseName屬性； （4）設置Data控件的RecordSource屬性。3.3相關知識4.Data控件的常用屬性 （1）Connect屬性（2）DatabaseName屬性（3）RecordSource屬性

5.數(shù)據(jù)綁定控件的常用屬性

（1）DataSource屬性（2）DataField屬性最常見的數(shù)據(jù)綁定控件是文本框控件4.1學生信息管理（3）案例說明在[案例10-2]中介紹了秘密登錄框，如果驗證通過后，就可進入系統(tǒng)。進入該系統(tǒng)后，出現(xiàn)一個選項窗口（Form2），單擊相應的按鈕即可進入不同的子系統(tǒng)。4.2

程序實現(xiàn)

1.界面設計。

2.代碼設計：4.3相關知識1.ADO概述

ActiveDataObjects（ADO）不僅為用戶的數(shù)據(jù)庫提供了一個面向對象的視點，并且它是獨立于任何單一的數(shù)據(jù)庫開發(fā)商的，即它使用用戶可以開發(fā)出在各種不同數(shù)據(jù)庫系統(tǒng)中使用的應用程序。所以，ADO為用戶對數(shù)據(jù)庫進行訪問提供一個良好的途徑。

ADO數(shù)據(jù)訪問的方法主要有ADO對象模型數(shù)據(jù)訪問和ADO數(shù)據(jù)控件訪問方法。4.3相關知識ADO的核心是Connection、Recordset、Command對象，以下將介紹這些核心對象的方法和屬性。4.3相關知識3.使用ADO對象訪問數(shù)據(jù)庫編程步驟在VB中使用ADO對象，必須在工程中添加對ADO對象的引用。添加ADO對象的方法是： 單擊“工程”菜單中的“引用”菜單項，打開“引用”對話框，如圖10-22所示，在“可用的引用”列表中，選擇想要飲用的ADO對象庫，如果想使用ADODB，選中“MicrosoftActiveXDataObject2.0Library”，如果想使用ADODR，則選中“MicrosoftActiveXDataObjectsRecordset2.0Library”，選擇好后單擊“確定”按鈕。4.3相關知識ADO對象進行數(shù)據(jù)庫編程。一般分為如下幾個大的步驟：（1）連接數(shù)據(jù)庫：ADO有兩種，一是連接對象Open（）方法和記錄集Open（）方法。使用連接對象的語句如下：

Connection.OpenConnectionString,UserId,Password,OpenOptions

用戶要在ConnectionString處給出“提供者”和數(shù)據(jù)源名，如果訪問數(shù)據(jù)庫，還要給出數(shù)據(jù)庫的路徑和文件名。例如下面語句：

DimresAsNewADODB.Recordset SetQur=NewADODB.Connection Qur.CursorLocation=adUseClient Qur.Open"Provider=Microsoft.Jet.OLEDB.3.51;DataSource=G:\VB教材水電\第10章\10-3\學生信息.mdb;"

（2）執(zhí)行命令 建立了與數(shù)據(jù)源的連接后，就可以執(zhí)行命令來實現(xiàn)對數(shù)據(jù)庫的操作，命令可以通過使用一系列參數(shù)來控制工作進程和方式。 執(zhí)行命令之前需要創(chuàng)建一個Command類型的對象變量，然后設置該對象的ActiveConnection屬性和CommandText屬性，以指定該命令使用的連接和命令文本字符串，例如語句：

DimcmdAsNewADODB.Command cmd.CommandText="Select*From學生信息" res.Opencmd,,adOpenStatic,adLockBatchOptimistic cmd.CommandText="Select*From學生信息"

（3）運行命令返回記錄集 創(chuàng)建命令對象后，可以用Connection.Execute、Command.Exectue以及Recordset.Open三種方法來運行命令，返回Recordset對象。以Recordset.Open為例，返回記錄集的語句如下：

DimresAsNewADODB.Recordset Qur.CursorLocation=adUseClient res.Opencmd,,adOpenStatic,adLockBatchOptimistic

（４）使用記錄集 記錄集Recordset對象是訪問數(shù)據(jù)庫中存儲數(shù)據(jù)的一種方式。記錄集保留了一個指向當前數(shù)據(jù)行的指針。這個指針可以通過使用對象中不同的方法來加以控制。例如，可以使用MoveFirst或MoveLast方法是指針移到第一行或最后一行。記錄集中的每一個單列都是由Field對象來描述的，所以如果要訪問在特定行中的信息，可以使用Field集合。如以下語句：

res.MoveFirst Fori=0Tores.RecordCount-1 Printres.Fields("姓名")&res.Fields("所在系")&res.Fields("籍貫") res.MoveNext Nexti4.3相關知識（2）執(zhí)行命令 可以執(zhí)行命令來實現(xiàn)對數(shù)據(jù)庫的操作， 執(zhí)行命令之前需要創(chuàng)建一個Command類型的對象變量，然后設置該對象的ActiveConnection屬性和CommandText屬性，以指定該命令使用的連接和命令文本字符串，例如語句：DimcmdAsNewADODB.Commandcmd.CommandText="Select*From學生信息"res.Opencmd,,adOpenStatic,adLockBatchOptimisticcmd.CommandText="Select*From學生信息"

4.3相關知識（3）運行命令返回記錄集創(chuàng)建命令對象后，可以用Connection.Execute、Command.Exectue以及Recordset.Open三種方法來運行命令，返回Recordset對象。返回記錄集的語句如下：

DimresAsNewADODB.RecordsetQur.CursorLocation=adUseClientres.Opencmd,,adOpenStatic,adLockBatchOptimistic

4.3相關知識（４）使用記錄集記錄集Recordset對象是訪問數(shù)據(jù)庫中存儲數(shù)據(jù)的一種方式。記錄集保留了一個指向當前數(shù)據(jù)行的指針。這個指針可以通過使用對象中不同的方法來加以控制。例如，可以使用MoveFirst或MoveLast方法是指針移到第一行或最后一行。記錄集中的每一個單列都是由Field對象來描述的，所以如果要訪問在特定行中的信息，可以使用Field集合。如以下語句：

res.MoveFirst Fori=0Tores.RecordCount-1 Printres.Fields("姓名")&res.Fields("所在系")&res.Fields("籍貫") res.MoveNext Nexti5.1學生信息管理（4）案例說明本案例通過采用VB6.0提供的ADO數(shù)據(jù)控件，不需要編寫復雜的代碼就可以方便地訪問數(shù)據(jù)庫。5.2

程序實現(xiàn)

1.界面設計 添加一個窗體，在窗體上添加7個標簽控件，6個文本框控件，4個命令按鈕控件。根據(jù)圖10-24更改標簽控件和命令按鈕控件的Caption屬性。 另外添加一個ADO數(shù)據(jù)控件，添加方法將詳細介紹，設置Visibl屬性為False。各控件屬性見表10-11。

2.代碼設計：4.3相關知識1.ADO數(shù)據(jù)控件概述

ADO數(shù)據(jù)控件是使用ADO數(shù)據(jù)對象來快速建立數(shù)據(jù)綁定控件和數(shù)據(jù)提供者之間的連接。數(shù)據(jù)綁定控件是任何具有“數(shù)據(jù)源”屬性的控件。ADO數(shù)據(jù)控件