#Afficher le résultat d'un requête en VBA POUR FORMULAIRE #

Je sollicite votre aide j'ai vraiment besoin d'aide j'ai ecris une requete SQL dans un code VBA j'ai du mal a afficher le resultat de ma requete

Voici mon code sa me met une erreur ("Type defini par l'utilisateur non defini")

#

Private Sub Commande5_Click()
Dim rs As DAO.Recordset
Dim db As DAO.Database
Dim LOGIN, Modpass As String
Dim UTILISATEUR As String
Dim sql As String

Set db = DBEngine.OpenDatabase("")

sql = "SELECT UTILISATEUR.[LOGIN], UTILISATEUR.[Modpass] FROM UTILISATEUR WHERE ([UTILISATEUR]![LOGIN] AND [UTILISATEUR]![Modpass])"

Set rs = db.OpenRecordset(sql, dbOpenForwardOnly, dbReadOnly)

DoCmd.OpenForm "CREATION UTILISATEUR"
If MsgBox("ACCES REFUSE; MOT DE PASSE ET/OU LOGIN INCORRECT", vbQuestion + vbYesNo, "CONFIRMATION") = vbNo Then
Me.Undo
Cancel = True
DoCmd.Close acForm, "CREATION UTILISATEUR"
Else
DoCmd.Close acForm, "CONNEXION ANNEXE"
End If
End Sub #