Textfeld auf Gültigkeit prüfen

Nils89 · 11. Februar 2014, 11:30

Hallo zusammen,

ich habe folgendes Problem:

Ich möchte ein Textfeld auf Gültigkeit prüfen.

Es gibt 3 "Inhalte" die erlaubt sind:1.: "xx-xx-xxxx" x = Ziffern
2.: "xx-xx-xxxxbisxxxx" x= Ziffern
3.: "xx-xx-xxxx/xxxx/xxxx/..." x = Ziffern

Bei der 3. Möglichkeit kann das Textfeld belibig lang sein hier ist nur wichtig, dass auf ein "/" immer 4 Ziffern folgen müssen.

Hoffe kann mir jemand helfen.

Gruß
Nils

Andy16823 · 11. Februar 2014, 11:36

~~Such mal in der Foren Suche nach RegEx oder nimm eine MaskedTextbox~~

Edit: hier ist der Link, damit sollte es gehen [VB 2008] RegEx Tutorial - Blutige Anfänger und Fortgeschrittene

Grüße Andy

Arby · 11. Februar 2014, 11:40

Setze die Eigenschaft CausesValidation der TextBox auf True und prüfe im Validating-Ereignis die Gültigkeit des Inhalts. Stellst du fest, dass das Format nicht eingehalten wird, setzt du dort die Eigenschaft Cancel des übergebenen CancelEventArgs-Objekts auf True.

Snaptu · 11. Februar 2014, 11:43

Das Format sieht mir nach nem Datum aus, muss es dann eine Textbox sein?
Ansonsten gehts wahrscheinlich am besten wie Arby sagt.

Nils89 · 11. Februar 2014, 11:48

Es ist kein Datum, bzw. nicht komplett: xx(Monat)-xx(Jahr)-xxxx(Fortlaufende 4stellige Zahl: z.B: 0001-9999)
Wie mache ich das denn genau mit der CausesValidation?
Wo muss ich diese 3 "Werte" festlegen und wie genau funktioniert es mit Variante 3?

Andy16823 · 11. Februar 2014, 11:59

du musst das format mit Regex testen [VB 2008] RegEx Tutorial - Blutige Anfänger und Fortgeschrittene und wenn es nicht rictig ist, cancelst du das Event.

Nils89 · 11. Februar 2014, 12:06

Ok die Variante 1 und 2 habe ich schon hinbekommen aber an der 3. hänge ich noch

Andy16823 · 11. Februar 2014, 12:08

da musst du vor / mit \ escapen

Nils89 · 11. Februar 2014, 12:10

Kannst du mir dafür vlt ein Beispiel geben?

Andy16823 · 11. Februar 2014, 12:15

bin gerade dabei

So, nun habe ich mal das 1-3 allerdings scheitert es an den mehrern \xxxx

VB.NET-Quellcode

Dim rx1 As Boolean = Regex.IsMatch(Me.TextBox1.Text, "[0-9]{2}-[0-9]{2}-[0-9]{4}$")
Dim rx2 As Boolean = Regex.IsMatch(Me.TextBox1.Text, "[0-9]{2}-[0-9]{2}-[0-9]{4}bis[0-9]{4}$")
Dim rx3 As Boolean = Regex.IsMatch(Me.TextBox1.Text, "[0-9]{2}-[0-9]{2}-[0-9]{4}\/[0-9]{4}$")
If rx1 Or rx2 Or rx3 Then
MessageBox.Show("True")
Else
MessageBox.Show("Ungültige Eingabe")
End If

Nils89 · 11. Februar 2014, 13:37

Danke

rx1 und rx2 funktionieren.

Nur bei rx3 wie du schon gesagt hast scheitert es an den mehreren /xxxx

Gibt es dafür auch eine Lösung?

Andy16823 · 11. Februar 2014, 13:39

