This code is display the use of FlashWindow Api Function When you form window is in background then
This code is display the use of FlashWindow Api Function When you form window is in background then it can flash in taskbar and give the
API Declarations
' just mail to [email protected]
' for more funny code in visual basic
Option Explicit
Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
Private Declare Function GetActiveWindow Lib "user32" () As Long
Dim a As Long
Dim b As Long
Rate This code is display the use of FlashWindow Api Function When you form window is in background then
(1(1 Vote))
b = Form1.hwnd
End Sub
Private Sub Timer1_Timer()
Dim nReturnValue As Integer
a = GetActiveWindow()
If a <> b Then
nReturnValue = FlashWindow(Form1.hwnd, True)
End If
End Sub
This code is display the use of FlashWindow Api Function When you form window is in background then Comments
No comments yet — be the first to post one!
Post a Comment