'Method 1
Dim Form1 As Form = Activator.Creat eInstance(Of frmContractEdit )()
Form1.Show()
'Method 2
Dim Form2Type As Type = GetType(frmCont ractEdit)
MsgBox(Form2Typ e.AssemblyQuali fiedName)
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
'frmContractEdi t needs to have Inherits System.Windows. Forms.Form in its Class definition (designer)
Dim Form3Type As Type = Type.GetType("F usion.frmContra ctEdit", True, True)
MsgBox(Form3Typ e.AssemblyQuali fiedName)
Dim Form3 As Form = CType(Activator .CreateInstance (Form3Type), Form)
Form3.Show()
'Method 4
Dim Form4 As Form = CType(Activator .CreateInstance (Type.GetType(" Fusion.frmContr actEdit", True, True)), Form)
Form4.Show()
Dim Form1 As Form = Activator.Creat eInstance(Of frmContractEdit )()
Form1.Show()
'Method 2
Dim Form2Type As Type = GetType(frmCont ractEdit)
MsgBox(Form2Typ e.AssemblyQuali fiedName)
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
'frmContractEdi t needs to have Inherits System.Windows. Forms.Form in its Class definition (designer)
Dim Form3Type As Type = Type.GetType("F usion.frmContra ctEdit", True, True)
MsgBox(Form3Typ e.AssemblyQuali fiedName)
Dim Form3 As Form = CType(Activator .CreateInstance (Form3Type), Form)
Form3.Show()
'Method 4
Dim Form4 As Form = CType(Activator .CreateInstance (Type.GetType(" Fusion.frmContr actEdit", True, True)), Form)
Form4.Show()
Comment