1. Diese Seite verwendet Cookies. Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies. Weitere Informationen

Guten Morgen

Dieses Thema im Forum "Visual Basic 6.0, VBA & VBScript" wurde erstellt von lobi666, 13. März 2006.

  1. lobi666

    lobi666 Grünschnabel

    TextBox begrenzung Auf Zahlen

    Hallo ich habe wenn auch eine warscheinlich recht einfache Frage doch für mich sehr Wichtige. Ich sitze gerade in der Schule und habe folgende Aufgabe:

    Bei einem Eingabefeld( bzw Textbox) sollen nur Zahlen eingegeben werden Buchstaben sollen also Verboten sein.

    ( Sorry wegen der Topic Überschrift habe leider schneller getippt als gedacht und als ich das nachträglich geändert habe bzw wollte änderte er nur die überschrift von meinem Beitrag *Schäm*)
    Zuletzt bearbeitet: 13. März 2006
  2. D@nger

    D@nger Gast

    Hallo,
    Code (Visual Basic):
    1.  
    2. Private Sub Text1_KeyPress(KeyAscii As Integer)
    3.   Select Case KeyAscii
    4.     Case 48 To 57  ' hier wird definiert, welche Zeichen zugelassen sind
    5.    Case Else
    6.       KeyAscii = 0
    7.   End Select
    8. End Sub
    9.  
  3. Shakie

    Shakie Erfahrenes Mitglied

    Beachte: wenn du Dangers Lösung verwendest, dann kannst du immernoch mittels Kopieren+Einfügen andere Zeichen in dein Textfeld eingeben. Du solltest also zusätzlich im TextChange-Ereignis überprüfen, ob die Eingabe numerisch ist.
    Zum Beispiel so:
    Code (Visual Basic):
    1. Private Sub Text1_TextChange()
    2. If Not IsNumeric(Text1.Text) Then
    3.   MsgBox "Bitte nur Zahlen eingeben"
    4.   Text1.Text="0"
    5. End If
    6. End Sub
  4. lobi666

    lobi666 Grünschnabel

    Danke vielmahls für die zwei Antworten kamen leider nach dem Klingeln ^^.
    Da der lehrer die erste Variante genommen hat und es aber dank einfügen trozdem gehen soll werde ich mich ein wenig mit der Zweiten beschäftigen um beim Lehrer wieder ein nettes Plus zu bekommen.

    Und da es die nächsten Montage warscheinlich um die gleiche Zeit einfache fragen von mir gibt bitte vor dem Klingeln antworten. ;)


    Habe es heute ausprobieren müssen und mir ist aufgefallen das ich selbst bei Dangers möglichkeit,über Kopieren keine numerische sachen einfügen kann.
    Zuletzt bearbeitet: 20. März 2006

Diese Seite empfehlen