'強制的に最前面にさせる
Private Declare Function
SetForegroundWindow Lib "user32" ( _
ByVal hWnd As
Long) As Long
'最小化されているか調べる
Private Declare Function
IsIconic Lib "user32" (ByVal hWnd As Long) As Long
'元のサイズに戻す
Private Declare Function
ShowWindowAsync Lib "user32" (ByVal hWnd As Long, _
ByVal nCmdShow As
Long) As Long