instancia de un formulario

[alejandrom]

Como hacer para q no me salga dos veces un mismo formulario debido q al yo darle


dim fm as new form1

fm.show


si el boton lo undo 10 veces el formulario me sale 10 veces como haria para q me salga una vez

Gracias de antemanooo

[RootK]

Hola, lo que se me ocurre es que incouyas un modulo en tu proyecto para que manejes una variable publica de tipo boolena y con ello sepas si está o no abierto el formulario.

Por ejemplo.. tenemos el form1 que tiene un boton que abre el form2 y en mi módulo tengo mi variable que se llama wOpen que me controlará si se abre o no..

form1.vb

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If Not wOpen Then
Dim f As New Form2
f.Show()
End If

End Sub

y en el form2 pones en falso wOpen para que no se esté abriendo nuevamente.

form2.vb

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

´tu código....
....
...
wOpen = True
End Sub

y no olvides ponerla de nuevo en false en tu evento closed para que posteriormente lo puedas vovler a abrir...

Private Sub Form1_Closed (ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
wOpen = False
End Sub

Espero que haya sido claro con éste ejemplo.

Saludos y suerte

[RootK]

y en el form2 pones en falso wOpen para que no se esté abriendo nuevamente.

mas bien lo pones el verdadero ...jeje...

[usecas]

Hola alojandrom!. Hay una forma mas facil, en vez de poner:

fm.show, intenta con
fm.showdialog(me), solamente te lo habrira una vez, por que cuando se carga el formulario te desactiva el formulario del que lo llamastes(se convierte en modal), y no te deja volver al anterior hasta que lo cerres! Talves te sirve.

Atte: USECAS

"Di Sí al Software Libre (GNU)" -Nicaragua-