Is in Array Function
Find if a value exists in an array WITHOUT LOOPING. Often we need to find out if a value exists in an array. This one does it VERY FAST. NOTE: This Function only return True / False regarding the Existence of a Value. If you need the Index you will have to LOOP.
AI
Podsumowanie 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.
Kod źródłowy
Public Function IsInArray(FindValue As Variant, arrSearch As Variant) As Boolean On Error GoTo LocalError If Not IsArray(arrSearch) Then Exit Function If Not IsNumeric(FindValue) Then FindValue = UCase(FindValue) IsInArray = InStr(1, vbNullChar & Join(arrSearch, vbNullChar) & vbNullChar, vbNullChar & FindValue & vbNullChar) > 0 Exit Function LocalError: 'Justin (just in case) End Function
Oryginalne komentarze (3)
Odzyskane z Wayback Machine