objForm.WindowState = FormWindowState.Normal ' or FormWindowState.Maximized
objForm.BringToFront()
Dim blnFound As Boolean = False
Dim frmTest As Form
'Does form already exist?
For Each frmTest In Me.MdiChildren
With frmTest
If .Name = "form1" Then
.Activate() 'Activate previous instance
blnFound = True
End If
End With
Next
If blnFound = False Then
form1 = New form1
With form1
.MdiParent = Me
.Show()
End With
End If