Instancias Formulario MDI

Hola Ariel,

la forma más sencilla (sin complicaciones) de trabajar con esto es (usando
VB 2005) de esta manera:

Form1 (padre)

Public Class Form1

Public MiF2 As Form2
Public MiF3 As Form3


Private Sub UnoToolStripMenuItem_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles UnoToolStripMenuItem.Click
If MiF2 Is Nothing Then
MiF2 = New Form2
MiF2.MdiParent = Me
MiF2.Show()
End If
End Sub

Private Sub DosToolStripMenuItem_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles DosToolStripMenuItem.Click
If MiF3 Is Nothing Then
MiF3 = New Form3
MiF3.MdiParent = Me
MiF3.Show()
End If
End Sub

End Class


Form2 (hijo)

Public Class Form2

Private Sub Form2_FormClosed(ByVal sender As Object, ByVal e As
System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
Form1.MiF2 = Nothing
End Sub

End Class


Form3 (hijo)

Public Class Form3

Private Sub Form3_FormClosed(ByVal sender As Object, ByVal e As
System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
Form1.MiF3 = Nothing
End Sub

End Class


Espero que te sirva.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Blog de Jorge Serrano
http://geeks.ms/blogs/jorge/default.aspx


"Ariel" wrote:

Hola amigos, tengo un Form MDI y varios From hijos, los cuales llamo
mediente un ToolBar en el MDI, como puedo hacer para instanciar una vez
los form hijos y no que me aparezcan varias veces? Utilizo Visual Basic
express 2005

Le 02/09/2006, Jorge Serrano [MVP VB] a supposé :

Hola Ariel,

la forma más sencilla (sin complicaciones) de trabajar con esto es (usando
VB 2005) de esta manera:

Form1 (padre)

Public Class Form1

Public MiF2 As Form2
Public MiF3 As Form3


Private Sub UnoToolStripMenuItem_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles UnoToolStripMenuItem.Click
If MiF2 Is Nothing Then
MiF2 = New Form2
MiF2.MdiParent = Me
MiF2.Show()
End If
End Sub

Private Sub DosToolStripMenuItem_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles DosToolStripMenuItem.Click
If MiF3 Is Nothing Then
MiF3 = New Form3
MiF3.MdiParent = Me
MiF3.Show()
End If
End Sub

End Class


Form2 (hijo)

Public Class Form2

Private Sub Form2_FormClosed(ByVal sender As Object, ByVal e As
System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
Form1.MiF2 = Nothing
End Sub

End Class


Form3 (hijo)

Public Class Form3

Private Sub Form3_FormClosed(ByVal sender As Object, ByVal e As
System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
Form1.MiF3 = Nothing
End Sub

End Class


Espero que te sirva.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Blog de Jorge Serrano
http://geeks.ms/blogs/jorge/default.aspx


"Ariel" wrote:

Hola amigos, tengo un Form MDI y varios From hijos, los cuales llamo
mediente un ToolBar en el MDI, como puedo hacer para instanciar una vez
los form hijos y no que me aparezcan varias veces? Utilizo Visual Basic
express 2005

Gracias Jorge, funciono muy bien