devxlogo

Quick Check on Collection Key

Quick Check on Collection Key

You might need to determine whether a certain key is in a collection. The Collection object doesn’t provide a method to retrieve a key after you add an object to the collection. Instead of keeping a separate list of the keys in the collection, use this function:

 Public Function IsKeyInCollection(col As Collection, sKey _	As String) As Boolean	On Error Resume Next	col (sKey)	' this will cause an error if key is not in collection	IsKeyInCollection = (Err.Number = 0)End Function

You can easily modify this function to make it a property of a Collection class.

devx-admin

Share the Post: