module1.bas

随机选题软件

Attribute VB_Name = "Module1"
Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, _
                  ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, _
                  ByVal CX As Long, ByVal CY As Long, ByVal wFlags As Long) As Long
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1