【正文】 為 False。 Data控件的常用屬性 5． RecordSet對(duì)象的常用屬性 Eof和 Bof屬性具有以下特點(diǎn)： ①如果記錄集中沒有記錄，則 Bof屬性和 Eof屬性值都是 True。 ③若 Bof屬性或 Eof屬性的值為 False，而且記錄集中唯一的記錄被刪除掉，那么這兩個(gè)屬性的值將依舊保持 False，直到將記錄指針移到另一個(gè)記錄上為止，這時(shí)Bof屬性和 Eof屬性的值都將變?yōu)?True。 （ 2） RecordCount屬性 記錄集中的記錄數(shù)量，如果記錄集中沒有記錄， RecordCount屬性值為 0。值為 True時(shí)，不能對(duì)記錄集中的數(shù)據(jù)進(jìn)行修改操作，值為 False時(shí)，可以對(duì)記錄集中的數(shù)據(jù)進(jìn)行修改操作。如果在執(zhí)行了 AddNew方法或 Edit方法后并且在還沒有調(diào)用Update方法之前，由于數(shù)據(jù)的修改沒有寫入到數(shù)據(jù)庫中，這時(shí)調(diào)用 Refresh方法，將會(huì)清除掉用戶所做的添加或修改。通常用于修改后的確認(rèn)操作。通常在“取消”或“放棄”操作中調(diào)用該方法。 該屬性用來指定數(shù)據(jù)綁定控件與 Data控件形成的記錄集中的哪個(gè)字段相綁定，綁定過后，該數(shù)據(jù)綁定控件就可以顯示和修改對(duì)應(yīng)字段的內(nèi)容了。 數(shù)據(jù)綁定控件的常用屬性 在應(yīng)用程序中使用數(shù)據(jù)綁定控件的步驟如下： （ 2）設(shè)置數(shù)據(jù)綁定控件的 DataSource屬性，該屬性值為要綁定的 Data控件名； （ 1）添加數(shù)據(jù)綁定控件到 Visual Basic的窗體中； （ 3）設(shè)置數(shù)據(jù)綁定控件的 DataField屬性，該屬性值為 Data控件形成的記錄集里的一個(gè)有效字段名。如果在設(shè)計(jì)時(shí)數(shù)據(jù)庫不可用，可在該屬性后的文本框中輸入一個(gè)有效的字段名或者在運(yùn)行時(shí)為該屬性賦值為一個(gè)有效的字段名。只要單擊 Data控件上的箭頭按鈕，Visual Basic會(huì)自動(dòng)地更新對(duì)記錄集所做的修改。 【 例 92】 編寫一個(gè)對(duì) CollegeMIS數(shù)據(jù)庫中 Teacher表進(jìn)行瀏覽和修改的程序，程序的設(shè)計(jì)界面如圖 914所示，程序的運(yùn)行結(jié)果如圖 915所示?？捎萌舾蓚€(gè) Text控件來顯示和修改 Teacher表中的除 Sex、 Marriage和Picture外的其它字段的值，用一個(gè)組合框來顯示和修改 Sex字段的值，用一個(gè)圖像框來顯示和修改 Picture字段的值，用一個(gè)復(fù)選框顯示和修改 Marriage字段的值。 更改數(shù)據(jù)庫中的照片 （ Image類型的字段），有兩種方法：一是通過剪貼板，先把數(shù)據(jù)存放到剪貼板上，然后使用語句 “ = ‖把剪貼板上的照片顯示在圖像框中；二是使用圖像框的LoadPicture方法，先把照片存放在磁盤上，然后使用語句“ =LoadPicture（”圖像文件名”）”把照片顯示在圖像框中。 Connect 屬性設(shè)置 ： ODBC。 Server=TAHSJ。 PWD=tah980808。 Data控件的 Recordset對(duì)象的常用方法 1． Move類方法 該方法的作用是把記錄指針移到當(dāng)前記錄的下一條記錄。 （ 3） MoveFirst方法 該方法的作用是把記錄指針移到第一條記錄。 （ 5） Move [n]方法 該方法使記錄指針向前或向后移 |n|條記錄， n為正表示向記錄集的末尾移動(dòng)， n的值為負(fù)表示向記錄集的開頭移動(dòng)。 【 例 93】 編寫一個(gè)利用按鈕對(duì) CollegeMIS數(shù)據(jù)庫中的 Teacher表進(jìn)行瀏覽和修改的數(shù)據(jù)庫應(yīng)用程序，在運(yùn)行時(shí)不顯示 Data控件，通過五個(gè)按鈕來實(shí)現(xiàn)記錄指針的移動(dòng)，程序的設(shè)計(jì)界面如圖 916 所示，程序的運(yùn)行界面如圖 917所示。 Data控件的 Recordset對(duì)象的常用方法 2． Find類方法 使用 Data控件進(jìn)行數(shù)據(jù)庫查找，有兩種方法，一種是索引查找，見 Seek方法；另一種是順序查找。 （ 1） FindFirst方法 其作用是查找滿足條件的第一條記錄，語法格式如下： Data控件名 . 條件 （ 2） FindLast方法 其作用是查找滿足條件的最后一條記錄，語法格式如下： Data控件名 . 條件 （ 3） FindNext方法 其作用是查找滿足條件的下一條記錄，語法格式如下： Data控件名 . 條件 （ 4） FindPrevious方法 其作用是查找滿足條件的上一條記錄，語法格式如下： Data控件名 . 條件 查找方法中的條件都是一個(gè)字符串，字符串中存放的是指定字段與常量或變量構(gòu)成的表達(dá)式。如要在 Data1控件的記錄集中查找第一個(gè)職稱（字段名為 Title）為“副教授”的記錄，可使用下列語句： Title=39。 如果要接著查找下一條職稱為“副教授”的記錄，可使用下列語句： 姓名 =39。 如果條件部分與字段比較的數(shù)據(jù)來源于變量，如要查找的人的職稱存放在變量ZC中，則查找滿足條件的第一條記錄的命令可按以下格式書寫： Title= amp。 amp。 39。如職稱的一部分信息包含在變量ZC中，現(xiàn)在要查找相應(yīng)的記錄，可使用下述命令： Title Like amp。* amp。 *39。 注意：如果查找的數(shù)據(jù)是日期型，需要用兩個(gè)“ ‖作用日期型數(shù)據(jù)的定界符。 條件的設(shè)置方法： 是否區(qū)分大小寫的設(shè)置方法： 查找結(jié)果的判斷： 各種查找命令執(zhí)行后，可根據(jù) Data控件的 RecordSet對(duì)象的 NoMatch屬性值來測(cè)試是否找到了相應(yīng)的記錄，如果找到則 NoMatch屬性值為 False，否則NoMatch屬性值為 True。程序的設(shè)計(jì)界面如圖 918所示。在“按姓名模糊查找”框架中的姓名后面的文本框中輸入教師姓名中包含的字符后，單擊該框架控件中的相應(yīng)按鈕，將查找姓名中包含該字符的記錄，如果找到，則顯示找到的記錄并給出提示信息，如果找不到則顯示提示框，并把記錄指針置于查找前的位置。 圖 918 例 94程序設(shè)計(jì)界面 圖 91９ 例 94程序運(yùn)行界面 實(shí)現(xiàn)思路： 本例可使用 Find方法進(jìn)行查找，精確查找使用“ =‖運(yùn)算符，不精確查找可使用“ Like‖運(yùn)算符。形成查找字符串時(shí)，需注意字符值用“ 39。 程序代碼見實(shí)例。 語法格式： 記錄集對(duì)象 .Seek Comparison， Keyl， Key2， … ， Keyn 參數(shù)說明： Seek允許接受多個(gè)參數(shù)，第一個(gè)是 Comparison，是一個(gè)字符串，用來確定比較的類型。 KeyKey … 、 Keyn參數(shù)可以是一個(gè)或多個(gè)，它們分別對(duì)應(yīng)于記錄集的當(dāng)前索引中的字段。 注意事項(xiàng)： 注意兩點(diǎn)：只有表類型的記錄集對(duì)象才能進(jìn)行索引查找；必須設(shè)置記錄集對(duì)象的 Index屬性值為相應(yīng)的索引； Seek方法總是從記錄集的頭部開始查找記錄。 索引查找的程序編寫一般格式如下（根據(jù)教師號(hào)索引查找）： Dim BM If 0 Then BM = End If = JSH 39。 在 Text12輸入要查找的教師號(hào) If Then MsgBox (沒有該教師號(hào)的教師 ) = BM Else MsgBox(已找到該教師 ) End If 注意： 由于在 Visual Basic中，對(duì)于用 ODBC連接 SQL Server數(shù)據(jù)庫不支持Table類型的記錄集。 Data控件的 Recordset對(duì)象的常用方法 4． AddNew方法 增加記錄的操作可分成以下三步： （ 1）調(diào)用 AddNew方法； （ 2）在數(shù)據(jù)綁定控件中輸入記錄數(shù)據(jù)，或給字段賦值，給字段賦值的格式為： Data控件名 .(字段名 )=值 （ 3）調(diào)用 Update方法把添加的記錄保存到數(shù)據(jù)表中。 Data控件的 Recordset對(duì)象的常用方法 6． Edit方法 使用 Edit修改記錄集的當(dāng)前記錄一般需經(jīng)過以下四步： （ 1）定位到要修改的記錄使之成為當(dāng)前記錄； （ 2）調(diào)用 Edit方法； 7． Update方法 Update方法用來把添加的新記錄或把當(dāng)前記錄的修改結(jié)果保存到數(shù)據(jù)表中，該方法只能在 Edit方法或 AddNew方法執(zhí)行后才能執(zhí)行。 （ 3）給各字段賦值； （ 4）調(diào)用 Update方法，確認(rèn)所做的修改。程序運(yùn)行時(shí)，單擊“刪除”按鈕將刪除當(dāng)前記錄，單擊“添加”按鈕將添加一條新記錄，單擊“修改”按鈕將修改當(dāng)前記錄，單擊“確認(rèn)”按鈕將把增加的新記錄或?qū)Ξ?dāng)前記錄的修改寫入到數(shù)據(jù)庫，單擊“取消”按鈕將取消所做的添加或修改操作。程序剛執(zhí)行時(shí)，“確認(rèn)”和“取消”按鈕應(yīng)不能使用。執(zhí)行了“確認(rèn)”或“取消”操作后，“添加”按鈕、“修改”按鈕及移動(dòng)按鈕應(yīng)能夠使用，而“確認(rèn)”和“取消”按鈕不能使用。 程序代碼見實(shí)例。但如果使用Visual Basic的本地?cái)?shù)據(jù)庫 Access，就不會(huì)出現(xiàn)這樣的問題。 Data控件的常用事件 1． Validate事件 （ 1）發(fā)生時(shí)機(jī) 在當(dāng)記錄指針位置發(fā)生改變、離開當(dāng)前記錄時(shí)發(fā)生。利用Validate事件，用戶在修改記錄時(shí)可以判斷所輸入的記錄是否符合要求，只有符合要求并執(zhí)行了 Validate事件后，記錄指針才會(huì)真正離開當(dāng)前記錄。 Save參數(shù)用來判斷是否有數(shù)據(jù)發(fā)生了改變，如果有，該參數(shù)值為 True，否則該參數(shù)值為 False。 Private Sub Data控件名 _Validate([Index As Integer,]Action As Integer, Save As Integer) （ 3）參數(shù)說明 【 例 96】 在例 95的基礎(chǔ)上，編程對(duì)用戶輸入的數(shù)據(jù)進(jìn)行驗(yàn)證：如果用戶輸入的教師姓名信息為空，則給出提示信息“姓名不能為空！”，并取消對(duì)Data控件的操作。 圖 922 姓名輸入為空時(shí)的程序運(yùn)行界面 實(shí)現(xiàn)思路： 可在 Data控件的 Validate事件中對(duì)輸入的教師姓名信息進(jìn)行驗(yàn)證，如果姓名信息為空，可通過給 Action參數(shù)賦值 0取消所執(zhí)行的操作。 Data控件的常用事件 2． Reposition事件 （ 1）發(fā)生時(shí)機(jī) Reposition事件是在記錄指針移動(dòng)到當(dāng)前記錄位置前發(fā)生。 Reposition事件執(zhí)行結(jié)束后，指針才真正到達(dá)當(dāng)前的記錄。程序設(shè)計(jì)界面如圖 923所示，該設(shè)計(jì)界面上有一個(gè) MSFlexGrid控件，用來顯示對(duì)應(yīng)教師的授課情況，當(dāng)教師表的記錄指針發(fā)生變化時(shí)， MSFlexGrid控件中的內(nèi)容也相應(yīng)發(fā)生變化。 圖 923 例 97程序設(shè)計(jì)界面 圖 924 例 97程序運(yùn)行界面 實(shí)現(xiàn)思路： 本題使用了 MSFlexGrid控件來顯示記錄集的數(shù)據(jù)， MSFlexGrid控件不是Visual Basic的標(biāo)準(zhǔn)控件，應(yīng)先把該控件加載到 Visual Basic環(huán)境中，加載方法如下： 本例要完成的功能是：當(dāng)與 Teacher表相聯(lián)系的 Data控件的記錄指針發(fā)生移動(dòng)后，要更新 MSFlexGrid控件中顯示的內(nèi)容。 （ 1）執(zhí)行 【 工程 】 → 【 部件 】 命令 ,將會(huì)出現(xiàn)“部件”對(duì)話框； （ 2）在“控件”頁的列表框中找到“ Microsoft FlexGrid Control ‖控件并選中它； （ 3）單擊“確定”按鈕。 ? DBlist控件和 DbCombo控件的使用 ? MSFlexGrid控件的使用 ? DBGrid控件的使用 高級(jí)數(shù)據(jù)綁定控件的使用 DBlist控件和 DbCombo控件的使用 1．作用 DBList控件和 DBCombo控件在功能上類似于標(biāo)準(zhǔn)的列表框和組合框，用來給用戶提供選項(xiàng)列表。DBlist和 DBCombo的區(qū)別在于， DBlist是列表框，而 DBCombo是組合框。 （ 2） DataSource屬性 DataSource屬性用來指出輸入或修改的數(shù)據(jù)來源，通常為一個(gè) Data控件名，該 Data控件形成的記錄集的一個(gè)字段用來接收用戶的輸入或修改，如圖 925中的聯(lián)系 Teacher表的 Data控件。 3．兩個(gè)控件的主要屬性 （ 4） DataField屬性 DataField屬性用來指定用戶輸入或修改的數(shù)據(jù)保存到 DataSource屬性指定的 Data控件形成的記錄集的哪個(gè)字段，如圖 925中 Teacher表形成的數(shù)據(jù)集中的DepartNo字段。實(shí)際工作方式是：根據(jù)用戶輸入ListField字段的值，找到 BoundColumn中的對(duì)應(yīng)值，再把該值寫到 DataField字段中。程序的運(yùn)行界面分別如圖 926所示。 圖 926 例 98程序運(yùn)行界面 實(shí)現(xiàn)思路： 要使用 Department表中保