Visual Basic.NET - Abrir formulario

   
Vista:

Abrir formulario

Publicado por José (38 intervenciones) el 15/12/2012 17:09:17
Hola,
tengo el siguiente código para abrir un formulario:

1
2
3
4
5
6
7
8
9
Dim frm As New FiltresCV
        frm.Show()
        'If (IsNothing(frm)) Then
        '    MsgBox("IsNothing....")
        '    frm.Show()
        'Else
        '    MsgBox("Activate....")
        '    frm.Activate()
        'End If


El problema es que cada vez que pincho el boton me abre un nuevo formulario y me encuentro con varios formularios iguales abiertos. He intentado con activate pero no funciona.
Alguien podría indicarme como hacere para que se abra uin solo formulario independientemente de laz veces que pinche el botón y que este venga al primer plano?
Saludos
José
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Abrir formulario

Publicado por David (46 intervenciones) el 18/12/2012 01:08:54
Hola Jose,
yo tambien estube buscando lo mismo hace tiempo
y esto me funciono
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim i As Boolean = False
        For Each item As Form In Application.OpenForms
            If item.Name = "FiltresCV" Then
                item.TopMost = True
                item.WindowState = FormWindowState.Maximized
                i = True
                Exit For
            End If
        Next
        If i = False Then
            Dim frm As New FiltresCV
            frm.Show()
        End If

espero te sirva saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Abrir formulario

Publicado por José (38 intervenciones) el 18/12/2012 04:57:57
Hola David,
gracias por la respuesta.
En parte funciona, solo que cuando el formulario ya está abierto la segunda vez se pone en primer plano y no se va; pero eso no tiene importancia pues despues de aplicar el filtro se puede cerrar.
El problema que tengo es que si aplico el filtro al formulario de origen que está abierto y debe de permanecer abierto, despues de aplicar el filtrto este no cambia, pero si lo abro de nuevo entonces se abre con el filtro aplicado.
¿Como hacer para que el formulario de origen no se abra una segunda vez pero que si acuse la aplicacion del filtro?

CalcValeurP.CALCVALEURPBindingSource.Filter = _
"COURSE = 'Q'" & " AND PARTANTS >= " & Me.PARTANTSMIN.SelectedItem & " AND PARTANTS <= " & Me.PARTANTSMAX.SelectedItem
CalcValeurP.CALCVALEURPBindingSource.Sort = "DATECOURSE Asc,DISCIPLINE Asc,REUNION Asc,COURSE Asc"
Me.Close()
'CalcValeurP.TopMost = True
'CalcValeurP.activate = True
CalcValeurP.Show()

Un saludo
José
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de francisco

Abrir formulario

Publicado por francisco (162 intervenciones) el 22/12/2012 20:19:02
if fmr.visible=false then

frm.Show()

end if
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar