Advertisement
3_2004-2005 String Manipulation #139466

Match() - Check any string for any number of characters.

Simple function to validate string contents. Compares a given string to a list of illegal values and evaluates whether or not it contains any. Very fast and easy. Can also be used as a string search function with a little modification.

AI

Resumen de IA: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Código fuente
original-source
Public Function Match(strSource As String, strCompare As String) As Boolean
Dim lngCheck As Long
 
 For lngCheck = 1 To Len(strCompare)
 If InStr(strSource, Mid(strCompare, lngCheck, 1)) Then
 Match = True
 Exit Function
 End If
 
 Next lngCheck
End Function
Comentarios originales (3)
Recuperado de Wayback Machine