Strings in Visual Basic

[Frank aus Ulm]

Hi, hallo

Bitte!  Du schaffst das !!!

mit so einer Hilfe befürchte ich das fast...

eine große Unklarheit ist drin: was meinst _DU_ mit alphanumerisch?

zk = "abc9defg"
laenge_zk = Len(zk)
zahlgefunden = FALSE

FOR r = 1 TO laenge_zk
  teste_zeichen = Mid(zk,r,1)
  If isNumeric(teste_zeichen) THEN
    zahlgefunden = TRUE
  END IF
NEXT

IF zahlgefunden = TRUE THEN
  msgbox zk & " enthält eine Zahl"
END IF

->> fertig

wenn du anders schauen willst, ob du nur Zahlen und Buchstaben in der Suppe hast, dann reicht eine Regular Expression aus. Keine Schleife nötig....

Gruß, Frank