Good to Know Database

Hexadezimalen String mit IsHexadecimal() prüfen


Mit der folgenden VBScript Funktion IsHexadecimal() kann man überprüfen ob ein String nur hexadezimale Zeichen (0-9 und A-F) enthält.

Private Function IsHexadecimal(strHexString)
  ' Declaration of variables
  Dim objRegExp

  ' Create regular expression object
  Set objRegExp = New RegExp
  With objRegExp
    .Pattern = "^[0-9a-f]+$"
    .IgnoreCase = True
    .Global = True
  End With

  ' Search for regular expression in specified string
  IsHexadecimal = objRegExp.Test(strHexString)

  ' Deallocate regular expression object
  Set objRegExp = Nothing
End Function


Dieser Eintrag wurde am 23.11.2014 erstellt.

Direkter Link zu dieser Seite: http://www.gtkdb.de/index_29_2630.html

[ Zur Startseite ]   [ Zur Kategorie ]


Valid XHTML 1.0 Transitional Valid CSS Valid Atom 1.0

© 2004-2018 by Georg Kainzbauer