Advertisement
4_2005-2006 String Manipulation #153162

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

Riepilogo AI: 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.

Codice sorgente
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
Commenti originali (3)
Recuperato da Wayback Machine