小问题，再线等。。。

[zhuanzhu_zhizhuo]

Dim strSql As String
strSql = "select * from netAddress "

Set conn = New clsCurrentdb ‘写的类模块
Set rst = conn.ConnExecute(strSql) ’执行查询操作
Do While Not rst.EOF And Not rst.BOF
Debug.Print rst!address
rst.MoveNext
Loop
MsgBox rst.RecordCount
Set dgAddress.DataSource = rst
dgAddress.Refresh
到这里了可以执行 但是datagrid不显示数据 ,我从打开数据库连接的那里设置的客户端游标。。请问什么原因

[吾非大神]

补从楼上

设置datagrid的列属性

[cangwu_lee]

Conn.CursorLocation=adUseClient

[clear_zero]

Conn.CursorLocation=adUseClient

[T97102003]

单独设置rst的游标为客户端游标