小问题，再线等。。。

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不显示数据 ,我从打开数据库连接的那里设置的客户端游标。。请问什么原因