Inhalt eines Strings auf Ziffern überprüfen

21/08/2007 - 15:55 von Daniel Aichele | Report spam
Hallo Newsgroup,

ich möchte gerne den Inhalt eines Strings darauf überprüfen, ob an der
ersten Stelle eine Ziffer steht. Wenn nein soll die Stelle gelöscht
werden und das ganze nochmal überprüft werden, solange bis der String
leer ist, oder eine Ziffer an erster Stelle steht. Ich habe es
folgendermaßen versucht:

Dim test As String = ""
Dim empfstr As String = "rtz3445"
test = empfstr.Chars(1)
Do While test <> 0 To 9 'weiß nicht was hier hingehört damit es
richtig verarbeitet wird
empfstr.TrimStart(test)
test = empfstr.Chars(1)
Loop

Ich hoffe mir kann jemand sagen, wie ich das veràndern muss, damit es
funktioniert.

Mit freundlichen Grüßen

Daniel
 

Lesen sie die antworten

#1 André Derron
21/08/2007 - 16:12 | Warnen spam
Hallo Daniel,
Das geht so:

Dim test As String = "aaaaa1xxxx"

For i As Integer = 1 To Len(test)
If Asc(Mid(test, 1)) >= 48 And Asc(Mid(test, 1)) <= 57 Then
Exit For
End If

test = Mid(test, 2)
Next

Gruss
André


Daniel hat gefragt: --

ich möchte gerne den Inhalt eines Strings darauf überprüfen, ob an der
ersten Stelle eine Ziffer steht. Wenn nein soll die Stelle gelöscht
werden und das ganze nochmal überprüft werden, solange bis der String
leer ist, oder eine Ziffer an erster Stelle steht. Ich habe es
folgendermaßen versucht:

Ähnliche fragen