17-10-12, 02:20 PM
كاتب الموضوع : Boutemine Oualid
السلام عليكم و رحمة الله و بركاتهكود :
Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
Private Const Invert As Long = 1
Private Sub Timer1_Timer()
Call FlashWindow(Me.hwnd, Invert)
End Sub