---

Hallo Zusammen,

Ich habe einen textbox wohin der User einen 6-Stelligen Zahl eingeben soll.

Wie kann den Textbox so definieren dass nur 6 Zeichen eingegeben werden darf?

------------------
Gruss BADU

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

schau Dir mal z.B. im Eigenschaftsfenster die Eigenschaft MaxLength an ;-)

lg Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Oh ja! ich habs gefunden!

Danke

------------------
Gruss BADU

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

wie kann ich definieren dass mindestens 6 Zahlen eingeben muss?

------------------
Gruss BADU

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Badu,

mal als Ansatz, weiss nicht ob so gewünscht:

Code:

---

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  If Len(TextBox1.Text) <> 6 Then
    MsgBox "keine 6-stellige Nummer"
    Cancel = True
  End If
End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
  If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub

---

lg Nancy
--
A computer, to print out a fact,
Will divide, multiply, and subtract.
        But this output can be
        No more than debris,
If the input was short of exact.
                -- Gigo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP