Flash on Title Bar Form (Tip) - Visual Basic

Tip berikut untuk membuat title bar suatu form menjadi berkedip-kedip. Hal ini digunakan jika anda ingin membuat form menjadi lebih menarik.
Buka program VB, kemudian buat formasi Timer dan propertiesnya seperti gambar.

Setelah itu, masukkan kode berikut dalam kode editor.

Private Declare Function FlashWindow Lib "USER32" (ByVal HWND As Long, BYVALBINVERT As Long) As Long

Private Sub Form_Load()
Timer1.Interval = 100
End Sub

Private Sub Timer1_Timer()
Dim A As Long
A = FlashWindow(Form1.HWND, True)
End Sub

Catatan : Anda bisa mengubah interval waktunya sesuai keinginan anda (tip ini menggunakan interval 100), sedangkan variabel di Timer1 juga bisa diganti... (tip ini menggunakan variabel A).
OK! Tip telah berhasil dibuat...
Jika ada permasalahan, silahkan komentarnya dibawah...