giving focus back to MDIchild window

[Vlado J. \(www.excelleinc.com\)]

Hi,

I have a MDI parent form that opens form as MDIChildren.

I'm trying to check if form is already opened and if it is to give it focus.
I keep getting error messages and no matter what I try it's not sending it
to fornt.

I'm using this code:
Private Sub mnuUserManagement_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles mnuUserManagement.Click

Dim IsMDIExisting As Boolean = False

For Each mdic As Form In Me.MdiChildren

If mdic.Name = "usermanagement" Then IsMDIExisting = True

Next

If IsMDIExisting = False Then

Dim frmUserManagement As New usermanagement

frmUserManagement.MdiParent = Me

frmUserManagement.WindowState = FormWindowState.Maximized

frmUserManagement.Show()

Else

Dim frmUserManagement6 As usermanagement

MessageBox.Show("activateform")

frmUserManagement6.Focus()

End If

End Sub

BTW I know that it finds if it's open because MessageBox pops up.

Thanks in advance,

Vlado

--
Vlado Jasovic
Excelle Technologies Inc.
http://www.excelleinc.com
"single source for all your computer needs"

[TCORDON]

off the top of my head....

Maby you could use:
Me.ActivateMDIChild(frmUserManagement6)

Good Luck
"Vlado J. (www.excelleinc.com)" <vj******@excelleinc.com> wrote in message
news:Sq********************@comcast.com...

Hi,

I have a MDI parent form that opens form as MDIChildren.

I'm trying to check if form is already opened and if it is to give it
focus. I keep getting error messages and no matter what I try it's not
sending it to fornt.

I'm using this code:
Private Sub mnuUserManagement_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles mnuUserManagement.Click

Dim IsMDIExisting As Boolean = False

For Each mdic As Form In Me.MdiChildren

If mdic.Name = "usermanagement" Then IsMDIExisting = True

Next

If IsMDIExisting = False Then

Dim frmUserManagement As New usermanagement

frmUserManagement.MdiParent = Me

frmUserManagement.WindowState = FormWindowState.Maximized

frmUserManagement.Show()

Else

Dim frmUserManagement6 As usermanagement

MessageBox.Show("activateform")

frmUserManagement6.Focus()

End If

End Sub

BTW I know that it finds if it's open because MessageBox pops up.

Thanks in advance,

Vlado

--
Vlado Jasovic
Excelle Technologies Inc.
http://www.excelleinc.com
"single source for all your computer needs"

[Vlado J. \(www.excelleinc.com\)]

Didn't help but thanks anyways.
"TCORDON" <tc******@hotmail.com> wrote in message
news:O5**************@TK2MSFTNGP12.phx.gbl...

off the top of my head....

Maby you could use:
Me.ActivateMDIChild(frmUserManagement6)

Good Luck
"Vlado J. (www.excelleinc.com)" <vj******@excelleinc.com> wrote in message
news:Sq********************@comcast.com...

Hi,

I have a MDI parent form that opens form as MDIChildren.

I'm trying to check if form is already opened and if it is to give it
focus. I keep getting error messages and no matter what I try it's not
sending it to fornt.

I'm using this code:
Private Sub mnuUserManagement_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles mnuUserManagement.Click

Dim IsMDIExisting As Boolean = False

For Each mdic As Form In Me.MdiChildren

If mdic.Name = "usermanagement" Then IsMDIExisting = True

Next

If IsMDIExisting = False Then

Dim frmUserManagement As New usermanagement

frmUserManagement.MdiParent = Me

frmUserManagement.WindowState = FormWindowState.Maximized

frmUserManagement.Show()

Else

Dim frmUserManagement6 As usermanagement

MessageBox.Show("activateform")

frmUserManagement6.Focus()

End If

End Sub

BTW I know that it finds if it's open because MessageBox pops up.

Thanks in advance,

Vlado

--
Vlado Jasovic
Excelle Technologies Inc.
http://www.excelleinc.com
"single source for all your computer needs"

[Adam Goossens]

What errors are you receiving?

Vlado J. (www.excelleinc.com) wrote:

Hi,

I have a MDI parent form that opens form as MDIChildren.

I'm trying to check if form is already opened and if it is to give it focus.
I keep getting error messages and no matter what I try it's not sending it
to fornt.

I'm using this code:
Private Sub mnuUserManagement_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles mnuUserManagement.Click

Dim IsMDIExisting As Boolean = False

For Each mdic As Form In Me.MdiChildren

If mdic.Name = "usermanagement" Then IsMDIExisting = True

Next

If IsMDIExisting = False Then

Dim frmUserManagement As New usermanagement

frmUserManagement.MdiParent = Me

frmUserManagement.WindowState = FormWindowState.Maximized

frmUserManagement.Show()

Else

Dim frmUserManagement6 As usermanagement

MessageBox.Show("activateform")

frmUserManagement6.Focus()

End If

End Sub

BTW I know that it finds if it's open because MessageBox pops up.

Thanks in advance,

Vlado