Dim myAssembly As Assembly = Assembly.GetExecutingAssembly()
For Each t As Type In myAssembly.GetTypes()
If t.IsPublic And t.BaseType.Name = "Form" Then
If t.Name = NomeForm Then
_obj = t.InvokeMember("", BindingFlags.CreateInstance, System.Type.DefaultBinder, New Object, Nothing)
frm = CType(_obj, Form)
frm.MdiParent = Me
frm.Show()
Exit For
End If
End If
Next