[RESOLVED] WithEvents Array

I have a Class where i manipulate with one Form. That Form is declared WithEvents:

Code:

---

Private WithEvents m_frmOwner As Form

---

Now i would like to expand this and make it into an Array. But i don't know how. Something like:

Code:

---

Private WithEvents m_frmOwners() As Form

---

... doesn't work.

Any ideas?

You might find this FAQ article useful: Why can't I use WithEvents on arrays of objects? (it gives an alternative)

You could add the forms to a collection when you initialize them. Then reference it as a collection member as usual

Something like this:

vb Code:

'Declare
Private WithEvents m_frmOwner As Form1
Private FormClln as new Collection
....
'Initialize form and add to forms collection
m_frmOwners = new Form1
FormClln.Add(m_frmOwners)
...
'reference later like this
fForm = FormClln(0)
fForm.Caption = "whatever"

Pradeep :)

The more or less obvious issue with Pradeep's suggestion is that only one form can be referenced to that single variable at a time. Thus one object from the collection would be have accessible events and the rest wouldn't as there wouldn't be a WithEvents reference.

How many Forms raise events anyway?

@si_the_geek: this actually solves my problem, but, i managed to solve it differently. With a new, superior Class to this, that simply includes an Array of first Class instances. This shortens my "Form code" and allows me to manage all first Class instances quite simply :)

@Pradeep1210: i have looked at this solution before you even posted it. I think Merri wrapped the first and most important problem that comes along.

@dilettante: not necessarily all. But, it can happen.

Thank you all :wave:

Resolved!