Visual Basic - Consulta usuario y pass en ADO

Hola :
Tengo q reconocer un usuario y contraseña, la BD es access 2000, me manejo con el adodc, me manejo en eso de agregar registros . adodc1.recordset.addnew, en ir de aqui para alla con los movelast y movefirst...

pero quiero hacer una consulta para ver si existe el usuario mas su contraseña para asi dar paso a la aplicacion, pero no se como hacerlo...de forma facil..asi como para comenzar con esto de las consultas...si alguien me pudiese ayudar estaria muy agradecido.. salu2,.

Espero que esto te pueda ayudar

Private Sub cmdAceptar_Click()
Dim rs As New ADODB.Recordset
Dim constring1 As String

'Coloca el nombre de la bd definida en el odbc

constring1 ="Provider=MSDASQL.1;"& _
"Persist Security Info=False;Data Source=NombreBD"

Set rs = New ADODB.Recordset
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic


rs.Open"select * from USUARIO WHERE USER='" & User.Text & "' AND PASSWORD='" & txtpassword.Text & "'", constring1
If rs.BOF = True Then
MsgBox " Password Invalido ", vbCritical, "Error de Password"
txtpassword.Text = ""
txtpassword.SetFocus
Else
StrUsuario = User.Text
Load NuevoForm.Show
End If
rs.Close
End Sub

Nota" si aparecen /// en el codigo son espacios"