Visual Basic - Problema con Recordset, ayuda

[color=darkred]Tengo un problema para declarar un recordset. e actualizado una aplicación de 6.0 a .Net y no se ha generado correctamente y no se muy bien como hacerlo.

X= db.Recordsets(sql)

dpto_entrada = recordset(0).Fields(1).Value

sql = "select descripcion from tipo_usuario where id_tipo_usuario=" & Str(tipo_entrada)
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto X. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC/commoner/redir/redirect.htm?keyword="vbup1037"'
X= db.Recordsets(sql)
nombre_grupo_entrada =recordset.Fields(1).Value
WorkGen.Close()[/color]

Pero que error te sale??
ahi he visto lo siguiente, poruqe no intentas con:

Set X= db.Recordsets(sql)