dans les boîtes à textes changer l'événement, contrôle pour voir la longueur du texte. Quand je veux faire ceci, je généralement assigne une étiquette (lbl_CharRemaining) à la boîte à textes et emploie le code comme lequel regarde quelque chose :
txt_TextBoxName_Change secondaire privé
strPrevious statique comme corde
si Len (me.txt_TextBoxName.text et "") > 50000 puis
me.txt _TextBoxName.text = strPrevious
Autrement
strPrevious = me.txt _TextboxName.text
Finir si
me.lblCharRemaining = 50000 - Len (me.txt_TextBoxName.text et "")
Sous-marin d'extrémité