by Ben Doherty (5 Submissions)
Category: Windows API Call/Explanation
Compatability: Visual Basic 3.0
Difficulty: Unknown Difficulty
Date Added: Wed 3rd February 2021
Rating: (14 Votes)
This code makes your form window flash like Aol's Instant Messanger when it receives a message.
Assumes
make a timer and set the interval to 3000.
API Declarationsprivate declare function FlashWindow lib "user32" alias "FlashWindow" (ByVal hWnd as long, ByVal bInvert as long) as long
Private sub timer1_timer()
dim nReturnValue as integer
nReturnValue = FlashWindow(form1.hWnd, true)
end sub