✔ TextBox

[Da_Ron]

Tach ich hätt da mal ein Problem!

Ich möchte eine TextBox so einstellen das nur z.B. 4 Buchstaben oder Zahlen eingegeben werden dürfen! Würde mich sehr über ein fertiges Script oder hinweise freuen!

Ich bedank mich schon mal im vorraus

 

[Shakie]

Stell die Eigenschaft "MaxLength" auf 4

 

[AtomSoldier]

Sehr schlechte Lösung:

Ich hab dir hier was gecodet, das nur 4 zeichen erlaubt in der TextBox.
Ist aber eine schlechte Lösung, vllt. hilft es dir.

Private Sub Text1_Change()
 If Len(Text1.Text) >= 5 Then
  Text1.Text = Left(Text1.Text, Len(Text1.Text) - 1)
  Text1.SelStart = Len(Text1.Text)
  
  End If
 End Sub

EDIT:
VERDAMMT, geht ja so einfach mit der MaxLenth ! LOOOL ICh bin ein idiot....
lool.............

 

[Da_Ron]

Danke für eure Hilfe beide funktionieren!