VB 窗体标题栏闪烁实例,可参照以下代码实现窗体标题栏的闪烁功能: 声明API函数Flashwindow Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, _ ByVal bInvert As Long) As Long Private Sub Form_Load() Me.Caption = "闪烁的窗体标题栏!" 设置标题栏文字 End Sub Private Su
这是一个相对简单的VB制作透明 窗体的方法,看上去这个窗体无边框、无标题栏,也没有最小最大化及关闭按钮,完全显示了一个图片的效果,其实本代码是一个透明窗体的实现实例,特此为大家分享代码如下: Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, _ ByVal nWidth As Long, ByVal nHeight As Long) As Long API函数声明 Pr