textbox max Länge
06.01.2004 09:04:27
Jonathan
erstmal danke für Deine Antwort gestern abend noch, Hajo. Leider konnte ich nicht mehr antworten, wie du ja mitbekommen haben wirst, ist alles bei mir abgeschmirt..........
Nun zu meiner Frage:
mit folgendem Code möchte ich die Begrenzung 3er Textboxen erreichen (habe ich aus dem forum hier):
Private Sub Nachname_Change()
If Len(Me.Nachname & Me.Vorname & Me.Firma) > 16 Then
MsgBox "Sie haben für die drei Felder Nach- Vorname und Firma insgesamt 16 Zeichen zur Verfügung.", vbInformation
End If
End Sub
So, nun erscheint nach Eingabe des 16. Zeichens ja nun die TextBox, jedoch werden die eingaben nicht um die zu viel eingegebenen gekürtzt. D.h. es stehen 17 Zeichen in den TextBoxen, bei jedem Öffnen der UF erscheint die Meldung. Wie kann ich die Länge der eingegebenen Zeichen der ausgewählten TextBox kürzen, so dass insgesammt nur 16 Zeichen in den 3en stehen........
Liebe Grüße
Jonathan
Anzeige