VB Code:
'This project needs a timer,Interval 1000 'In general section Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long Const Invert = 1 Private Sub Timer1_Timer() FlashWindow Me.hwnd, Invert End Sub





Reply With Quote