Public Class Form2
   Inherits Form
 
   Private forms As List(Of Form)
 
   Public Sub New()
      InitalizeComponents()
   End Sub
   Public Sub New(ByVal f As List(Of Forms))
      InitializeComponents()
      forms = f
   End Sub
 
   ' ...
End Class

Dim myforms As New List(of Form)
' ...
Dim f2 As New Form2(myforms)

Ralf