■ ShowWindow

指定したウィンドウの状態を設定します
設定できる状態には、ウィンドウの表示と非表示、アイコン化、最大化、アクティブ化などがあります
今回はアクティブ化のみを取り上げています

'------------------------------------------------------------------------------
'  ウィンドウ状態設定(宣言)
'------------------------------------------------------------------------------
Const SW_RESTORE = 9            ' アクティブ化

Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow _
        As Long) As Long


Dim w_hwnd            As Long           ' ハンドル
Dim w_ret             As Long           ' 戻り値

    ' 指定したウィンドウをアクティブ化する
    w_ret = ShowWindow(w_hwnd, SW_RESTORE)