function FindString(sSource, sFindStr, ByRef iStartPos, ByRef iLength) As Boolean
|
Sucht in sSource nach dem ersten Vorkommen von sFindStr.
FindString ist case-sensitive. Das erste Zeichen in sSource hat die Position 1. Falls sFindStr gefunden wurde, liefert FindString den Wert TRUE.
Parameter
| • | sSource ... Zeichenfolge, die durchsucht werden soll. |
| • | sFindStr ... Zeichenfolge, nach der gesucht werden soll. |
| • | iStartPos ... Index des ersten Vorkommens. |
| • | iLength ... Länge des gefundenen Strings. |
Beispiel:
Dim s, iStart, iLen
s = "a number or a text"
If FindString(s, "or", iStart, iLen) then
' returns iStart = 10, iLen = 2
End If
|
|