vb如何讀取access數(shù)據(jù)庫(kù)

小億
146
2024-04-19 16:17:08

在VB中，可以使用ADODB對(duì)象來(lái)連接和讀取Access數(shù)據(jù)庫(kù)。以下是一個(gè)簡(jiǎn)單的示例代碼：

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\your\database.accdb;"
conn.Open

Set rs = New ADODB.Recordset
rs.Open "SELECT * FROM tableName", conn

Do While Not rs.EOF
    MsgBox rs.Fields("columnName").Value
    rs.MoveNext
Loop

rs.Close
conn.Close

Set rs = Nothing
Set conn = Nothing

在上面的示例中，首先創(chuàng)建一個(gè)ADODB.Connection對(duì)象并設(shè)置連接字符串，然后打開連接。接著創(chuàng)建一個(gè)ADODB.Recordset對(duì)象，并使用Open方法執(zhí)行查詢語(yǔ)句。最后使用循環(huán)讀取Recordset中的數(shù)據(jù)，并在MessageBox中顯示。最后關(guān)閉Recordset和連接對(duì)象，并將其設(shè)置為Nothing釋放內(nèi)存。

0 踩