Public Function RightOfLastMatchFast( _
ByRef vIn As String _
, ByRef vPat As String _
, ByRef vCompare As VbCompareMethod _
, ByRef vIfNotFound As String _
) As String RightOfLastMatchFast("This is a test.", "is", vbTextCompare, "") = " a test."
RightOfLastMatchFast("This is a test.", "sample", vbTextCompare, "Not found.") = "Not found."See also: RightOfLastMatch FunctionvLine: The string which is to be searched for the appearance of string vFind.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.