function FindRegex(sSource, sRegex, ByRef iStartPos, ByRef iLength) As Boolean
|
Sucht in sSource nach dem ersten Vorkommen von sRegex. sRegex ist ein Perl-kompatibler Regulärer Ausdruck.
FindRegex ist case-insensitive. Das erste Zeichen in sSource hat die Position 1. Wird sRegex gefunden, dann liefert FindRegex den Wert TRUE.
Parameter
| • | sSource ... Zeichenfolge, die durchsucht werden soll. |
| • | sRegex ... Regulärer Ausdruck, der gesucht werden soll. |
| • | iStartPos ... Index des ersten Vorkommens. |
| • | iLength ... Länge des gefundenen Strings. |
Beispiel:
Dim s, iStart, iLen
s = "this is number 13 or a text"
If FindRegex(s, "number \d+", iStart, iLen) Then
' returns iStart = 9, iLen = 9
End If
|
|