module1.vb

来自「Visual.Basic.NET实用编程百例-47.6M.zip」· VB 代码 · 共 16 行

Module Module1
    Declare Function AnimateWindow Lib "user32" (ByVal hwnd As IntPtr, _
                                                         ByVal dwTime As Integer, _
                                                         ByVal dwFlags As Integer) _
                                                         As Boolean
    Public Const AW_HOR_POSITIVE = &H1
    Public Const AW_HOR_NEGATIVE = &H2
    Public Const AW_VER_POSITIVE = &H4
    Public Const AW_VER_NEGATIVE = &H8
    Public Const AW_CENTER = &H10
    Public Const AW_HIDE = &H10000
    Public Const AW_ACTIVATE = &H20000
    Public Const AW_SLIDE = &H40000
    Public Const AW_BLEND = &H80000
End Module