【文章內(nèi)容簡介】 DatabaseName屬性指定具體使用的數(shù)據(jù)庫文件名，包括所有的路徑名。如果連接的是單表數(shù)據(jù)庫，則DatabaseName屬性應(yīng)設(shè)置為數(shù)據(jù)庫文件所在的子目錄名，而具體文件名放在RecordSource屬性中。 例如，要連接一個(gè)Microsoft Access的數(shù)據(jù)庫C:\，則設(shè)置DatabaseName=”C:＼，Access數(shù)據(jù)庫的所有表都包含在一個(gè)MDB文件中。如果連接一個(gè)FoxPro數(shù)據(jù)庫如C:＼VB6＼,則DatabaseName=”C:＼VB6”，RecordSource=””，stu_fox數(shù)據(jù)庫只含有一個(gè)表。 3．RecordSource屬性RecordSource確定具體可訪問的數(shù)據(jù)，這些數(shù)據(jù)構(gòu)成記錄集對(duì)象Recordset。該屬性值可以是數(shù)據(jù)庫中的單個(gè)表名，—個(gè)存儲(chǔ)查詢，也可以是使用SQL查詢語言的一個(gè)查詢字符串。 例如，則RecordSource=”基本情況”。而RecordSource=”Select * From 基本情況Where專業(yè)=’物理’ ”，則表示要訪問基本情況表中所有物理系學(xué)生的數(shù)據(jù)。 4．RecordType屬性 RecordType屬性確定記錄集類型。 5．EofAction和BofAction屬性當(dāng)記錄指針指向Recordset對(duì)象的開始(第一個(gè)記錄前)或結(jié)束(最后一個(gè)記錄后)時(shí)，數(shù)據(jù)控件的EofAction和BofAction屬性的設(shè)置或返回值決定了數(shù)據(jù)控件要采取的操作。 EofAction和BofAction屬性屬性取值操作BofAction0控件重定位到第—個(gè)記錄1移過記錄集開始位，定位到一個(gè)無效記錄，觸發(fā)數(shù)據(jù)控件對(duì)第一個(gè)記錄的無效事件ValidateEofAction0控件重定位到最后—個(gè)記錄1移過記錄集結(jié)束位，定位到一個(gè)無效記錄，觸發(fā)數(shù)據(jù) 控件對(duì)最后一個(gè)記錄的無效事件Validate 2向記錄集加入新的空記錄，可以對(duì)新記錄進(jìn)行編輯，移動(dòng)記錄指針，新記錄寫入數(shù)據(jù)庫在Visual Basic中，數(shù)據(jù)控件本身不能直接顯示記錄集中的數(shù)據(jù)，必須通過能與它綁定的控件來實(shí)現(xiàn)?？膳c數(shù)據(jù)控件綁定的控件對(duì)象有文本框、標(biāo)簽、圖像框、圖形框、列表框、組合框、復(fù)選框、網(wǎng)格、DB列表框、DB組合框、DB網(wǎng)格和OLE容器等控件。要使綁定控件能被數(shù)據(jù)庫約束，必需在設(shè)計(jì)或運(yùn)行時(shí)對(duì)這些控件的兩個(gè)屬性進(jìn)行設(shè)置：(1)DataSource屬性DataSource屬性通過指定—個(gè)有效的數(shù)據(jù)控件連接到一個(gè)數(shù)據(jù)庫上。(2)DataField屬性DataField屬性設(shè)置數(shù)據(jù)庫有效的字段與綁定控件建立聯(lián)系。綁定控件、。綁定控件數(shù)據(jù)庫數(shù)據(jù)控件 綁定控件、數(shù)據(jù)控件和數(shù)據(jù)庫三者的關(guān)系 當(dāng)上述控件與數(shù)據(jù)控件綁定后，Visual Basic將當(dāng)前記錄的字段值賦給控件。如果修改了綁定控件內(nèi)的數(shù)據(jù)，只要移動(dòng)記錄指針，修改后的數(shù)據(jù)會(huì)自動(dòng)寫入數(shù)據(jù)庫。數(shù)據(jù)控件在裝入數(shù)據(jù)庫時(shí)，它把記錄集的第一個(gè)記錄作為當(dāng)前記錄。當(dāng)數(shù)據(jù)控件的BofAction屬性值設(shè)置為2時(shí)，當(dāng)記錄指針移過記錄集結(jié)束位，數(shù)據(jù)控件會(huì)自動(dòng)向記錄集加入新的空記錄。 ，它包含兩個(gè)表：“基本情況”表和“學(xué)生成績表”。 學(xué)生基本情況表結(jié)構(gòu)字段名類型寬度學(xué)號(hào)Text6姓名Text10性別Text2專業(yè)Text10出生年月Date8照片Binary0 學(xué)生成績表結(jié)構(gòu)字段名類型寬度學(xué)號(hào)Text6課程Text10成績Long4學(xué)期Text2用可視化數(shù)據(jù)管理器建立以上設(shè)計(jì)的數(shù)據(jù)庫及其表，表中數(shù)據(jù)可自行錄入。 。基本情況表包含了6個(gè)字段，故需要用6個(gè)綁定控件與之對(duì)應(yīng)。這里用一個(gè)圖形框顯示照片和5個(gè)文本框顯示學(xué)號(hào)、姓名等數(shù)據(jù)。本例中不需要編寫任何代碼，具體操作步驟如下： (1)，在窗體上放置1個(gè)數(shù)據(jù)控件，一個(gè)圖形框、5個(gè)文本框和5個(gè)標(biāo)簽控件。5個(gè)標(biāo)簽控件分別給出相關(guān)的提示說明。 (2)將數(shù)據(jù)控件Data1的Connect屬性指定為Access類型，RecordSource屬性設(shè)置為“基本情況”表。(3)圖形框和5個(gè)文本框控件Text1～Text5的DataSource屬性都設(shè)置成Data1。通過單擊這些綁定控件的DataField屬性上的“…”按鈕，將下拉出基本情況表所含的全部字段，分別選擇與其對(duì)應(yīng)的字段照片、學(xué)號(hào)、姓名、性別、專業(yè)和出生年月，使之建立約束關(guān)系。 。5個(gè)文本框分別顯示基本情況表內(nèi)的字段：學(xué)號(hào)、姓名、性別、專業(yè)和出生年月的內(nèi)容，圖形框顯示每個(gè)學(xué)生的照片。 使用數(shù)據(jù)控件對(duì)象的4個(gè)箭頭按鈕可遍歷整個(gè)記錄集中的記錄。單擊最左邊的按鈕顯示第l條記錄；單擊其旁邊的按鈕顯示上一條記錄；單擊最右邊的按鈕顯示最后一條記錄；單擊其旁邊的按鈕顯示下—條記錄。數(shù)據(jù)控件除了可以瀏覽Recordset對(duì)象中的記錄外，同時(shí)還可以編輯數(shù)據(jù)。如果改變了某個(gè)字段的值，只要移動(dòng)記錄，這時(shí)所作的改變存入數(shù)據(jù)庫中。Visual Basic ，幾乎不用編寫代碼就可以實(shí)現(xiàn)多條記錄數(shù)據(jù)顯示。當(dāng)把數(shù)據(jù)網(wǎng)格控件的DataSource屬性設(shè)置為一個(gè)Data控件時(shí)，網(wǎng)格控件會(huì)被自動(dòng)地填充，并且其列標(biāo)題會(huì)用Data控件的記錄集里的數(shù)據(jù)自動(dòng)地設(shè)置。 data控件與MsFlexGrid控件結(jié)合顯示數(shù)據(jù)庫中信息 。MsFlexGrid控件不是Visual Basic工具箱內(nèi)的默認(rèn)控件，需要在開發(fā)環(huán)境中選擇“工程|部件”菜單命令，并在隨即出現(xiàn)的對(duì)話框中選擇“MicroSoft FlexGrid Control ”選項(xiàng)，將其添加到工具箱中。請(qǐng)讀者自行比較不可卷動(dòng)列屬性FixedCols=0與FixedCols=1的區(qū)別。 控件屬性默認(rèn)控件名其它屬性設(shè)置Data1DatabaseName=”c:\”RecordsetType=0RecordSource=”基本情況”MSFlexGrid1DataSource=Data1FixCols=0 數(shù)據(jù)控件的常用方法 數(shù)據(jù)控件的內(nèi)置功能很多，可以在代碼中用數(shù)據(jù)控件的方法訪問這些屬性。1．Refresh方法如果在設(shè)計(jì)狀態(tài)沒有為打開數(shù)據(jù)庫控件的有關(guān)屬性全部賦值，或當(dāng)RecordSource在運(yùn)行時(shí)被改變后，必須使用數(shù)據(jù)控件的Refresh方法激活這些變化。在多用戶環(huán)境下，當(dāng)其他用戶同時(shí)訪問同一數(shù)據(jù)庫和表時(shí)，Refresh方法將使各用戶對(duì)數(shù)據(jù)庫的操作有效。例如：，使所連接數(shù)據(jù)庫所在的文件夾可隨程序而變化：Private Sub Form_Load( ) Dim mpath As String Mpath= ’獲取當(dāng)前路徑 If Right(mpath,1)”/” Then mpath=mpath+”/” =mpath+”” ’連接數(shù)據(jù)庫 =”基本情況” ’構(gòu)成記錄集對(duì)象 ’激活數(shù)據(jù)控件End Sub2．UpdateControls方法UpdateControls方法可以將數(shù)據(jù)從數(shù)據(jù)庫中重新讀到被數(shù)據(jù)控件綁定的控件內(nèi)。因而我們可使用UpdateControls方法終止用戶對(duì)綁定控件內(nèi)數(shù)據(jù)的修改。 例如：，就可以實(shí)現(xiàn)對(duì)記錄修改的功能。 3. UpdateRecord方法當(dāng)對(duì)綁定控件內(nèi)的數(shù)據(jù)修改后，數(shù)據(jù)控件需要移動(dòng)記錄集的指針才能保存修改。如果使用UpdateRecord方法，可強(qiáng)制數(shù)據(jù)控件將綁定控件內(nèi)的數(shù)據(jù)寫入到數(shù)據(jù)庫中，而不再觸發(fā)Validate事件。在代碼中可以用該方法來確認(rèn)修改。 記錄集的屬性與方法 由RecordSource確定的具體可訪問的數(shù)據(jù)構(gòu)成的記錄集Recordset也是一個(gè)對(duì)象，因而，它和其他對(duì)象一樣具有屬性和方法。下面列出記錄集常用的屬性和方法。1．AbsolutePosition屬性AbsolutePosition返回當(dāng)前指針值，如果是第1條記錄，其值為0，該屬性為只讀屬性。2．Bof和Eof的屬性 Bof判定記錄指針是否在首記錄之前，若Bof為True，則當(dāng)前位置位于記錄集的第1條記錄之前。與此類似，Eof判定記錄指針是否在末記錄之后。3．Bookmark屬性 Bookmark屬性的值采用字符串類型，用于設(shè)置或返回當(dāng)前指針的標(biāo)簽。在程序中可以使用Bookmark屬性重定位記錄集的指針，但不能使用AbsolutePostion屬性。4．Nomatch屬性 在記錄集中進(jìn)行查找時(shí)，如果找到相匹配的記錄，則Recordset的NoMatch屬性為False，否則為True。該屬性常與Bookmark屬性一起使用。5．RecordCount屬性 RecordCount屬性對(duì)Recordset對(duì)象中的記錄計(jì)數(shù)，該屬性為只讀屬性。在多用戶環(huán)境下，RecordCount屬性值可能不準(zhǔn)確，為了獲得準(zhǔn)確值，在讀取RecordCount屬性值之前，可使用MoveLast方法將記錄指針移至最后一條記錄上。6．Move方法 使用Move方法可代替對(duì)數(shù)據(jù)控件對(duì)象的4個(gè)箭頭按鈕的操作遍歷整個(gè)記錄集。5種Move方法是： (1)MoveFirst方法:移至第1條記錄。 (2)MoveLast方法:移至最后一條記錄。 (3)MoveNext方法:移至下一條記錄。(4)MovePrevious方法:移至上一條記錄。(5)Move [n] 方法:向前或向后移n條記錄，n為指定的數(shù)值。 。，窗體上增加4個(gè)命令按鈕，將數(shù)據(jù)控件的Visible屬性設(shè)置為False。通過對(duì)4個(gè)命令按鈕的編程代替對(duì)數(shù)據(jù)控件對(duì)象的4個(gè)箭頭按鈕的操作。 用按鈕代替數(shù)據(jù)控件對(duì)象的箭頭按鈕命令按鈕Command1_Click事件移至第1條記錄，代碼如下：Private Sub Command1_Click()End Sub命令按鈕Command4_Click事件移至最后一條記錄，代碼如下：Private Sub Command4_Click() End Sub 另外兩個(gè)按鈕的代碼需要考慮Recordset對(duì)象的邊界的首尾，如果越界，則用MoveFirst方法定位到第1條記錄或用MoveLast方法定位到最后一條記錄。程序代碼如下：Private Sub Command2_Click() If Then End SubPrivate Sub Command3_Click() If Then End Sub7．Find方法使用Find方法可在指定的Dynaset或Snapshot類型的Recordset對(duì)象中查找與指定條件相符的一條記錄，并使之成為當(dāng)前記錄。4種Find方法是： (1)FindFirst方法：從記錄集的開始查找滿足條件的第1條記錄。 (2)FindLast方法：從記錄集的尾部向前查找滿足條件的第l條記錄。 (3)FindNext方法：從當(dāng)前記錄開始查找滿足條件的下一條記錄。 (4)FindPrevious方法：從當(dāng)前記錄開始查找滿足條件的上一條