module1.vb

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

Module Module1
    Public Const HWND_TOPMOST = -1
    Public Const HWND_NOTOPMOST = -2
    Public Const SWP_SHOWWINDOW = &H40
    '定义函数中使用的常量
    Public Declare Function SetWindowPos& Lib "user32" (ByVal hWnd As Integer, _
                                                     ByVal hWndInsertAfter _
                                                     As Integer, _
                                                     ByVal x As Integer, _
                                                     ByVal y As Integer, _
                                                     ByVal cx As Integer, _
                                                     ByVal cy As Integer, _
                                                     ByVal wFlags As Integer)
    Public Declare Function GetActiveWindow Lib "user32" () As Integer
    '声明API函数
End Module