在VB中訪問ACCESS數(shù)據(jù)庫的方法

Visual BASIC具有面向?qū)ο蟆④浖募墒介_發(fā)、事件驅(qū)動、結(jié)構(gòu)化的程序設計語言、數(shù)據(jù)庫訪問功能、網(wǎng)絡功能、支持對象的鏈接與嵌入技術(shù)、支持動態(tài)交換、多個應用程序向?qū)У忍攸c。以可視化的窗口為主的應用廣泛的編程軟件。

一、Visual BASIC課程開設的意義

對于中職的計算機專業(yè)的學生到第五學期面臨綜合實踐的完成。我們利用了VB的面向?qū)ο蟮某绦蛟O計思想，是將復雜的程序設計問題分解為多外具有獨立功能并相對簡單的對象集合等特點開設了這門課程以幫忙學生完成畢業(yè)設計。

二、開發(fā)實例中的難點及問題

軟件開發(fā)中程序員可根據(jù)程序和界面設計要求，直接在先設計出窗口、菜單、按鈕等不同類型的對象，并為每個對象設置好具體的屬性。事件的觸發(fā)是由用戶通過方法來完成的操作，也可以由系統(tǒng)或應用程序觸發(fā)。所以學生在每章每節(jié)的課堂點點滴滴的教學中掌握并理解了具體的控件。

三、行之有效的連接方法

開發(fā)數(shù)據(jù)庫管理系統(tǒng)就是要對數(shù)據(jù)庫進行操作時，一是要使用戶可以在窗口界面上對需要的數(shù)據(jù)進行訪問；二是對數(shù)據(jù)庫中的數(shù)據(jù)進行各種操作，最后的結(jié)果還要反饋給用戶。這里我們采用ADODB，相比DAO和能訪問數(shù)據(jù)庫的API來說，它比DAO更靈活，更強大；而比起API，它更簡單易用，更適合初學者。而Access數(shù)據(jù)庫比起SQL也相對簡單了很多，且能夠滿足中小型應用程序的需要，所以我們在使用數(shù)據(jù)庫時，選擇了Access。

下面我就自己的一點教學經(jīng)驗談談在VB中連接ACCESS數(shù)據(jù)庫的兩種有效的方法：

第一種方法：

首先我們從控件箱中托入一個adodc1控件到窗口中，adodc1控件名稱為Date1，然后在 Date1控件的屬性里設置數(shù)據(jù)庫文件的路徑。

設置Date1控件的屬用以連接數(shù)據(jù)庫，在date控件上右鍵——Adodc屬性——使用連接字符串——成——Microsoft Jet 4.0 OLE DB Provider——下一步——選擇或輸入數(shù)據(jù)庫名稱——找到要連接的數(shù)據(jù)庫后，確定。然后記錄源設置屬性，如果要把內(nèi)容提交到數(shù)據(jù)庫一般使用adCmdTable，選擇要連接的表。設置完畢后就可以了。如果我們想把內(nèi)容提交到數(shù)據(jù)庫，舉個例子，事先在ACCESS中設好數(shù)據(jù)庫，并在其中做好所需要表。然后在在窗體建立一個文本框，設置屬性中的DataSource為Date1控件，DataField是要連接的數(shù)據(jù)庫的字段名。我們可以根據(jù)需要從設好的數(shù)據(jù)庫中選取有用的字段名，設置好后在窗體加一個添加記錄和一個提交的按鈕，設置代碼： Private Sub Command1_Click（）

Date1.Recordset.Update '對新數(shù)據(jù)保存

Date1.Refresh '對數(shù)據(jù)刷新

End Sub

添加按鈕代碼如下：

Private Sub Command2_Click（）

Date1.Recordset.AddNew '添加新紀錄

Date1.Recordset（\"姓名\"）.Value = Text1.Text

End Sub

此種方法簡單易操作，但是當源文件路徑發(fā)生變化就需要重新設置數(shù)據(jù)庫的路徑，如果不設置就發(fā)生“找不到指定的文件”事件。

第二種方法：

這種方法是通過代碼設置數(shù)據(jù)庫的路徑，在開發(fā)系統(tǒng)實例中如果沒有建立好數(shù)據(jù)庫的話，先建立一個數(shù)據(jù)庫，然后建立一個表，比如我們建的表名為message，然后把里面的字段名稱和數(shù)據(jù)類型都按自己的需要設置好，然后保存就可以了。

打開Microsoft Visual Basic6.0企業(yè)版，在事先做好的需要調(diào)用數(shù)據(jù)庫的窗體上加入一個adodc控件，名稱為：Date2。

在窗體添加一個text控件，名稱為Text1；一個添加記錄按鈕，名稱為App；一個提交按鈕，名稱為Save。

在窗體設置代碼

Private Sub Form_Load（）

Date2.ConnectionString = \"Provider=Microsoft.Jet.OLEDB.4.0；Data Source=\" + App.Path + \"＼＼db1.mdb；Persist Security Info=False\"'設置數(shù)據(jù)庫路徑

Date2.CommandType = adCmdText '設置記錄源

Date2.RecordSource = \"select * from message\" '連接數(shù)據(jù)庫的message表文件

Set Text1.DataSource = Date2

Text1.DataField = \"姓名\"

End Sub

添加記錄按鈕代碼：

Private Sub App_Click（）

Date2.Recordset.AddNew '為表添加新紀錄

End Sub

提交代碼：

Private Sub Save_Click（）

Date2.Recordset.Update '保存添加的數(shù)據(jù)

Date2.Refresh '刷新數(shù)據(jù)庫數(shù)據(jù)

End Sub

第二種方法的優(yōu)點就是只要所創(chuàng)建的源文件和數(shù)據(jù)庫及其表在同一文件夾下，無論位置發(fā)生變化都可以連接上。

計算機專業(yè)的學生要完成綜合實踐環(huán)節(jié)，這樣的實例是不可缺少的，而要想完整地將這部分內(nèi)容完成，我們必須掌握連接數(shù)據(jù)庫的方法。而ODBC（開放式數(shù)據(jù)連接）連接就需要先配置數(shù)據(jù)庫環(huán)境、進行必要的數(shù)據(jù)源注冊、最后在進行編程時，對數(shù)據(jù)源進行連接、訪問和操作。而我們選用的ADO方法，相對靈活，功能強大、更簡單易用，更適合我們中職的學生進行簡單的數(shù)據(jù)庫系統(tǒng)開發(fā)使用。更為以后的專業(yè)知識及語言學習、數(shù)據(jù)庫的學習奠定了基礎(chǔ)。

參考文獻：

＼[1＼] VB如何連接SQL數(shù)據(jù)庫并登錄 .讀寫算，2011，（19）.