Check if a record exists in a VB6 collection?

Asked 2008-09-02T21:00:27.007

I've inherited a large VB6 app at my current workplace. I'm kinda learning VB6 on the job and there are a number of problems I'm having. The major issue at the moment is I can't figure out how to check if a key exists in a Collection object. Can anyone help?

vb6 collections

Edit Report

1 Answer

My standard function is very simple. This will work regardless of the element type, since it doesn't bother doing any assignment, it merely executes the collection property get.

Public Function Exists(ByVal oCol As Collection, ByVal vKey As Variant) As Boolean

    On Error Resume Next
    oCol.Item vKey
    Exists = (Err.Number = 0)
    Err.Clear

End Function

answered 2009-12-01T10:57:21.983

Check if a record exists in a VB6 collection?

1 Answer

Your Answer