闪烁的标题栏

　　本例通过调用API函数 FlashWindow 实现了窗体标题栏的闪烁，标题栏的闪烁通常用来引起使用者的注意。

　　在VB中声明这个API函数的方法是：

　　　Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long,
　　　ByVal bInvert As Long) As Long
　　其中各个参数的意义如下表所示：

参数 意义

hwnd Long，要闪烁显示的窗口的句柄
bInvert Long，TRUE（非零）表示切换窗口标题；FALSE返回最初状态
返回值 Long，如窗口在调用前处于活动状态，则返回TRUE（非零）

　　为了使窗体出现闪烁的效果，我们在Timer控件的Timer属性中调用FlashWindow函数即可，使用的方法如下：

　　Call FlashWindow(Me.hwnd, True)
　　其中Me.hwnd是当前窗体的句柄，而把bInvert设为True则表示进入标题栏闪烁状态。

　　而停止闪烁的方法只要把bInvert设为False就行了，如下所示：
　　Call FlashWindow(Me.hwnd, False)

　　好了，非常简单，试试把它用到你的程序中去吧。

　　为了学习方便，以下提供了源代码并附详细的中文注释：

-------------------------------------------
一个窗体标题闪烁的例子
-------------------------------------------
程序说明：
本例通过调用API函数 FlashWindow 实现了窗体标题栏的闪烁，标题栏的闪烁
通常用来引起用户的注意。
-------------------------------------------
【VB声明】

Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
【说明】
闪烁显示指定窗口。这意味着窗口的标题和说明文字会发生变化，似乎从活动切换到非活动状态、或反向切换。通常对不活动的窗口应用这个函数，引起用户的注意

【返回值】
Long，如窗口在调用前处于活动状态，则返回TRUE（非零）