genau, da liegt ja das Problemm wo ich nicht weiß wie ich das bewerkstelligen soll. Evtl, gibt es da ne Funktion in Regex, aber so weit bin ich auch noch nicht.

Nils89 · 11. Februar 2014, 13:47

ich hab auch schon überlegt das mit einer schleife zu prüfen aber bin noch nicht drauf gekommen wie genau.
z.b. immer zu prüfen ob rechts "/xxxx" steht.

Andy16823 · 11. Februar 2014, 13:48

das habe ich mir auch überlegt, mit erfolg, es funktionier :thumbsup:

VB.NET-Quellcode

Dim counts As Integer = 0
If Me.TextBox1.Text.Contains("/") Then
counts = Me.TextBox1.Text.Split("/").Length - 1
End If
Dim rx3Pattern As String = "([0-9]{2})-([0-9]{2})-([0-9]{4})"
If Not counts = 0 Then
For i = 0 To counts - 1
rx3Pattern += "\/([0-9]{4})"
Next
End If
rx3Pattern += "$"
Dim rx1 As Boolean = Regex.IsMatch(Me.TextBox1.Text, "([0-9]{2})-([0-9]{2})-([0-9]{4})$")
Dim rx2 As Boolean = Regex.IsMatch(Me.TextBox1.Text, "[0-9]{2}-[0-9]{2}-[0-9]{4}bis[0-9]{4}$")
Dim rx3 As Boolean = Regex.IsMatch(Me.TextBox1.Text, rx3Pattern)
If rx1 Or rx2 Or rx3 Then
MessageBox.Show("True")
Else
MessageBox.Show("Ungültige Eingabe")
End If

Du musst einfach nur, prüfen ob der String ein / enthält, dann splitest du es - 1 weil du den vorherigen teil nicht willst, und holst dir die länge. So nun prüfst du ob counts nicht 0 ist, wenn ja dann baust du über die Schleife deinen Weiteren Patter zusammen.

misbe · 11. Februar 2014, 13:54

@Nils89: @Andy16823:
[0-9]{2}-[0-9]{2}-[0-9]{4}(\/[0-9]{4})+$ <- sollte funktionieren

Andy16823 · 11. Februar 2014, 14:01

Stimmt, geht da das + die Gruppe (\/[0-9]{4}) findet :rolleyes:

ist manchmal einfacher als man denkt, aber ohne deinen beitrag wäre ich auch nicht darauf gekommen.

Nils89 · 11. Februar 2014, 14:05

Perfekt es geht

Aber jetzt geht rx2 nicht mehr -.- wenn ich 02-14-1234bis1234 eingebe kommt ungültig hast du eine Idee?

misbe · 11. Februar 2014, 14:07

Zeig mal bitte deinen jetzigen Code mit dem du die Überprüfung machst

Nils89 · 11. Februar 2014, 14:14

Dim rx1 As Boolean = Regex.IsMatch(Me.TxtAuftragsnummer.Text, "[0-9]{2}-[0-9]{2]-[0-9]{4}$")
Dim rx2 As Boolean = Regex.IsMatch(Me.TxtAuftragsnummer.Text, "[0-9]{2}-[0-9]{2]-[0-9]{4}bis[0-9]{4}$")
Dim rx3 As Boolean = Regex.IsMatch(Me.TxtAuftragsnummer.Text, "[0-9]{2}-[0-9]{2]-[0-9]{4}(\/[0-9]{4})+$")

wobei jetzt geht rx2&3 nicht.
Bei dem mit der Schleife oben hat rx3 funktioniert.

sonne75 · 11. Februar 2014, 14:16

Nils89 schrieb:

[0-9]{2}-[0-9]{2]-[0-9]{4}$

Klammer falsch.

Textfeld auf Gültigkeit prüfen

Textfeld auf Gültigkeit prüfen

VB.NET-Quellcode

VB.NET-Quellcode

Nils89 schrieb:

Ähnliche Themen

5 Benutzer haben hier geschrieben