SoloCodigo

CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: Vortice en Lunes 21 de Enero de 2008, 21:14

Título: Dudas Con Formulario Mdi
Publicado por: Vortice en Lunes 21 de Enero de 2008, 21:14
Camaradas; hola espero y estén bien….
A lo nuestro, tengo una aplicación con 4 formularios y uno de ellos es el menú principal, entonces lo quiero dejar como Padre(MDI), esto lo hago en las propiedades, pero como hago para decirle al VB.Net 2003 que los demás formularios son hijos del menú principal, hay alguna propiedad donde indicárselo o algún tipo de código, los formularios ya están creados y programados, todo esto lo hago con el fin de q al minimizar el formulario padre los demás igual se minimicen, solo eso ojala y puedan ayudarme….. De antemano gracias.
Título: Re: Dudas Con Formulario Mdi
Publicado por: Abhero en Martes 22 de Enero de 2008, 15:10
Public Class Form2
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Me.MdiParent = MDIParent1

    End Sub
End Class

Ab.
 :hola:
Título: Re: Dudas Con Formulario Mdi
Publicado por: Vortice en Martes 22 de Enero de 2008, 16:27
Gracias AB,
Aquello me resulta perfecto en todos lados clases, formularios, etc. Pero cuando lo ejecuto desde un Modulo me da fallo, me dice q la instruccion Meno es valido usarla en un modulo..... ojala y puedas hecharme una mano con esto, gracias....
Título: Re: Dudas Con Formulario Mdi
Publicado por: Abhero en Martes 22 de Enero de 2008, 21:06
No entendi bien pero aqui hay dos casos

Caso 1   :blink:  ( Si es poner el modulo como mdichild)

Un modulo no es un formulario y tampoco un objeto visible por lo cual considero ( No se si estoy equivocado ) que no se puede establecer como Mdi.Child esta debe ser una propiedad exclusiva de los formularios.


Caso 2   :rolleyes:   ( Si es poner la propiedad al form desde el modulo )

Codigo en el modulo

Module Module1

    Public Sub abrir()
        Form2.MdiParent = MDIParent1  'si estas fuera del formulario no puedes usar me ya que te estarias refiriendo al modulo, en este caso sustituye por el nombre del form.
 
    End Sub

End Module


Codigo en el MDIParent

    Private Sub MDIParent1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        abrir()
    End Sub

 :whistling:
Asi me funciona perfectamente.