Visual Basic.NET - ventana por encima de todo

Hola, aqui estoy de nuevo.
Me gustaria saber como hago para que cuando se cumpla una condicion mi programa, que estaría minimizado, se abra por encima de cualquier otra aplicacion que estuviese en ese momento ejecutándose.
¿Alguien me puede ayudar?
Muchas gracias.

Estoy intentando hacerlo con el siguiente codigo:

Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function GetActiveWindow Lib "user32" () As Long
Declare Function SetActiveWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
Declare Function SetForegroundWindow Lib "user32" Alias "SetForegroundWindow" (ByVal hwnd As Long) As Long

SetActiveWindow(Me.Handle)
result = SetForegroundWindow(THandle)

Pero me da un error en Pinvoke ¿me podeis ayudar? gracias

El PInvoke lo solucionas utilizando IntPtr en vez del long para el hWnd...fijate ademas como termina tu declaracion cambia el AS Long por As Integer

Declare Auto Function MoveWindow Lib "user32" (ByVal hWnd As IntPtr, ByVal x As Integer, ByVal y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal bRepaint As Integer) As Integer

y lo llamo de esta manera:

MoveWindow(Me.Handle, 20, 20, Me.Height, Me.Width, True)

Este ejemplo mueve una ventana, solo es usado para que te guies......

Espero te ayude en algo...

Probe todo lo que me dijisteis, pero nada de eso me funciona, to quiero que me salte la aplicacion por encima de todo lo que se este ejecutando en ese momento.
Pero con nada de eso me sale. No es el formulario el que tiene que ponerse por encima, sino toda a aplicacion.
Timer1.Enabled = False
Dim result As IntPtr
THandle = Me.Handle
SetActiveWindow(THandle)
result = SetForegroundWindow(THandle)
Me.WindowState = FormWindowState.Maximized
Me.MdiParent.TopLevel = True
'MoveWindow(Me.Handle, 20, 20, Me.Height, Me.Width, True)

Timer1.Enabled = True

Ok, veamos para captar bien la idea y ayudarte mejor....

En que momento deseas que salte tu aplicacion al frente de todo, q parametros hacen que s eejcute ese codigo (en que momento traes a lfrente toda la plicacion)?????.

Yo tengo la aplicacion minimizada, y en un timer voy evaluando una condicion. cuando esa condicion se cumpla a la aplicacion debera aparecer por encima de todo lo que haya en ese momento abierto.

Esto te ayudara.....

Si cambias de ventana, despues de 10 seg se mostrara tu aplicacion, tanto si su Windows state = Normal o Maximized, lo que hago es comparar la hora en q salgo de mi aplicacion y guardo mi ultimo estado, luego de transcurridos los 10 seg (para este ejemplo) me activa mi aplicacion nuevamente..........

El timer lo tengo asi:

Timer,Interval=1000 '1Segundo
Timer.Enabled=True

El Codigo:

Dim StartMe As DateTime = Nothing
Dim stopMe As DateTime = Nothing
Dim MiEstado As Int32 = 0

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
stopMe = Now
'Si han transcurrido 10 segundos tu aplicacion se mostrara....
If stopMe.Subtract(StartMe).Seconds = 10 Then
Select Case MiEstado
Case 0
Me.WindowState = FormWindowState.Normal
Case 2
Me.WindowState = FormWindowState.Maximized
End Select
Me.Activate()
Me.Timer1.Enabled = False
End If
End Sub

Private Sub Form1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LostFocus

Me.Timer1.Enabled = True
'cuando minimices el form guardara el WindosState
MiEstado = Me.WindowState

Me.StartMe = Now
Me.Timer1.Start()

End Sub

Es lo que te comentaba, si funciona si lo tienes abierto y abre mas ventanas y las pones por encima, cuando pasa cierto tiempo si que se muestra. pero lo malo es cuando minimizas la aplicacion, entonces no se muestra.
Tengo una aplicacion minimizada y quiero que me aparezca en pantalla, ese es ahora el problema.

Oye gracias. ya me funciona. es que tengo un formulario MDI y le estaba usando las propiedades del formulario hijo y no del form MDI.
Ahora ya me funciona. Muchas gracias.

Pero, pero, probaste lo que te dije?, en el timer pon solo esto:

Me.WindowState = FormWindowState.Normal
Me.TopLevel = True
Me.Timer1.Enabled = False

Con eso tu aplicacion se mostrara delante de todo, Yo probe con varias ventnas maximizadas y lo hizo.

AHORA, si quieres que tu aplicacion se quede como siempre ACTIVA(o sea siempre se mostrara sin importar des click fuera), agregale

Me.TopMost = true

Ojala te sea util. Suerte!

Ya, pero si la minimizo ya no lo hace. Y lo tiene que hacer cuando la aplicacion esta minimizada tambien.
Gracias.

Uhmmm.

Yo en un timer con intervalo de 5 seg. puse esto

Me.WindowState = FormWindowState.Normal
Me.TopLevel = True
Me.Timer1.Enabled = False

Y abri varias ventanas, despues de los 5 seg. la aplicacion aparecio por encima de todo.

Ojala te sea util. Suerte!