vb的datagrid控件怎么用?

Question

在access窗体里面可以用datagrid控件吗？
Dim rs As New ADODB.Recordset
rs.Open "select * from 表1", CurrentProject.Connection, 1, 1
Set dg1.DataSource = rs
'dg1 就是一个datagrid，我这样设置对吗？怎么没有任何反应阿？我的环境不是vb，是vba的Access环境，谁能帮忙？

Answer 1

你先用ADODC直接绑定试试行了再说.....

Answer 2

Dim CN   As New ADODB.Connection                '定义数据库的连接存放数据和代码
    Dim Rs   As New ADODB.Recordset
    CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
    CN.Open
    Rs.CursorLocation = adUseClient
    Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
      Set DataGrid1.DataSource = Rs

Answer 3

要加上Rs.CursorLocation = adUseClient
才可以的，我原来也是这样的，总是出错，加上就好了

Answer 4

Dim CN   As New ADODB.Connection                '定义数据库的连接存放数据和代码
    Dim Rs   As New ADODB.Recordset
    CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
    CN.Open
    a1.connectionstring=cn.connectionstring
    a1.recordsource=msql
    a1.refresh
    set dg1.datasource=a1
    dg1.refresh

Answer 5

忘了说了，a1是adodc的名字，dg1是datagrid的名字

Answer 6

你说的情况的确有，解决办法和appleboyallen(揪揪) 一样，必须
在rs.open前加上Rs.CursorLocation = adUseClient，这样就行了。