c Const GWL_STYLE = (-16)
Public Const WS_EX_WINDOWEDGE = &amp;H100
Public Const WS_EX_CLIENTEDGE = &amp;H200
Public Const WS_EX_STATICEDGE = &amp;H20000
Public Const WS_HSCROLL = &amp;H100000
Public Const WS_VSCROLL = &amp;H200000

Public 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 Enum ESetWindowPosStyles
    SWP_SHOWWINDOW = &amp;H40
    SWP_HIDEW