Problème avec InputBoxDK ?

Bonjour,

J'utilise le code suivant :
http://www.tek-tips.com/faqs.cfm?fid=4617

Il permet de masquer avec des astérisques le mot de passe entré dans l'input box.

Cependant, quand je l'utilise, il ferme mon application...

En déboguant, le fermeture d'Access se produit sur la ligne suivante :

Code:

---

InputBoxDK = InputBox(Prompt, Title, Default, XPos, YPos, HelpFile, Context)

---

Savez-vous pourquoi ?

Comment faire fonctionner ce code ?

Merci,
ZiP

J'ai placé le code dans un module indépendant et non dans mon code principal.

Ça fonctionne de cette manière, cependant, je pense qu'il doit pourvoir tourner dans mon code principal.

Peut-être une erreur de recopie...

ZiP