SetWindowPos

'APIの宣言
'******************************************************************************
' 定義      :SetWindowPos Lib
' 概要      :WindowsAPI宣言
' 第1引数   :Long
' 第2引数   :Long
' 第3引数   :Long       ウインドウの左上隅の新しい座標(ピクセル)
' 第4引数   :Long       ウインドウの左上隅の新しい座標(ピクセル)
' 第5引数   :Long       ウインドウの新しい幅(ピクセル)
' 第6引数   :Long       ウインドウの新しい高さ(ピクセル)
' 第7引数   :Long
' 戻り値    :Long
'******************************************************************************
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

'hwndInsertAfter values
'Public Const HWND_NOTOPMOST = -1 'ウィンドウが常に手前に表示される

' SetWindowPos Flags
Public Const SWP_NOSIZE = &H1  '現在のサイズを維持(cxとcyを無視)
Public Const SWP_NOMOVE = &H2  '現在の位置を維持します(xとyを無視)