VB中简单访问Access

在 工程->引用 中选上Microsoft ActiveX Data Object 2.8 Library

在 工程->部件 中选上Microsoft DataGrid Control 6.0(SP6)(OLEDB)显示数据控件

声明

Private Rs As New ADODB.Recordset

Private Conn As New ADODB.Connection

使用

Dim str As String

str = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:/look.mdb "

Conn.CursorLocation = adUseClient

Conn.Open str

Rs.Open "select * from student",Conn,adOpenDynamic,adLockReadOnly

Set DataGrid1.DataSource = Rs'显示

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!