Cómo obtener el valor del registro en la base de datos en VB

Por ejemplo, los campos de una tabla INFO son: usuario, contraseña, pregunta, respuesta

Dim cn As New ADODB.Connection 'Definir la conexión a la base de datos

Dim rs As New ADODB.Recordset

''''

Conéctese a la base de datos aquí

''''

' Declaración de consulta

SQL="select * from INFO donde usuario='cuenta"

rs.open SQL

rs.movefirst

pw=rs.Fields (1).Value '''Esta es la contraseña

o

pw=rs.Fields("contraseña").Value '''Esta es la contraseña