VB中如何ADODB 实现查询后显示在DATAGRID

简单明了就行。

VB使用ADODB的Recordset 对象，将SQL查询字符串传递给 Recordset 对象的 Open 方法，来获取查询结果于记录集。使用Set 语句将查询的记录集赋给DataGrid控件的DataSource属性来实现显示于DataGrid控件中。

Recordset 对象 (ADO)，表示的是来自基本表或命令执行结果的记录全集。任何时候，Recordset 对象所指的当前记录均为集合内的单个记录。
在打开 Recordset 之前设置 CursorType 属性来选择游标类型，或使用 Open 方法传递
CursorType 参数。部分提供者不支持所有游标类型。请检查提供者的文档。如果没有指定游标类型，ADO 将默认打开仅向前游标。

Set 语句，将对象引用赋给变量或属性。

SQL， Structured Query
Language（结构化查询语言 (SQL)），一种数据查询和编程语言。

代码实例：
Private Sub Command1_Click()
    Dim cn As New ADODB.Connection '定义数据库的连接
    Dim rs As New ADODB.Recordset
    Dim sql As String
    sql = "select * from jishijilu" '
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\wd.mdb;Persist Security Info=False"
    cn.Open
    rs.CursorLocation = adUseClient
    rs.Open sql, cn, adOpenDynamic, adLockOptimistic
    Set DataGrid1.DataSource = rs
End Sub

Set DataGrid1.DataSource = rs DataGrid1.Refresh

Dim con As New ADODB.Connection Dim rs As ADODB.Rescordset con.open "Privader=....." rs.open "select * from table1",con '创建记录集实例，有字符串连接 Set Datagrid1.DataSource=rs ‘set使Datagrid1得数据源（Datasource）是rs这个记录集。 DataGrid1.Refresh '刷新显示数据。

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！