Question

VB窗体怎么用ADO控件或者DATAGrid控件连接Access数据库

Answer 1

题主可以创建一个窗体，添加一个DATAGrid控件和一个ADO控件，然后将DATAGrid控件的DATASOURCE属性设置为ADO控件名，并将ADO控件的ConnectionString属性设置为相应的连接字符，并在RecordSource属性中的属性页里命令文本（SQL）栏填写相应的SQL语句即可完成对ACCESS数据库的连接。

下面提供一个更为机动绑定记录集的方案供参考，点击命令按钮，显示查询结果：

创建一个窗体，添加一个DATAGrid控件和一个ADO控件，然后将DATAGrid控件的DATASOURCE属性设置为ADO控件名

Private Sub Command1_Click()
    Dim cnStr As String            '声明一个连接字符串变量
    Dim sqlStr As String            '声明一个SQL查询字符串变量
    Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    
    '设置远程连接字符串
    cnStr ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source='\\192.168.1.100\Shared\TestDB.mdb';"
    rs.CursorLocation=adUseClient
    '设置SQL查询字符串
    sqlStr="select * from table1"
    '打开连接
    cn.Open cnStr
    '打开记录集
    rs.Open sqlStr,cn,adOpenKeyset,adLockOptimistic
    '将table1的内容显示于Datagrid1中
    Set Adodc1.Recordset = rs
End Sub

Answer 2

本人有一例可以给你看看。。晚上给你演示

追答

在吗

👇
q