Public Function InStrCharactersFast( _
ByRef vStartPos As Long _
, ByRef vLine As String _
, ByRef vFindChars As String _
, ByRef vCompare As VbCompareMethod _
) As Long InStrCharactersFast(1, "321CBACBA", "ABC", vbTextCompare) = 4
InStrCharactersFast(4, "321CBACBA", "123", vbTextCompare) = 0See also: InStrCharacters FunctionvStartPos: The position of the character in string vLine where the search is to begin.
Function returns 0 (zero) if none of the characters in string vFindChars appear within string vLine.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.