by luke20au (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 5.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: 
(3 Votes)
Make's the title bar flash.
VBcodersPrivate Declare Function FlashWindow Lib "user32" (ByVal hWnd As Long, ByVal bInvert As Long) As Long
Private Sub Form_Load()
Dim lngReturnValue As Long
lngReturnValue = FlashWindow(Form1.hWnd, True)
End Sub