Public Function StripMatchingEndLineFast( _ ByRef vLine As String _ , ByRef vFind As String _ , ByRef vCompare As VbCompareMethod _ ) As String
StripMatchingEndLineFast("This is a test.", "test.", vbTextCompare) = "This is a " StripMatchingEndLineFast("This is a test.", " is ", vbTextCompare) = "This is a test. StripMatchingEndLineFast("This is a test.", "", vbTextCompare) = "This is a test.See also:
StripMatchingEndLine Function LineEndsWithFast Function StripMatchingBeginLineFast FunctionvLine: The string whose end is to be removed if it matches string vFind.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.