FlashWindow

Declaración:
Declare Function FlashWindow Lib "user32" Alias "FlashWindow" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
Descripción:
La función FlashWindow devuelve un valor si la ventana que indica si la ventana está activada o desactivada, también cambiando el parametro bInvert podemos invertir su estado como para llamar la atención del usuario.
Parámetros:
ByVal hwnd As Long
Aquí se indica la ventana.
ByVal bInvert As Long
Sirve para invertir el estado de la ventana, si colocamos 1 o True invierte el estado, 0 o False para dejarla como estaba.
Valor de retorno:
Si devuelve 0 está desactivada la ventana, 1 si está activada la ventana.
Uso:
Dim ValorRetorno As Long
ValorRetorno = FlashWindow(Form1.hwnd, 1)
'Invierte el estado del Form1
'Para llamar la atención del usuario coloque este codigo dentro de un Timer, y la ventana parpadeara.