Tengo esta funcion que creo es la que necesitas, eso si necesitas que le des
el NameSpace y la Clase de al Ventana.
' Instancia la Ventana
Private Sub LoadForm(ByVal pvc_NameSpace As String, ByVal pvc_Form As String)
Try
Dim vlo_Form As Form
Dim vlo_Type As Type
vlo_Type = Type.GetType(pvc_NameSpace & "." & pvc_Form)
vlo_Form = Activator.CreateInstance(vlo_Type)
vlo_Form.Show()
Catch ex As Exception
MessageBox.Show("*** No pudo cargar ventana ***" & vbNewLine & _
"Namespace: " & pvc_NameSpace & vbNewLine & _
"Form : " & pvc_Form & vbNewLine & " Error: " & ex.Message, _
"Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
Exit Sub
End Sub