text aus textbox übernehmen
10.03.2005 18:04:12
bastian
ich möchte den in eine Textbox eingetragen Text in eine Variable schreiben. Wenn der Text nicht bestimmte Codes sind, möchte ihc dem user eine MsgBox mit einem Hinweis schicken. Wenn ich es wie folgt mache reagiert das Skript schon während der Eingabe, gleich nach dem ersten Buchstaben. Ich möchte aber den Check erst nach der Eingabe durchführen. Wie geht das ? Hat jemand einen Tipp ?
Private Sub Textbox1_Change()
Textbox1_Entry = Textbox1.Value
If (Textbox1_Entry = "xyz") Or (Textbox1_Entry = "fgd") Then
Else
MsgBox "Der eingebene Code ist nicht zulässig !"
Exit Sub
End If
End Sub
Gruss & Dank Bastian