A bit more information is needed to clearly answer your question. In lieu of that information I'll make a few guesses.
What sort of objects are you talking about? Controls on the form?
Do you mean COM objects?
What is NOBJL() an array of? It's not declared within your code snippet.
If you're looking for a control object on a form, you can interate through the form's control collection until you find a match on name
CODE
Function FindControl(frm as Form, sControlName as String) as Boolean
FindControl = False
Dim ctrl as Control
For Each ctrl In frm.Controls
If ctrl.Name = sControlName Then
FindControl = True
Exit For
End If
Next ctrl
End Function
(I think that will also iterate over the controls in container controls? If not, just do a bit of recursion inside the FindControl function.)
This post has been edited by kikz: 23 Jul, 2008 - 07:19 PM
16 Jul, 2008 - 01:54 AM
|