Bonjour,
quelle référence faut-il ajouter au VBA pour pouvoir utiliser les fonctions de texte telles que UCase.

A l'exécution de mon code j'obtiens :
Projet ou bibliothèque introuvable.
Sur UCase.

Merci.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub btnValider_Click()
    'test login, pdw
    If UCase(tbPwd.Value) = UCase(SqlToString("SELECT pwd FROM Pwd WHERE Login='" & tbLogin.Value & "'")) Then
        DoCmd.OpenForm "frmMenu", acNormal, , , acFormReadOnly, , tbLogin.Value
        'Unload Forms.Item("frmlogin")
    Else
        MsgBox "Le login et / ou le mot de passe n'est pas correct", vbExclamation
    End If
 
End Sub