FindString

Top  Previous  Next

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

 

= "a number or a text"

If FindString(s, "or", iStart, iLen) then

   ' returns iStart = 10, iLen = 2

End If