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

Private Sub tmrTimer1_Timer()
    FlashWindow Me.hwnd, 1
End Sub
