Fråga : Hur uppsättningen en begränsa numrerar av caracters för en oberoende TextBox i en bilda

(Jag har någonsin att fråga denna ifrågasätter, men does'nt hade en mycket bra lösning). Jag har en oberoende textbox som kan motta röding 64000, men jag önskar till uppsättningen den för att ha max röding endast 50000 (vid exempel). Den bäst lösningen bör ha det samma uppförandet än, när den har röding 64000. Textboxen måste gör inte räddningen varje gång I-pressen ett nyckel- och måste vara REKO, när kopiera/deg för, om det possible.
It är möjligheten tar fram in 2003 och mer för att fixa en begränsa till textboxen under än röding 64000?
Thanks! (Ledset för mitt engelska) " klar "

Svar : Hur uppsättningen en begränsa numrerar av caracters för en oberoende TextBox i en bilda

i textboxesna ändra händelsen, kontroll för att se längden av texten.  När jag önskar att göra denna, jag tilldelar allmänt en etikett (lbl_CharRemaining) till textboxen, och bruk kodifierar att looks något något liknande:

Privat undertxt_TextBoxName_Change

    strPrevious statisk elektricitet som stränger

    om Len (me.txt_TextBoxName.text & "") > 50000 därefter
        me.txt _TextBoxName.text = strPrevious
    Annars
        strPrevious = me.txt _TextboxName.text
    Avsluta om
    me.lblCharRemaining = 50000 - Len (me.txt_TextBoxName.text & "")

Avsluta suben