You should have a look at
my.application.openforms
[
^]
There is a good example in the article, but that is if the form is already open
If not then this code snippet will help
Public Function GetForm(ByVal Formname As String) As Form
Dim t As Type = Type.GetType(Formname)
If t Is Nothing Then
Dim Fullname As String = Application.ProductName & "." & Formname
t = Type.GetType(Fullname, True, True)
End If
Return CType(Activator.CreateInstance(t), Form)
End Function