coincido en parte con malkavian
la consulta seria algo asi:
sql = " select * from usuarios where usuario = " & txusuario
if txpass >< r!Password then
msgbox = "El pass es incorrecto"
else
frminicial.show vb modal
unload me
end if
Por supuesto que puedes ademas capturar la cantidad de veces que fue incorrecto y descargar el formulario luego de 3 o 5 veces y agregar muchas validaciones mas como por ejemplo que el usuario este en la tabla y deformar la contraseña al guardarla para mayor seguridad.
saludos