dynamically create class instance from class name

[Scott Izu]

'Method 1
Dim Form1 As Form = Activator.CreateInstance(Of frmContractEdit)()
Form1.Show()

'Method 2
Dim Form2Type As Type = GetType(frmContractEdit)
MsgBox(Form2Type.AssemblyQualifiedName)
Dim Form2 As Form = CType(Activator.CreateInstance(Form2Type), Form)
Form2.Show()

'Method 3
'Fusion. needs to be in front and was found using MsgBox above
'frmContractEdit needs to have Inherits System.Windows.Forms.Form in its Class definition (designer)
Dim Form3Type As Type = Type.GetType("Fusion.frmContractEdit", True, True)
MsgBox(Form3Type.AssemblyQualifiedName)
Dim Form3 As Form = CType(Activator.CreateInstance(Form3Type), Form)
Form3.Show()

'Method 4
Dim Form4 As Form = CType(Activator.CreateInstance(Type.GetType("Fusion.frmContractEdit", True, True)), Form)
Form4.Show()

 

[Scott Izu]

'Method 5
'Needs Fusion. in front
'Pass parameters using overload Activator.CreateInstance Object Paramater Array
'frmLegalServicesEdit(ByVal DD_TablesID As String, ByVal dgdBrow As DataGridView)
Dim FType As Type = Type.GetType ("Fusion.frmLegalServicesEdit", True, True)
Dim Args() As Object = {Me.DD_TablesID, Me.dgdBrow}
Dim Form5 As Form = CType(Activator.CreateInstance(FType, Args), Form)
Form5.Show()