A Flashing Form

This code causes the form's TitleBar and the form's TaskBar Window to Flash.

Original Author: Tomer Cohen

Assumptions

Create a Timer control and name it - Timer1

API Declarations

Private Declare Function FlashWindow Lib "user32" Alias "FlashWindow" (ByVal hwnd As Long, ByVal bInvert As Long) As Long

Code

Private Sub Form_Load()
Timer1.Interval = 300 'Change value depending on the speed of flahing.
End Sub
Private Sub Timer1_Timer()
FlashWindow hwnd, 1
End Sub


About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 94 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.