Problème avec désactivation de la touche shift

Bonjour à tous,

Je travaille sous Access 2000 et je souhaite désactiver la touche shift au
démarrage de ma base de données. J'ai puisé le code sur l'excellent site de
Hervé Inisan. Voici le code :

Function DesactiverMaj()
Dim blnAutoriserMaj As Boolean

'La fonction IsGroup permet d'identifier le groupe du user en cours
If IsGroup(Application.CurrentUser, "Admins") = True Then
blnAutoriserMaj = True
Else
blnAutoriserMaj = False
End If

ModifiePropr "AllowBypassKey", dbBoolean, blnAutoriserMaj
End Function

Function ModifiePropr(chNomPropriété As String, varTypeProp As Variant, _
varValeurProp As Variant) As Integer
Dim bds As DAO.Database, prp As DAO.Property
Const conErreurPropNonTrouvée = 3270

Set bds = CurrentDb
On Error GoTo Change_Err
bds.Properties(chNomPropriété) = varValeurProp
ModifiePropr = True

Change_Sortie:
Exit Function

Change_Err:
If Err = conErreurPropNonTrouvée Then ' Propriété non trouvée.
Set prp = bds.CreateProperty(chNomPropriété, varTypeProp,
varValeurProp)
bds.Properties.Append prp
Resume Next
Else
' Erreur inconnue.
ModifiePropr = False
Resume Change_Sortie
End If
End Function

Ca fonctionne bien, mais j'ai un petit problème et je ne sais pas si c'est
normal.

Si je garde Shift appuyé lorsque je me logue en administrateur, la touche
shift est désactivée à la deuxième tentative. Lorsque je quitte ma session
administrateur et j'ouvre tout de suite la base avec un groupe différent que
Admins en gardant la touche shift appuyée, la touche shift est également
désactivée, ce qui n'est pas génial

En fait, j'ai remarqué que la touche shift est effectivement désactivée pour
un groupe autre que Admins que lorsque je me serais logué une fois
normalement (sans garder la touche shift appuyée) avec un groupe autre que
Admins (j'espère que vous me suivez). Donc, si je fais des modifs en tant
qu'administrateur, ensuite je dois me loguer avec un groupe différent de
Admins pour que la touche shift soit à nouveau désactivée.

Est-ce normal ou existe-t-il un moyen pour que la touche shift soit vraiment
désactivée si je me logue avec un groupe autre que Admins (même si je viens
de me loguer en tant qu'administrateur en maintenant la touche shift
appuyée).

Je vous remercie d'avance si vous pouvez m'aider (en espérant que vous avez
compris mes explications fumeuses)

Cordiales salutations à tous
Fabrice