Visual Basic - No garda datos a la grilla

Hola tengo un problema.. como hago para que se vea los datos en la grilla?, uso access 2000 y logra abrir la coneccion, pero cuando quiero darle el recordset a la grilla no sale("ESTA CLASE NO ADMITE AUTOMATIZACION O NO ADMITE LA INTERFAZ ESPERADA". Gracias a todos.
strSQL = "la consulta sql"
rsDataIngresos.CursorLocation = adUseClient
rsDataIngresos.CursorType = adOpenDynamic
rsDataIngresos.LockType = adLockBatchOptimistic
rsDataIngresos.Open strSQL, cnConeccionAccess

Set dbgIngresos.DataSource = rsDataIngresos <==aca es el error