【正文】 定的層次結(jié)構(gòu)組成。 習(xí)題 （ P 習(xí)題） 第 8章 使用 DAO訪問數(shù)據(jù)庫 DAO層次結(jié)構(gòu) DAO對(duì)象 DAO編程實(shí)例 小結(jié)和習(xí)題 DAO層次結(jié)構(gòu) DAO提供兩種不同的編程模型結(jié)構(gòu)： Microsoft Jet Workspaces DAO模型 ODBC Direct Workspaces DAO模型。其工作原理是：通過設(shè)置數(shù)據(jù)控件的屬性，將數(shù)據(jù)控件與一個(gè)特定的數(shù)據(jù)庫及其中的數(shù)據(jù)表連接起來，然后通過數(shù)據(jù)綁定控件在窗體上顯示數(shù)據(jù)庫中的相應(yīng)數(shù)據(jù)。 圖 “例 710” 初始界面 修改步驟：三個(gè)步驟 小 結(jié) 小結(jié) Data數(shù)據(jù)控件是 Visual Basic 問數(shù)據(jù)庫的對(duì)象，它是通過 Jet數(shù)據(jù)庫引擎接口實(shí)現(xiàn)數(shù)據(jù)訪問的。 ActiveX數(shù)據(jù)綁定控件MSFlexGrid使用非常廣泛，MSFlexGrid控件除具有Name、 Caption、 Visible等大多數(shù)控件都擁有的屬性外，還具有以下幾個(gè)與顯示數(shù)據(jù)有關(guān)的屬性： 數(shù)據(jù)綁定控件 [例 710] 修改“例 72”應(yīng)用程序，在窗體中增加一個(gè) Data控件和MSFlexGrid控件，界面如圖 。 數(shù)據(jù)綁定控件 Datasource屬性 Row 屬性 Rows屬性 Col屬性 Cols 屬性 FixedCols屬性 FixedRows 屬性 RowHeight屬性 ColWidth屬性 GridLine屬性 Scrollbars屬性 Text屬性 Picture屬性 大多數(shù)數(shù)據(jù)綁定控件都是讀者比較熟悉的常用控件，只需對(duì) DataSource和 DataField這兩個(gè)屬性進(jìn)行設(shè)置即可使用。 那些可以與數(shù)據(jù)控件進(jìn)行綁定，并顯示記錄集中數(shù)據(jù)的控件稱為數(shù)據(jù)綁定控件。 在數(shù)據(jù)控件中使用 SQL查詢 [例 78] 修改例 77的應(yīng)用程序，在窗體中增加二個(gè)命令按鈕，界面如圖 所示。查詢過程可以通過以下步驟來完成： 根據(jù)查詢的條件，給出實(shí)現(xiàn)查詢的 SELECT語句字符串（一般賦值給某個(gè)變量）； 將 SELECT語句字符串賦值給數(shù)據(jù)控件的RecordSource屬性； 執(zhí)行數(shù)據(jù)控件的 Refresh方法。但是，通過改變查詢條件和查詢方式， SQL查詢語句可以完成多種查詢?nèi)蝿?wù)。命令按鈕的事件過程要求如下： 程序開始運(yùn)行時(shí)， “確認(rèn)”和“取消”按鈕是不可用的； 單擊“添加記錄”或“修改記錄”按鈕后，只有“確認(rèn)”和“取消”按鈕可用； 單擊“確認(rèn)”或“取消”按鈕后，按鈕的狀態(tài)又回到程序開始運(yùn)行時(shí)的狀態(tài) 在數(shù)據(jù)控件中使用 SQL查詢 SQL語言以其豐富的功能、方便靈活的使用方法、簡潔的語言等特點(diǎn)，贏得了廣大計(jì)算機(jī)用戶的歡迎。 Data數(shù)據(jù)控件 Update方法 將數(shù)據(jù)緩沖區(qū)的內(nèi)容送到數(shù)據(jù)庫中。 修改各需要修改的字段。 語法格式如下： 數(shù)據(jù)控件名 . 注意：編輯一條記錄需分四步完成： 定位需編輯的記錄使之成為當(dāng)前記錄。 移動(dòng)記錄指針。 Data數(shù)據(jù)控件 Delete方法 刪除記錄中的當(dāng)前記錄，但記錄指 針不動(dòng)，它仍是當(dāng)前記錄 語句格式如下： 數(shù)據(jù)控件名 . 定位被刪除的記錄使之成為當(dāng)前記錄。 調(diào)用 Update方法。 給各個(gè)字段賦值。 語法格式如下： 數(shù)據(jù)控件名 . 調(diào)用 AddNew方法。 Data數(shù)據(jù)控件 RecordSet對(duì)象的常用方法 Move方法 AddNew方法 Delete方法 Edit方法 Update方法 Data數(shù)據(jù)控件 Move方法 本方法用于移動(dòng) RecordSet對(duì)象的記錄指針，有 5種移動(dòng)記錄指針的方法： MoveFirst方法 MoveLast方法 MovePrevious方法 MoveNext方法 Move(n)方法 Data數(shù)據(jù)控件 Move(n)方法 Move方法的語法格式如下： 數(shù)據(jù)控件名 . [例 76] 修改例 73的應(yīng)用程序，界面如圖，要求通過 Move方法來移動(dòng)該應(yīng)用程序的記錄。 創(chuàng)建步驟： 在窗體上添加兩個(gè)標(biāo)簽，如右圖所示。 Data數(shù)據(jù)控件 Data數(shù)據(jù)控件常用的方法 Refresh方法 UpdateControls方法 UpdateRecord方法 Data數(shù)據(jù)控件 數(shù)據(jù)控件的記錄集（ RecordSet對(duì)象） RecordSet對(duì)象的常用屬性 RecordSet對(duì)象的常用方法 Data數(shù)據(jù)控件 RecordSet對(duì)象的常用屬性 Enabled屬性 EOF（ End Of File）屬性 BOF（ Beginning Of File）屬性 RecordCount屬性 Data數(shù)據(jù)控件 RecordCount屬性 該屬性用于統(tǒng)計(jì) RecordSet對(duì)象的記錄個(gè)數(shù)。 創(chuàng)建步驟 ： 添加 Reposition事件過程 運(yùn)行該應(yīng)用程序，出現(xiàn)如圖 ，單擊 Data控件上的箭頭可以瀏覽“ StuInfo”數(shù)據(jù)表及其記錄序號(hào) Data數(shù)據(jù)控件 Data數(shù)據(jù)控件常用的事件 [例 73] 在例 72的應(yīng)用程序中，添加 Vaildate事件，使得用戶在瀏覽“ StuInfo”數(shù)據(jù)表時(shí)不能改變學(xué)號(hào)的位數(shù)。 Data數(shù)據(jù)控件 屬性 值 Caption StuInfo表數(shù)據(jù)控件 Name Data1 Connect Access RecordsetType 1Dynaset DatabaseName RecordSource StuInfo Name Text DataSource DataField TxtID 空 Data1 StuID TxtName 空 Data1 StuName TxtSex 空 Data1 StuSex TxtBirthDate 空 Data1 StuBirthDate TxtClass 空 Data1 StuClass TxtFrom 空 Data1 StuFrom TxtTel 空 Data1 StuTel Data控件的屬性 綁定控件文本框的屬性 Data數(shù)據(jù)控件 ⑤ 設(shè)置綁定控件文本框的屬性，如表 ： ⑥修改命令按鈕的 Name屬性值為“退出”，程序代碼如下： Private Sub 退出 _Click() Unload Me End End Sub ⑦ 運(yùn)行該應(yīng)用程序，出現(xiàn)如圖 ，單擊 Data控件上的左右箭頭可以瀏覽“ StuInfo”數(shù)據(jù)表中的記錄。 ③ 在窗體中添加 7個(gè)標(biāo)簽框、 7個(gè)文本框和一個(gè)命令按鈕，并按圖 命令按鈕的 Caption屬性。 程序設(shè)計(jì)界面 Data數(shù)據(jù)控件 創(chuàng)建步驟： ① 選擇“文件”菜單中的“新建工程”，在隨后出現(xiàn)的“新建工程”對(duì)話框中選擇“標(biāo)準(zhǔn) EXE”，單擊“確定”按鈕。所以要使綁定控件能與數(shù)據(jù)庫進(jìn)行連接，必須設(shè)置它的兩個(gè)屬性： ① DataSource屬性：該屬性通過指定一個(gè)有效的數(shù)據(jù)控件使綁定控件連接到一個(gè)數(shù)據(jù)庫上。常用的綁定控件有文本框、標(biāo)簽、復(fù)選框、圖片框和圖象框等。其屬性的取值如表 。 也就是說 ， 利用該向?qū)?， 程序員只需選擇數(shù)據(jù)庫和它的數(shù)據(jù)表就會(huì)自動(dòng)地創(chuàng)建數(shù)據(jù)窗體 ， 即自動(dòng)地創(chuàng)建數(shù)據(jù)庫應(yīng)用界面并連接上所需的數(shù)據(jù)庫 ， 提供了一個(gè)快捷的創(chuàng)建 VB數(shù)據(jù)庫應(yīng)用程序的工具 。 凡是 Visual Basic ， 如數(shù)據(jù)庫結(jié)構(gòu)的建立 、記錄的添加及修改等都可以在此工具中來完成 。 VB支持的數(shù)據(jù)存取模式有三種 ， 分別為數(shù)據(jù)存儲(chǔ)對(duì)象 DAO、 遠(yuǎn)程數(shù)據(jù)對(duì)象 RDO和 ActiveX數(shù)據(jù)對(duì)象 ADO 小結(jié)和習(xí)題 VB的可視化數(shù)據(jù)管理器是隨著 Visual Basic Visual Basic 。 圖 ―StuInfo‖窗體的運(yùn)行界面 小結(jié)和習(xí)題 小結(jié) 作為應(yīng)用程序的開發(fā)工具 ， Visual Basic 具有強(qiáng)大的數(shù)據(jù)庫處理能力 ， 它將 Windows的各種先進(jìn)特性與強(qiáng)大的數(shù)據(jù)庫管理功能有機(jī)地結(jié)合在一起 ， 使得在開發(fā)數(shù)據(jù)庫應(yīng)用程序方面具有獨(dú)到的特征和優(yōu)點(diǎn) 。單擊 “ 完成 ” 按鈕，將自動(dòng)完成 “ StuInfo數(shù)據(jù)表窗體 ” 的創(chuàng)建，如圖 6. 19所示。 圖 ―數(shù)據(jù)窗體向?qū)?——數(shù)據(jù)庫”對(duì)話框 Visual Basic ⑥ 在“數(shù)據(jù)窗體向?qū)?——Form”對(duì)話框的窗體名稱文本框中輸入“ StuInfo數(shù)據(jù)表窗體”，選擇窗體布局為“單個(gè)記錄”，綁定類型為“ ADO數(shù)據(jù)控件”，單擊“下一步”按鈕，出現(xiàn) “數(shù)據(jù)窗體向?qū)?——記錄源”對(duì)話框；在“記錄源”下拉列表中選擇“ StuInfo”數(shù)據(jù)表，在“可用字段”中雙擊要用的字段添加到“選定字段”列表中，如圖 示。 ④單擊“下一步”按鈕，出現(xiàn)“數(shù)據(jù)窗體向?qū)?——數(shù)據(jù)類型”對(duì)話框，選中“ Access”數(shù)據(jù)類型后單擊“下一步”按鈕，出現(xiàn)如圖 “數(shù)據(jù)窗體向?qū)?——數(shù)據(jù)庫”對(duì)話框。 ②單擊 “ 外接程序管理器 ”對(duì)話框的 “ VB 6 數(shù)據(jù)窗體向?qū)?” ，選中 “ 加載行為 ” 框架中的 “ 加載 /卸載 ” 選項(xiàng)，單擊 “ 確定 ” 按鈕后 “ 外接程序 ”菜單將添加 “ 數(shù)據(jù)窗體向?qū)?” 選項(xiàng)。 [例 64] 要求用“數(shù)據(jù)窗體向?qū)А笨焖賱?chuàng)建一個(gè)可以用來查看和編輯 “ ” 數(shù)據(jù)庫中 “ StuInfo”數(shù)據(jù)表記錄的 VB應(yīng)用程序，“ StuInfo” 數(shù)據(jù)表的記錄如表 。 圖 ―Dynaset： StuInfo‖對(duì)話框 (2) Visual Basic Visual Basic “數(shù)據(jù)窗體向?qū)А笨梢杂脕碜詣?dòng)創(chuàng)建數(shù)據(jù)庫應(yīng)用界面。 圖 StuInfo表的數(shù)據(jù)庫窗口 Visual Basic 器 用可視化數(shù)據(jù)管理器錄入記錄 在可視化數(shù)據(jù)管理器中輸入記錄，只需選中數(shù)據(jù)庫窗口中的數(shù)據(jù)表然后右單擊鼠標(biāo)，在隨后出現(xiàn)的快捷菜單中選擇“打開”命令，屏幕顯示數(shù)據(jù)表對(duì)話框，選擇添加即可。 Visual Basic 器 用可視化數(shù)據(jù)管理器創(chuàng)建數(shù)據(jù)表 在可視化數(shù)據(jù)管理器中創(chuàng)建數(shù)據(jù)表，首先要打開數(shù)據(jù)庫，然后在可視化數(shù)據(jù)管理器的數(shù)據(jù)庫窗口中創(chuàng)建表。 [例 61] 要求創(chuàng)建一個(gè)名為“ ”的數(shù)據(jù)庫。 Visual Basic 器 可視化數(shù)據(jù)管理器用戶界面 用可視化數(shù)據(jù)管理器創(chuàng)建數(shù)據(jù)庫 用可視化數(shù)據(jù)管理器創(chuàng)建數(shù)據(jù)表 用可視化數(shù)據(jù)管理器錄入記錄 Visual Basic 器 可視化數(shù)據(jù)管理器用戶界面 在 Visual Basic 驟如下： ①選擇菜單命令“外接程序”； ②單擊“可視化數(shù)據(jù)管理器”選項(xiàng)； ③屏幕顯示如圖 Visual Basic 理器用戶界面 。 Microsoft Access： Microsoft Access使用的是與Visual Basic ，所以用 Microsoft Access創(chuàng)建的數(shù)據(jù)庫和直接在 Visual Basic 。 Visual Basic 模式 OLE DB ADO Visual 數(shù)據(jù)庫 圖 ADO操作數(shù)據(jù)庫的體系結(jié)構(gòu) Visual Basic 器 在 Visual 建方法 可視化數(shù)據(jù)管理器：使用 Visual Basic 據(jù)管理器，不需要編程就可以創(chuàng)建 Jet數(shù)據(jù)厙。 ADO操作數(shù)據(jù)庫的方式如圖 。 Visual Basic 模式 ActiveX數(shù)據(jù)對(duì)象（ ADO） ADO數(shù)據(jù)訪問對(duì)象是基于 OLE DB之上的面向?qū)ο蟮臄?shù)據(jù)訪問模型。 ODBC實(shí)際上是一組訪問數(shù)據(jù)庫的 API(Application Programming Interface，應(yīng)用編程接口 )函數(shù)庫，應(yīng)用程序可以通過 ODBC API函數(shù)操作數(shù)據(jù)庫中的數(shù)據(jù)。 RDO數(shù)據(jù)庫模式是專門為存取數(shù)據(jù)庫服務(wù)器（如： SQL Server, Oracle等）數(shù)據(jù)源而設(shè)計(jì)，所以不能用 RDO數(shù)據(jù)庫模式存取如 dBase， FoxPro或 Paradox的數(shù)據(jù)源。 對(duì)于數(shù)據(jù)存取方式， RDO是直接與 ODBC進(jìn)行交互訪問數(shù)據(jù)庫，而 DAO則必須通過 Jet數(shù)據(jù)庫引擎來對(duì)數(shù)據(jù)庫進(jìn)行訪問。 Visual Basic 模式 RDO和 DAO共同點(diǎn) : 它們都具有連接到數(shù)據(jù)庫、提交查詢、